title image


Smiley Re: Verwenden der Funktion GetWindowsDirectory
//This tip is from http://delphimania.delphipage.de function GetWinDir: String; var dir: array [0..max_path] of char; begin GetWindowsDirectory(dir, max_path); result:=StrPas(dir); end; function GetSysDir: String; var dir: array [0..max_path] of char; begin GetSystemDirectory(dir, max_path); result:=StrPas(dir); end; procedure TForm1.Button1Click(Sender: TObject); begin label1.caption:=GetWinDir; label2.caption:=GetSysDir; end; mfg Hammer

geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: