Einzelnen Beitrag anzeigen

Furtbichler
(Gast)

n/a Beiträge
 
#14

AW: Stringzerlegung in Schleife

  Alt 5. Apr 2013, 17:52
egal welcher Inhalt vorhanden ist, so wäre es besser:
Jupp, aber dann lieber (Geschmackssache) so:
Delphi-Quellcode:
  
for i:=1 to length(s) do
  if s[i]='.then
    break
  else
    s3:=s3+s[i];
Oder so:
Delphi-Quellcode:
i := pos('.',s);
if i<1 then
  i := length(s)+1;
s3 := Copy(s,1,i-1);
  Mit Zitat antworten Zitat