Forum: Win32/Win64 API (native code)
Delphi
by marabu,
12. Jun 2006
Hallo Hawkeye,
das einzige, was dagegen spricht, ist die Berufsehre - wir sollen weder Nebeneffekte erzeugen, noch sollen wir sie in unseren Programmen nutzen. Der Nebeneffekt hier ist, dass der Parser mehrfach aufeinander folgende Blanks wie eines betrachtet, wenn der Delimiter ein Blank ist.
Aber verführerisch einfach ist es schon ...
Gute Nacht
marabu
Forum: Win32/Win64 API (native code)
Delphi
by marabu,
12. Jun 2006
Nur der Vollständigkeit halber:
function CanonicalFileName(fn: TFileName): TFileName;
var
buf: array of Char;
pc: PChar;
begin
SetString(Result, PChar(@buf), GetFullPathName(PChar(fn), MAX_PATH, PChar(@buf), pc));
end;
Forum: Win32/Win64 API (native code)
Delphi
by marabu,
12. Jun 2006
Hi Martin,
ich bin mir nicht sicher, was du mit dem Ignorieren von doppelten backslashes meinst, aber die folgende Funktion liefert dir die Zerlegung einer commandline in einer StringList:
uses
Classes,
StrUtils;
function CreateParamStrings(const CommandLine: String): TStrings;