We value your feedback.
Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!
i use this code for insert the records in a .dat file:
type TMyRecord = record Name: string; Surname: char; end; var Members: array[1..50] of TMyRecord;
and this code for read:
var F : file of TMyRecord; i : integer; begin AssignFile(F,'members.dat') ; Rewrite(F) ; try for j:= 1 to 50 do Write (F, Members[j]) ; finally CloseFile(F) ; end; end;
How can i add and read image or other resource on this .dat file?
var Member: TMyRecord F : file of TMyRecord; begin AssignFile(F,'members.dat') ; Reset(F) ; try while not Eof(F) do begin Read (F, Member) ; showmessage(member.name); showmessage(member.surname); end; finally CloseFile(F) ; end; end;
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
Join the community of 500,000 technology professionals and ask your questions.