Avtomatika va elektrotexnologiya

with student do begin 
f_name := Edit1.text;  
f_name := Edit2.text;  
address := Edit3.text;  
end; 
  
Yozuvlarni faylga kiritish va chiqarish 

---

Yazuvlarni  faylda  saqlash  ham  mumkin.  Dastur  yordamida  yozuv  o‘zgaruvchining 
qiymatlarini  faylda  saqlash  yoki  fayldan  olish  uchun  fayl  e‘lon  qilish  kerak  bo‘ladi.  Uning 
komponent tipi esa ―yozuv‖ bo‘ladi. Masalan, quyidagi buyruqlar 
type 
ТРеrson = record 
f_riame: string [20] ; 
l_name: string[20]; 
address: string[50]; end; var 
f: file of TPerson; 
yozuv tipi Tperson bo‘lgan faylni e‘lon qiladi. 
Yozuv  fayli  bilan  ishlash  jarayoni  amaliy  jihatdan  oddiy  fayllar  bilan  ishlashdan  hech 
qanday farq qilmaydi. Birinchi navbatda fayl o‘zgaruvchisini e‘lon qilinadi va bu o‘zgaruvchini 
Assign protsedurasi yordamida aniq bir fayl bilan bog‘lanadi. Keyin faylni ochish kerak (o‘qish 
uchun,  yozish  uchun  yoki  qo‘shish uchun). Shundan keyin  yozuvni  fayldan o‘qish  yoki  faylga 
yozish mumkin.