end;
With operatori
with operatori dastur matnida yozuv o‘zgaruvchisi nomini ko‘rsatmay turib maydon nomidan
foydalanish imkonini yaratadi. With operatorining umumiy ko‘rinishi quyidagicha bo‘ladi:
with Nom do
begin
( dastur buyruqlari }
end;
bu yerda:
nom — yozuv o‘zgaruvchisi nomi;
with — Delphining yordamchi so‘zi bo‘lib, yozuv nomi maydoniga murojaat
boshlanganligini bildiradi va end bilan chegaralanadi.
Masalan, dasturda yozuv e‘lon qilingan bo‘lsa
student:record // talaba haqida ma‘lumot
f_name: string[30]; // familiyasi
l_name: string[20]; // ismi
address: string[50]; // manzili
end;
va talabalar haqidagi ma‘lumotlar muloqot oynaning Edit1, Edit2 hamda Edit3 maydonlarida
joylashgan bo‘lsa, u holda
student.f_name := Editl.text;
student.l_name := Edit2.text;
student.address := Edit3.text;
buyruqlar ketma-ketligining o‘zrniga quyidagicha yozish mumkin:
Do'stlaringiz bilan baham: |