Also, das ist komisch, bei mir geht es so einwandfrei:
Delphi-Quellcode:
var
Form1: TForm1;
FirstStart: boolean = true;
implementation
{$R *.dfm}
procedure TForm1.FormActivate(Sender: TObject);
begin
if FirstStart then
begin
OpenDialog1.Execute;
FirstStart := false;
end;
end;