Entwickler-Ecke

Sonstiges (Delphi) - 1. Wort aus einem String lesen [Hat sich schon erledigt]!


Der-DeeJay - Fr 12.12.03 18:31
Titel: 1. Wort aus einem String lesen [Hat sich schon erledigt]!
HI

Ich habe das nun so gemacht wie es mir vorgeschlagen worden si mit pos
aber das will nich so wie ich will!!
Eigendlich soll er alle anzeigen er zeigt aber nur den 1. an wie so????


Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
var
    index,c1,c2:integer;
    IPping: array[1..20of String[15];
begin
   index:=memo1.Lines.Count;

   for c1:=1 to index do
      begin
      IPping[c1]:=memo1.Lines.Strings[c1];
      end;

      for c2:=1 to Index do
      if pos(#32,IPping[c2]) > 0 then
        begin
        SetLength(IPping[c2],pos(#32,IPping[c2])-1);
        Log.Lines.add(IPping[c2]);
        end;

end;


memo1 = dort hab ich die sachen drinn die ich trennen will[z.B. xxx.xx.xxx.x: mein eigener Host]
log = das is me memo wo ich das ergebnis drin haben will[z.B. xxx.xx.xxx.x:]

Hoffe ihr könnt mir genau so schnell helfen wei letztes mal!!

MFG

Der DeeJay


Delete - Fr 12.12.03 18:36

Also, wenn du´s von einem Memo ins andere kopieren willst, dann nimm doch "copy". Wenn ich jetzt nicht einen argen Fehler gemacht und übersehen habe, dann sollte das hier genügen:

Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
with Memo1,Lines do
  for i := 0 to Count - 1 do
    if(Strings[i] <> ''and
      (pos(#32,Strings[i]) > 0then
    begin
      Log.Lines.Add(copy(Strings[i],1,
        pos(#32,Strings[i])-1);
    end;


Der-DeeJay - Fr 12.12.03 18:44

Danke MathiasSimmack!!!

Das ging ja noch schneller als ich gedacht hab!!

Danke!!


Christian S. - Fr 12.12.03 18:45

Hallo!

Bitte ändere den Titel des Topics da er wenig über das eigentlich Thema verrät. Hier der entsprechende Absatz aus den Delphi-Forum.de Richtlinien:

Richtlinien hat folgendes geschrieben:

1.1 Beiträge
Bitte formuliere den Betreff Deiner Beiträge so, dass andere Mitglieder anhand dieser bereits das eigentliche Thema festmachen können. Beiträge wie etwa "Eine Anfängerfrage" oder "Weiß jemand, wie das geht?" lassen den Leser im Unklaren darüber, was das Thema der Diskussion ist.[...]

Einfach oben bei deinem ersten Beitrag auf "Edit" klicken und den Titel ändern. Dank Dir!

Gruß Peter Lustig