Danke! Das werde ich mir künftig zu herzen nehmen.
Teste jetzt gleich die Änderungen, melde mich dann nochmal, ob es geklappt hat.
EDIT
Hat nun geklappt, im FormCreate kam er damit wohl nicht klar. Danke an alle.
Delphi-Quellcode:
private
{ Private-Deklarationen }
var
ini: TIniFile;
firstrun:boolean;
bf2modtools:string;
procedure TForm1.FormActivate(Sender: TObject);
begin
if firstrun then
begin
if SelectDirectory('Select a directory', 'C:\', bf2modtools) then ShowMessage(bf2modtools);
end;
end;
Kann geschlossen werden