I'm working on a pascal project. And I want to append record on a binary file without overwriting it again.I've tried using the 'append();" statement but it doesn't work.
wongcc13
0
Newbie Poster
Recommended Answers
Jump to Posthi
append() works only with text files :Dprogram typed_files; uses crt; type newrec = record name:string[50]; job:string[20]; end; var one:newrec; f:file of newrec; is_created:boolean; choice:char; procedure press; begin write('Press enter to continue'); readln; end; procedure create_file; begin assign(f,'myfile.dat'); {$I-} rewrite(f); {$I+} if ioresult <> 0 then …
All 2 Replies
Reply to this topic
Be a part of the DaniWeb community
We're a friendly, industry-focused community of developers, IT pros, digital marketers, and technology enthusiasts meeting, networking, learning, and sharing knowledge.