Deutsches Lazarusforum

Das Image liegt am richtigen Ort, falls du das meinst.

Es werden auch andere jpgs geleaden das funktioniert alles prima. wie schon gesagt, kommt der Fehler nicht auf allen Windows-Systemen vor.

Diese Application wird als CD-ROM ausgeliefert mit allen benötigten Dateien. Diese CD wird gestartet ...

nein, es liegt lokal
ExtractFilePath(ParamStr(0)) -> gibt den pfad zur exe zurück.
zb: c:/meinProgramm/...

Wie gesagt, ich kann den Fehler nicht nachbauen oder erzeugen.
Ich denke mal, das es an diesen zeilen liegen muß:

okBild: array[0..1] of TBitmap;

in TToolF.FormCreate(Sender: TObject);
okbild[0] := TBitmap.Create;
okbild[1] := TBitmap.Create;

wenn formular angezeigt werden soll:
okbild[0 ...

Hi all,

ich hab hier ein problem mit einer Fehlermeldung, die bei mir am Rechner Nicht auftaucht, aber leider auf andern Rechnern.

Hier die Fehlermeldung:

Failed to Create bitmap

Press OK to ignore and risk data corruption
Press Cancel ti kill the Programm

Ich hab absolut keine Ahnung woran ...

Leider kann man das so nicht machen, da man teilweise sehr schnell die einzelnen Seiten durchklicken kann. Das würde die gesammte bilderstrecke Ruckelig und Unprofessionell aussehen lassen. Aber evtl kann man bei jedem Popup, bzw bei jeder anfangenden Bilder-Strecke einfach vorher die Bilder laden ...

Momentan werden die Bilder von der Platte geladen, dauert halt 15sec. Von der CD dauert es genau so lange (+3sec). Werden die bilder nicht erst beim anzeigen decodiert? Der speicherbedarf steigt ja nicht in die höhe nach dem laden... Wenn man ein bild bespielsweise in Photoshop öffnet, welches 100MB ...

Das Programm soll von CD laufen, nicht von der Platte. Ich bin der Meinung, dass wenn ich jedes bild einzeln lade es evtl in der Summe noch länger dauert, da jedesmal das CD laufwerk wieder anstarten muß. Es sind halt von jedem Screen die hintergrund bilder, man drückt auf weiter, dann kommt sdas ...

Hi,

ich würde gerne auf dem schnellsten weg 136 jpeg (sind ca 26 Mb) in den Speicher laden. am besten beim Starten des Programms. Im moment mach ich folgendes:
for i := 0 to 6 do begin
Images[i][0] := TJPEGImage.Create;
Images[i][1] := TJPEGImage.Create;
Images[i][2] := TJPEGImage.Create ...