Position der Exe bestimmen

[himitsu]

Das ersparrt aber viel arbeit, da man dann keine Pfade mehr berechnen brauch.

Zum anderen Kann es manschmal auch vorteile haben.

Aber wenn's dennoch vom Programmverzeichnis ausgehn soll, dann behebt man das mit einer ganz kleinen Zeile, nach welcher man ganz einfach mit relativen Phafen weiterarbeiten kann

Code:

Program Project1;

Uses [color=red]SysUtils, [/color]Forms,
  Unit1 in 'Unit1.pas' {Form1};

{$R *.res}

Begin
  [color=red]SetCurrentDir(ExtractFileDir(ParamStr(0)));[/color]
  Application.Initialize;
  Application.CreateForm(TForm1, Form1);
  Application.Run;
End.