@mkinzler:
Dankle!
...wusste ich nich
So, hier nun mein endgültiger Code, habe mich für himitsu's Methode entschieden:
Delphi-Quellcode:
function StrToPath(const s: String): String;
var i: Integer; b: Boolean;
begin
i := 1;
b := False;
while (i <= Length(s)) and ((s[i] <> ' ') or b) do
begin
if s[i] = '"' then
b := not b;
Inc(i);
end;
Result := StringReplace(Trim(Copy(s, 1, i-1)), '"', '', [rfReplaceAll]);
Result := StringReplace(Result, '/', '\', [rfReplaceAll]);
Result := StringReplace(Result, '\\', '\', [rfReplaceAll]);
end;
Sieht ein bisschen komisch aus, mit den ganzen StringReplace's am Schluss.
Aber warum eigentlich nicht...
Hmmm....
Ist doch ein Fehler drin 
@himitsu:
Wenn ich einen Dateinahmen ohne " " habe und auch ohne Parameter und der Dateinamen enthält Leertasten...