Get Program Directory
Get program directory.
procedure TForm1.Button1Click(Sender: TObject);
begin
Edit1.Text := ExtractFilePath(Application.exename);
end;
...
...
...
...
...
0 comments Thursday 15 Feb 2007 | Delphi Tutorial | Files
...
...
...
...
...