Pääteohjaustehtäviä 9 / 4-8.11


1. TActionList

1.
Torstain luennon lopuksi esiteltiin TActionList - komponenttia. Tee komponenttia käyttäen ohjelma, jossa sekä menusta kahdesta eri kohtaa, formilla olevasta nappulasta että Ctrl+K:sta tulee sama tapahtuma:
	ShowMessage('Tapahtuma tuli!');
	1. Lisää ensin TActionList - komponentti.
	2. Tuplaklikkaa komponenttia ja Actions ikkunassa valitse hiiren oikealla
	   New Action.
	3. Täytä property uudesta actionista ja anna sille hyvä nimi
	4. Laita haluttu pikanäppäin.
	5. Lisää menut ja ja laita menun Actioniksi tuo em. action.
	6. Lisää vielä nappula jolle tulee sama Action.
2.
Lisää edelliseen ohjelmaan CheckBox, jonka ollessa ruksittuna nappula ja menut ovat aktiivisia, mutta kun ruksi poistetaan niin sekä menut että nappula menevät Enabled:=false - tilaan.

2. Lomakeen luominen funktiossa

3.
Katso demotehtävää 9.3 ja 9.4. Tee FormKysyInt:ia varten tarvittava testiohjelma valmiiksi.
	1. Luo päälomakkeen lisäksi uusi lomake FormKysyInt
	2. FormKysyInt:iin nappula OK, jolle ominaisuus ModalResult := mrOK
	   ja Cancel, jolla Cancel := true ja ModalResult := mrCancel.
	3. Poista FormKysyInt projektista.
	4. Poista globaali muuttuja FormKysyInt.
	5. Päälomakkeelle hiiren oikeasta napista mm:
	      i := KysyInt('Anna kokonaisluku',0); // Kysymys ja oletusarvo
	6. Funktio KysyInt siihen Unitiin, mihin FormKysyInt-kirjoitetaan.
	7. Funktion KysyInt koodiin FormKysyInt-dialogin luominen ja ShowModal.

3. Ini-tiedostot

4.
Kopioi hakemiston N:\kurssit\winohj\kaytto sisältö omaan hakemistoosi ja tutki ohjelmaa varit. Lue "käyttöohje" tiedostosta VariForm.pas. Miten ja miksi numeronäppäimen painallus hakee jonkin värikombinaation? Unitit IniFiles, IniName, kdouble löytyvät hakemistosta N:\Kave\k2000\kcomp.



Last update: pe 08.11.2002 13:28