Zahiriddin muhammad bobur nomidagi andijon davlat universiteti
function MulC(x, y: TComplex): TComplex; stdcall
tải về 0.79 Mb.
|
- Điều hướng trang này:
- Assign
| function MulC(x, y: TComplex): TComplex; stdcall;
External 'Cmplx' index 3; function DivC(x, y: TComplex): TComplex; stdcall; External 'Cmplx' index 4; Implementation end. Boshqa tilda yozilgan DLL protseduralariga murojaat qilinganda ularning tashqi nomi Delphi qoidasiga to’g’ri kelmasligi mumkin. Masalan C++ tili identifikatorlarda “@” simvolidan foydalanishga ruxsat beradi. Bu xolda Delphi qoidasiga mos nom berib name suzidan sung asl nomini ko’rsatish kerak. Masalan: function MyFunction: WordBool; stdcall; external 'MyDLL' name '_MyFunction@12' Fayllar bilan ishlash funksiya va protseduralari Kiritiladigan va chiqariladigan ma’lumotlar soni ko’p miqdorda bo’lsa ularni faylda saqlash dasturda qulaylik tug’diradi. Bu ma’lumotlar oddiy matn (tekst) fayllarida saqlanadi. Fayl o’zgaruvchisi dastur bosh qismida e’lon qilinadi, ya’ni Type f=text; Var fx:f; bu yerda f -fayl tipi, oddiy matn faylni bildiradi; fx-fayl o’zgaruvchisi. Kerakli fayldan ma’lumotlarni o’qishga tayyorlash uchun Assign va Reset funksiyalari ishlatiladi. Assign-fayl o’zgaruvchisi bilan ososiy fayl orasida aloqa o’rnatadi. Assign (fx,’c:\a\f1.txt’); Reset-faylni topib uni ishga tayyorlaydi. Reset (fx); Bu yerda fx- fayl o’zgaruvchisi; ‘c:\a\f1.txt’-c: diskning A katalogidagi fx.txt fayldan o’qishni bildiradi. Fayldagi ma’lumotlarni o’qish uchun Read funksiyasi ishlatiladi. Read ( Misol. Read (fx, x,y,z,A[i],B[I]); Fayldan o’zgaruvchilar yoki massivlar qiymatlarini o’qib bo’lgandan keyin fayl yopiladi. Faylni yopish quyidagi funksiya yordamida bajariladi. Close (fayl o’zgaruvchisi); Misol. Close (fx); Misol 1. C: diskdagi AA katalogdagi AB fayldagi ma’lumotlarni o’qib A va B massivlarga joylashtiring. Fayl ma’lumotlari strukturasi quyidagicha. 15.2 20.5 25.5 50.2 52.4 . . . . . . . ya’ni fayl strukturasi ikki ustundan iborat ma’lumotlar to’plamidan iborat. tải về 0.79 Mb. Chia sẻ với bạn bè của bạn:
|