Opendialog bringt die Form zum Verschwinden

**Bjoerk**

Ich habe eine Form die modal aufgerufen wird. Dort wird per Speedbutton ein Opnedialog aufgerifen. Der Opendialog bringt die Form zum Verschwinden. Darüber hinaus bleibt auch ein ActiveControl ohne Wirkung. An was kann das denn liegen?

zusammenfalten · markieren

Delphi-Quellcode:

			procedure TStartForm.FileOpenSpeedButtonClick(Sender: TObject);

begin

  if OpenDialog.Execute then // -> Form Weg

  begin

    FFileName := OpenDialog.FileName

    Close; // OK.

  end;

end;

procedure TStartForm.FormActivate(Sender: TObject);

begin

  if FLastFiles.Count > 0 then

    AbrufenListBox.ItemIndex := 0;

  ActiveControl := AbrufenListBox;

end;

Opendialog bringt die Form zum Verschwinden

Opendialog bringt die Form zum Verschwinden

Forumregeln