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?
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;