Warum funktioniert Delimiter und DelimitedText nicht?

[Alex_ITA01]

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;

[Alex_ITA01]

ich muss noch den Hintergrund erwähnen.
folgendes soll eigentlich passieren:

g#h -> g h (ist # vorhanden dann sollen die Strings getrennt werden)
g h -> g h (bleibt so)

MFG Alex

[Micha]

bei mir ist gerade das gleiche Problem hochgekommen.

auch wenn ich als delimiter ein Semikolon angeb, trennt er mir trotzdem zusätzlich noch nach Leerzeichen.

Ich denke, das ist das gleiche Problem oder?
Wie kann man das lösen, dass er wirklich nur bei Semikolone trennt?

[Micha]

Vielleicht hilft dir das http://www.delphipraxis.net/internal...er+leerzeichen