Einzelnen Beitrag anzeigen

Benutzerbild von Sir Rufo
Sir Rufo

Registriert seit: 5. Jan 2005
Ort: Stadthagen
9.454 Beiträge
 
Delphi 10 Seattle Enterprise
 
#5

AW: Form.ShowModal nicht erklärbare Fehlermeldung

  Alt 28. Sep 2012, 14:22
1.) Soweit ich weiß ist das, was du vorhast, nicht möglich. Genau kann ich's dir nicht erklären ... Aber du kannst kein modales Fenster "in" einem Panel anzeigen. Edit: Oder geht's etwa doch? Dachte das wäre aus Windows-designtechnischen Gründen nicht möglich?
Die Form, die eine andere Form Modal aufrufen will liegt in einem Panel nicht die Modal aufgerufenen

Warum ist der Aufruf eigentlich mit umständlichen langen Namen und dann auch noch die globale Variable für diese Form:
Delphi-Quellcode:
  administration_masterdata_detail_form := Tadministration_masterdata_detail_form(Self);
  administration_masterdata_detail_form.Position := poMainFormCenter;
  administration_masterdata_detail_form.ShowModal;
  administration_masterdata_detail_form.Free;
  administration_masterdata_detail_form := nil;
Warum nicht so?
Delphi-Quellcode:
procedure ShowModalForm( const AFormClass : TFormClass );
var
  aForm : TForm;
begin
  aForm := AFormClass.Create( nil ); // da wir uns selber um das Freigeben der Form kümmern, keine Owner mitgeben
  try
    aForm.Position := poMainFormCenter;
    aForm.ShowModal;
  finally
    aForm.Free;
  end;
end;
Aufruf ist dann lapidar
ShowModalForm( Tadministration_masterdata_detail_form );
Kaum macht man's richtig - schon funktioniert's
Zertifikat: Sir Rufo (Fingerprint: ‎ea 0a 4c 14 0d b6 3a a4 c1 c5 b9 dc 90 9d f0 e9 de 13 da 60)

Geändert von Sir Rufo (28. Sep 2012 um 14:30 Uhr)
  Mit Zitat antworten Zitat