الانواع :
من الممكن ان تقوم بإنشاء نوع متغيرات خاص بك بإستخدام الامر type .
النّوع الاول الذي يمكن ان تعمله هو نوع records (سجلات) . السجلات هي عباره عن متغيّران او اكثر من انواع مختله في واحد . على سبيل المثال ان يكون المستخدم طالب و لديه رقم و اسم الطالب . كيف سوف ننشئ نوعاً من البيانات :
شيفره برمجيه :
program Types;
Type
Student = Record
Number:
Name;
end;
begin
end.
بعد ان تنشئ النوع يجّب ان تعلن عن متغير من النوع الذي قمنا بإنشاءه لكي يمكننا استخدامه :
شيفره برمجيه :
program Types;
Type
StudentRecord = Record
Number:
Name;
end;
var
Student: StudentRecord;
begin
end.
للوصول إلى العدد و الاسم من السجل يجب ان تتبع الآتي :
شيفره برمجيه :
program Types;
Type
StudentRecord = Record
Number:
Name;
end;
var
Student: StudentRecord;
begin
Student.Number := 12345;
Student.Name := 'John Smith';
end.
النوع الآخر هو set , النوع set ليس له فائده كبيره , و اي شئ يمكنك عمله مع set يمكن ان يعمل بسهوله في طريقة اخرى . على سبيل المثال لدينا نوع set يدعى Animal و المعلومات المخزنه dog , cat و rabbit :
شيفره برمجيه :
program Types;
Type
Animal = set of (dog, cat, rabbit);
var
MyPet: Animal;
begin
MyPet := dog;
end.
لا يمكنك استخدام Readln او Writeln في sets . يمكنك ان تنشئ مدى من المتغيرات من 'a' إلى 'z' . في هذا النوع يمكنك ان تختبر إذا كان المتغير من ضمن المدى :
شيفره برمجيه :
program Types;
uses
crt;
Type
Alpha = 'a'..'z';
var
Letter: set of Alpha;
c: Char;
begin
c := ReadKey;
if c in [Letter] then
Writeln('You entered a letter');
end.
