Delphi-Quellcode:
if (s<>'') and (s[1]='"') then
begin
SL.DelimitedText := s;
Result := SL[0];
end
else
Result := s;
Zitat von
Martin K:
gibt es evtl. Vorteile in euren Codes gegenüber meinem?
Ja ... der Dateiname muß nicht unbedingt zwischen "" stehen, wenn ein Parameter angehängt wurde,
dieses ist "nur" notwendig, wenn Leerzeichen im Dateinamen sind.
Bei dem Code bleibt der Parameter angehängt, wenn der Dateiname nicht in "" eingeschlossen ist.