21-02-2009, 12:28 PM
السلام عليكم
عملت Record كالأتي
هل هذا الكود صحيح لعمل Record
عملت Record كالأتي
كود :
MyRecord = Record
FileName:String;
LineNumber: Integer;
BeforLineNumber: Integer;
AfterLineNumber;
end;
var
MyFile: File of MyRecord;
NewRecord: MyRecord;
Word1: Array [1..1000] of String;
F:Array [1..1000] of Integer;هل هذا الكود صحيح لعمل Record