Návrhy vylepšení jazyka Delphi: Porovnání verzí
Skočit na navigaci
Skočit na vyhledávání
(Založena nová stránka: =Nepoužívaní globálních proměnných= Přesun k plně objektovému programování. Nepoužívání globálních proměnných jako Application, FormX, Screen, Mouse, a…) |
Bez shrnutí editace |
||
Řádek 36: | Řádek 36: | ||
end;</pre> |
end;</pre> |
||
[[Kategorie: |
[[Kategorie:Programování]] |
Verze z 11. 8. 2010, 11:40
Nepoužívaní globálních proměnných
Přesun k plně objektovému programování. Nepoužívání globálních proměnných jako Application, FormX, Screen, Mouse, aj. Extrémně by byla použita pouze jediná globální proměnná něco jako System.
Namísto klasického
begin Application.Initialize; Application.CreateForm(TMainForm, MainForm); Application.CreateForm(TSecondForm, SecondForm); Application.Run; end.
k objektovému
type TMyApplication = class(TApplication) MainForm: TMainForm; SecondForm: TSecondForm; constructor Create; override; destructor Destroy; override; end; procedure TMyApplication.Create; begin inherited; MainForm := TMainForm.Create(Self); SecondForm := TSecondForm.Create(Self); end; procedure TMyApplication.Create; begin MainForm.Free; SecondForm.Free; inherited; end;