Problem beim Starten des Programms via Datenverknüpfung

[Chaoten-Joe]

Super! Hat geklappt! Habe folgendes gemacht, da in der Registry der Programmpfad gespeichert ist:

Delphi-Quellcode:

begin
  Reg := TRegistry.Create;
  try
    //Reg.RootKey := HKEY_LOCAL_MACHINE;
    Reg.RootKey := HKEY_CURRENT_USER;
    Reg.OpenKey('\Software\Gebietskartei',True);
    with Reg do
    begin
      try
        Mainroot:=ReadString('Path');
      except end;
    end;
  finally
    Reg.CloseKey;
    Reg.Free;
  end;
  if Mainroot<>'' then SetCurrentDir(Mainroot);
  Application.Initialize;
  ...

... und habe dann zuvor noch folgenden Code eingebaut:

Delphi-Quellcode:

function SetCurrentDir(const ADir: string): Boolean;
begin
  Result := SetCurrentDirectory(PChar(ADir));
end;

Er liest nun den korrekten Pfad aus der Registry ein und setzt den Pfad vor der Erstellung aller Formulare. Klasse!

Danke und schönen Abend!
Das ging aber echt fix!