Pääteohjaustehtäviä
9 / 31.10-1.11
1. TCP/IP
- 1.
- Kokeile
muutaman kaverin kanssa (siis toisen koneen välillä)
VespaCadin
(
avaa
vesal
,
avaa
g
)
TCP/IP-versiota
(voit myös kopioida valmiin exen
vespacad.exe).
Komponentit menevät hakemistoon ..\..\comps, joten se Unittien
hakupolkuun. Yksi ilmoittautuu serveriksi ja muut kuuntelemaan (pitää
katsoa
host-kohtaan
serverin nimi, tai mahdollisesti jopa IP-osoite, näkee esim.
hostname
tai
ipconfig
komentorivillä). Kaikki voivat sitten piirtää samaan kuvaan.
Voitte kokeilla myös käynnistää kuuntelijaksi hakemistosta
vclclx\comps\tcpip
ohjelman
tcpiptestVCL.exe.
Tällöin näkee liikenteen tekstimuodossa. Toisaalta antamalla
protokollan mukaisia komentoja, voi myös tekstiohjelmasta ohjata piirtoa.
Tekstiohjelmalla voi myös keskustella keskenään. Samaan
koneeseen voi käynnistää molempia ohjelmia useita versioita,
kunhan vain yksi toimii palvelimena/portti.
- 2.
- Katso
tiedostosta
vclclx\comps\tcpip\tcpiptest.pas
kuinka voit toimia WWW-palvelimena ja asiakkaana jo kokeile kumpaakin.
- 3.
- Katso
RFC921
http://www.faqs.org/rfcs/rfc821.html
esimerkki Appendix F ja lähetä itsellesi sähköpostia koneen
smtp.jyu.fi kautta. Muista \r\n aina rivien loppuun.
2. TActionList
- 4.
- Erään
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.
-
-
- 5.
- 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.
3. Lomakeen
luominen funktiossa
- 6.
- 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.
4. Ini-tiedostot
- 7.
- 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\KaveOpt.