Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by DeddyH,
25. Mai 2007
Hallo,
mal schnell dahergeschrieben:procedure GetDirsInPathVariable(sList: TStrings);
var s: string;
begin
(*Achtung: die Umgebungsvariable Path kann auch länger werden als MAX_PATH,
man muss sich daher über eine vernünftige Puffergröße Gedanken machen*)
SetLength(s,MAX_PATH);
GetEnvironmentVariable('path',PChar(s),Length(s) - 1);
SetLength(s,StrLen(PChar(s)));
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by DeddyH,
25. Mai 2007
Wozu soll das gut sein? Außerdem kann das Programm, das sich im Suchpfad befindet, ein ganz anderes sein als jenes, das der Benutzer auswählt.