MyStruct = record CameraID : string[255]; //пишем в бинарный файл, т.е. целиком весь объект end;
MyStructObj : MyStruct; BlockRead(File,MyStructObj, SizeOf(MyStruct) );