Einzelnen Beitrag anzeigen

Alex_ITA01

Registriert seit: 22. Sep 2003
1.115 Beiträge
 
Delphi 12 Athens
 
#1

Warum funktioniert Delimiter und DelimitedText nicht?

  Alt 6. Jan 2005, 15:32
Hallo erstmal,
ich habe mich grade mal ein wenig schlau gemacht über die zwei Eigenschaften Delimiter und DelimitedText von TStringList.
Ich habe mal folgendes Beispiel probiert aber warum bekomme ich nicht schon bei dem ersten TextOut (sl[0]) "g h" geliefert? Ich bekomme nur ein "g" obwohl doch der Delimiter ein "#"-Zeichen ist...
Ich hoffe ihr versteht mein Problem und könnt mir helfen.
MFG Alex

Delphi-Quellcode:
  sl := TStringList.Create;
  try
    sl.Delimiter := '#';
    sl.DelimitedText := 'g h';

    Form1.Canvas.TextOut(10, 50, sl[0]);
    Form1.Canvas.TextOut(50, 50, sl[1]);
  finally
    Sl.Free;
  end;
Let's fetz sprach der Frosch und sprang in den Mixer
  Mit Zitat antworten Zitat