Forum: Algorithmen, Datenstrukturen und Klassendesign
Delphi
by Sir Rufo,
10. Apr 2014
type
TForm1 = class( TForm )
Edit1 : TEdit;
procedure Foo;
end;
var
Form1 : TForm1;
implementation
Forum: Algorithmen, Datenstrukturen und Klassendesign
Delphi
by Sir Rufo,
7. Apr 2014
Das Benutzen der globalen Variablen für die Forms ist unüberlegt.
Das Benutzen der globalen Variablen für diese Formklasse gleicht einem Schuss ins eigene Knie.
Forum: Algorithmen, Datenstrukturen und Klassendesign
Delphi
by Sir Rufo,
7. Apr 2014
Der Unterschied ist, dass in TForm.OnClose
immer falsch FreeAndNil( Form1 );
meistens falsch Form1 := nil;, auf jeden Fall ungeschickt und die Instanz wird nicht freigegeben
richtig Action := caFree;
ist.
Immer unter dem Gesichtspunkt, dass die Form-Instanz auch wirklich freigegeben werden soll.