Mitä kaikkea tuo Form:n Close tekee
(Toki tiedän että sulkee kyseisen ikkunan)?
Form Close
kysymys kysymys
3
314
Vastaukset 3
- Mika0800
F1 peliin!
Delphissä on hyvä online -ohjejärjestelmä, käytä sitä!
1. Form.Close; sulkee ikkunan, halutessasi voit laatia OnClose -käsittelijän, jossa valitset, miten suljetaan:
caFree, caHide (closeaction)
jos ohjelman main form suljetaan, päättyy ohjelma.- jjjjjjjjjjjjjjj
Jotain vinkkiä
Type
TFormLuokka = class (TForm)
Button1: TButton;
procedure FormClose(Sender: TObject; var CloseAction: TCloseAction);
procedure FormCreate(Sender: TObject);
private
{ private declarations }
public
{ public declarations }
end;
{ TForm1 }
TForm1 = class(TForm)
Button1: TButton;
procedure Button1Click(Sender: TObject);
...
procedure TForm1.Button1Click(Sender: TObject);
var f:TFormLuokka;
begin
f := TFormLuokka.Create (Application);
f.show;
end;
procedure TFormLuokka.FormClose(Sender: TObject; var CloseAction: TCloseAction);
begin
inherited;
CloseAction := caFree;
end
- TCloseAction
caHide = vain piilottaa . Ei vapauduta resursseja (muistia). Resurssien vapaudutus myöhemmin.
caFree = vapauttaa resurssit.
Ketjusta on poistettu 0 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
- 1081275
- 45891
Myönnetään, tunnen lämpimiä tunteita kohtaasi
Vaikutat tosin liian hyvältä ollaksesi totta. Komeita miehiä on maailma pullollaan mutta sinussa on jotain.....50716- 70656
Perhoseni (miehelle)
Miksi et usko, että mun rakkaus sinuun on aitoa ja vilpitöntä? Tai että se oli jo silloin? Miksi ajattelet, ettet ole r123632- 67606
- 53587
- 55535
Onko Sofia jälleen jätetty?
Moni asia viittaisi siihen, että hän on jälleen sinkku.93463Mitä jos...
Susta tykätään poikana enemmän, kun tyttönä? Miten asian käsittelet tai otat tiedon vastaan? T nainen gubetellija herät142443- 5438
- 34437
- 51435
Nainen, mitä mieltä olet kodittomista?
Ja heistä jotka eivät kykene huolehtimaan asioistaan, itsestään eikä terveydestään? Miten heidän kanssaan tulisi toimia?113434Mies, näetkö minut myös
Seksuaalisena ihmisenä ja naisena? Haluatko minua seksuaalisesti? Vai olenko mielestäsi tyttönen?19430- 49427
Rekat seisovat dieselin hinnan takia . Ala ei kestä tällaista hintatasoa, sanoo yrittäjä .
EU:n kallein diesel on kova paikka kuljetusalalle. Ajoja on jätetty ajamatta kannattavuusongelmien vuoksi, sanoo alan e82417- 52403
- 42390
Veikkauksen asiamiehen provikat?
Minkä verran peliautomaatin pitäjä saa peliautomaatin tuotosta?28379