Position der Exe bestimmen

[Luckie]

Zitat von himitsu:

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

Ja, aber die Arbeit kommt dann, wenn der Kunde dir sagt, dass dein Programm seine eigenen Dateien nicht findet.

Zitat:

Zum anderen Kann es manschmal auch vorteile haben.

Ich wüßte jetzt nicht aus welchen Gründen man Roulette mit den Pfaden spielen sollte.

Zitat:

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.

[/quote]
Du hast nicht ganz gelesen, was ich geschrieben habe oder? Bitte noch mal lesen, besonders die Stelle mit dem Dateiöffnen Dialog.