Forum: Object-Pascal / Delphi-Language
Delphi
by Linkat,
17. Jan 2011
So nun habe ich doch die Lösung gefunden:
Hier ist der Link: http://www.delphipraxis.net/10009-dynamisch-erzeugt-aber-speicherverbrauch-bleibt-nach-ende.html
entscheidend ist:@Button.OnClick:=@SetzeColor;
Hier noch einmal mein Testprogramm:
var
Form :TForm;
Button :TButton;
Forum: Object-Pascal / Delphi-Language
Delphi
by Linkat,
12. Jan 2011
Ich möchte ja, dass das Ereignis bei Klicken auf den dyn. erzeugten Button wirkt. Irgendwie muß ja im Deklarationsteil die procedure für das Object Form bekanntgegeben werden.
Wahrscheinlich hat Bernhard (siehe #3) mit seinem Vorschlag:
nicht ganz unrecht, aber ich weiß nicht wie ich das umsetzen soll.
Gruß, Linkat
Forum: Object-Pascal / Delphi-Language
Delphi
by Linkat,
12. Jan 2011
Hallo Thomas,
vielen Dank für die schnelle und richtige Antwort. Es funktioniert tatsächlich.
Leider war mein Beispiel nicht ganz richtig. Auch ist die Bezeichnung meiner Forms unglücklich (#1 dyn. Form ist Form2, #4 dyn. Form ist Form).
Ich muss das OnClick-Ereignis ja auf meine dynamische Form Form und nicht auf die statische Form Form2 anwenden.
Wo muss ich die procdure SetzeColor...
Forum: Object-Pascal / Delphi-Language
Delphi
by Linkat,
11. Jan 2011
Hallo,
mit
procedure erzeugeForm2;
begin
Form2:=TForm.create(Form1);
Form2.Top:=screen.Width div 2;
Form2.Left:=Screen.Height div 2;
Form2.Width:=500;
Form2.Height:=400;