hallo
ich hab ein da ein projekt, welches ich mit jemanden zusammen entwickel. ich hab da also ein nicht selbst-geschriebenes modul. darin werden fragebögen geladen und dann die fragen gestellt. wenn ich das programm normal auf der festplatte ausführ, klappt es wunderbar. wenn ich das auf ne cd (.iso) mache, kann ich keine fragebögen-dateien mehr öffnen.
da ich das nicht durch debuggen kann, hat jemand ne idee wieso das auf der platte klappt und auf ner cd nicht? es wird beim lese-zugriff doch nicht geschrieben?
danke
der teil wo der öffnen-button geklickt wird.
Delphi-Quellcode:
if OpenDialog1.Execute then
begin
try
if ExtractFileExt(OpenDialog1.FileName) <> '.mcq' then
raise EInvalidInsert.Create('Fehler beim Laden der Datei "' + OpenDialog1.FileName + '!');
Fragebogen.OeffneFragebogen(OpenDialog1.FileName);
except
ShowMessage('Fehler beim Laden der Datei ' + OpenDialog1.FileName + '!');
Exit;
end;
öffnen prozedur der klasse
Delphi-Quellcode:
procedure TMCQData.OeffneFragebogen(DateiName: string);
var
I: integer;
begin
Assign(Datei, DateiName);
try
Reset(Datei);
except
Rewrite(Datei);
end;
SetLength(Fragen, FileSize(Datei));
I := 0;
while not(Eof(Datei)) do
begin
Read(Datei, Fragen[I]);
inc(I);
end;
Close(Datei);
end;