25. Unit1 модулининг Type бўлимига TFrom1 форма синфини аниклаш кисмидан сўнг маълумот ва файлнинг типини кўрсатинг. Бу 18-расмда кўрсатилган.
26. From1 формасига Dialogs компонентлар панелидан TSaveDialogs ва TLaodDialogs компонентларини жойлаштиринг.
27. Файл менюсидаги Саклаш пунктини, яъни TFrom1.N3Click процедурасини очинг ва 19-расмда кўрсатилган ўзгартиришларни ёзинг.
18-расм. Файл ва ёзув типларини эълон килиш.
19-расм. Матнларни файлга ёзиш процедураси.
28. Проектни сакланг ва уни ишга туширинг. Натижани кузатинг. Кундалик дастурига бир нечта матнларни киритинг ва сакланг. Ихтиёрий файлни кўриш (масалан: Fаr, NC, VC) дастурлари ёрдамида саклаган файлингизни очиб кўринг.
29. Файлни юклаш амалини бажариш учун файл менюсидаги Юклаш пунктини, яъни TFrom1.N4Click процедурасини очинг ва 20-расм кўрсатилган операторларни ёзинг.
20-расм. Файлни юклаш процедураси.
30. Проектни сакланг ва уни ишга туширинг. Натижани кузатинг.
31. Form1 формасидаги StringGrid1 компоненти учун OnDblClick ходисасида N8Click сўзини танланг. Бу амал танланган маълумотларда сичкончанинг чап тугмасини икки марта тез босиш натижасида тахрирлаш режимига ўтишлигини билдиради.
32. Проектни сакланг ва уни ишга туширинг. Натижани кузатинг.
Мустакил иш.
1. Янги проект тузинг: (File\New…\Application).
2. Ўзингизни папкангизга файлни Lab2b номи билан сакланг.
3. Ўзингизни вариантингизга (2-жадвалга каранг) мос топширикка дастур тузинг. Маълумотларни саклаш ва юклаш имконияти бўлиши шарт.
4. Проектни сакланг ва уни ишга туширинг. Натижани ўкитувчига кўрсатинг.
5. 2-Тажриба иши бўйича хисобот тайёрланг ва уни химоя килинг.
2 - Тажриба ишини бажариш учун вариантлар. 2-жадвал.
Do'stlaringiz bilan baham: |
