Code:
program test;
uses crt;
type serviceType = record
portNumber : Integer;
portType : String [3];
end;
type dataRecordType = record
serviceName : String [15];
service : serviceType;
alias : String [20];
comment : String [50];
end;
type dataRecord = dataRecordType;
type fileType = file of dataRecordType;
var mySaveFile : fileType;
data : dataRecord;
anykey : char;
begin
assign (mySaveFile, 'output.dat');
rewrite (mySaveFile);
close (mySaveFile);
anykey := readkey;
end.
hab mein programm auf diesen code reduziert
eigentlich wird ja nur ne datei angelegt, also ne typendatei
aber irgendwie gehts auf einmal nicht mehr...
ich will dann ja per write (mySaveFile, data) den datensatz reinschreiben
soweit komme ich aber net, wenn die datei nicht mal angelegt wird
hat wer ne idee?