Einzelnen Beitrag anzeigen

WIng2005

Registriert seit: 20. Mär 2006
Ort: Thüringen
388 Beiträge
 
Delphi XE Starter
 
#9

Re: Verhindern, dass eine Form erzeugt wird.

  Alt 11. Apr 2009, 01:32
Hallo,

ich bin mit der Thematik noch nich wirklich vertraut, aber schließlich ist man ja lernfähig .
Liege ich mit folgendem korrigiertem Code diesmal richtig?:

Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
begin
Form2:=TForm2.create(Form2);
Form2.Show;

end;


//////////////////////////////

constructor TForm2.create(AOwner: TComponent);
Begin
if form1.Edit1.Text<>'losthen
  raise exception.Create('Fehler');

inherited create(Form2);
end;
Könntest du mal ein paar worte zum Thema "Besitzer" verlieren?
Wo würde der zum obigen Beispiel der Unterschied sein, wenn ich statt TForm2.create ein application.createform(TForm2,Form2)
einsetze? Vielen Dank für deine Hilfe.....
MFG
Steffen
  Mit Zitat antworten Zitat