Zitat:
Gibt es da auch einen andere möglichkeit damit ich nur eine Datei pro film habe???
Jo!
Das ist eigentlich ganz einfach.
Du schreibst erst einmal deine ganzen Bilder in einen TFileStream.
Delphi-Quellcode:
var
FS:TFileStream;
begin
FS := TFileStream.Create(filename,fmOpenWrite);
FS.Seek(soFromEnd,0);
for i := 0 to bildercount-1 do
mybild[i].savetostream(FS);
FS.Free;
end;
So hättest du deine Bilder schon einmal in einer Datei.
Du kannst den Stream auch in OnFormCreate erzeugen und nur dann ein Bildhinzufügen wenn du es brauchst.
Um das ganze wieder zu lesen würde ich einen Timer verwenden.
Delphi-Quellcode:
var FS:TFileStream;
implementation
procedure FormCreate(Sender:TObject);
begin
.
.
FS := TFileStream.Create(filename,fmOpenRead);
FS.Seek(fmFromBeginning);
.
.
end;
Delphi-Quellcode:
procedure OnTimer(Sender:TObject);
begin
image1.picture.bitmap.loadfromstream(fs);
end;
In FormDestroy nicht vergessen den Filestream zu löschen!
Ich weiß nicht ob das geht, ich rate dir mal die Online Hilfe zu Streams zur Hand zu nehmen.