stru =Record
n:string;
v:byte;
end;
Seklinde tanim yaptim.
Tablo: array [0..10] of stru; diyebiliyoruz.
Fakat derdim Tabloyu const tanimlamak ve icine degerleri programi yazma asamasinda doldurmak.
Bunun yolu varmi?
Mesela amacim asagidaki gibi tanimın cons olanını yapmak.
Tablo[0].n:='PIC' ; Mesela Tablo[0].v:='16' ;
Tablo[1].n:='ATM' ; Mesela Tablo[0].v:='24' ;
Tablo[2].n:='ZLG' ; Mesela Tablo[0].v:='08' ;
Şöyle;
Type
TDenemeRecord = Record
Number : Integer;
Name : String;
Description : String;
End;
Const
cDenemeRecordlari : Array [0..2] Of TDenemeRecord =
(
(Number: 0; Name: 'isim1'; Description : 'yok'),
(Number: 1000; Name: 'isim2'; Description: 'Description1'),
(Number: 2000; Name: 'isim3'; Description: 'Description2')
);