ExtractStrings Problem

[valon]

Hallo !

Ich habe wieder mal ein Problem!

Folgendes: Ich möchte einen Pfad splitten. zb.C:\daten\users

das habe ich so gemacht.

 FPathList:TStringList;

Delphi-Quellcode:

procedure TForm1.setPath(newPath: WideString);
begin
  if Self.DirectoryExists(FDriveletter+':\'+newPath)then
    begin
      Self.FPathList := TStringList.create;
      Self.FPath := newPath;
      ExtractStrings(['\'],[' '],pchar(FPath),FPathList);
    end
  
end;

es funktioniert auch super. Doch da ich in meinen Program von Strings in WideStrings umstellen muss, funktioniert das mit der ExtractString nicht mehr.
es ist nicht mehr TStringList sondern TTntStringList weil ich jetzt die TntControls verwende.

Als Fehlermeldung bringt er bei ExtractStrings Funktion das TStrings und TTntStringList unkompatibel sind.
Gibt es eine möglichkeit einen WideString zu splitten. etwa
so eine Funktion wie ExtractWideStrings ???

Danke

[valon]

Hallo ich nochmal . der Parameter newPath ist natürlich ein String und kein Widestring.
Bei WideString funktioniert es nähmlich nicht. habs nur vergessen es wieder zu korriegieren.

[alcaeus]

Hi valon,

du kannst deine Beiträge mit dem -Button editieren.

Zu deinem Problem: je nach Delphiversion kannst du auch eine TStringList "missbrauchen", um die Strings aufzuteilen, und anschließend die Elemente in die TIntStringList schreiben. Hier ist ein Beispiel, ich habe es schnell mit WideString durchprobiert, funktioniert einwandfrei.

Greetz
alcaeus