Forum: Multimedia
Delphi
by Die Muhkuh,
13. Apr 2008
Ach, Du bist doch doof. :tongue:
Forum: Multimedia
Delphi
by Die Muhkuh,
13. Apr 2008
Und dann stellen wir noch sicher, dass auch immer der PathDelimiter dran ist:
procedure TForm1.Timer1Timer(Sender: TObject);
const Bilder: array of string = ('X_Wing3.jpg','X_Wing5.jpg','X_Wing7.jpg');
begin
Fortschritt := Fortschritt + 1;
Image1.Picture.LoadFromFile(IncludeTrailingPathDelimiter(ExtractFilePath(ParamStr(0))) + Bilder);
Timer1.Enabled := Fortschritt < 3;
end;
Forum: Multimedia
Delphi
by Die Muhkuh,
13. Apr 2008
Und ganz böse ist die Bilder von einem hardcodierten Pfad zu laden!
Kopiere die Bilder lieber ins Anwendungsverzeichnis Deines Programmes und hole Dir diesen Pfad mittels ExtractFilePath(Application.ExeName);