Hallo Leute,
hab ein kleines Problem. Habe das Firemonkey Sample "FlipViewDemo" etwas abgeändert. Funktioniert soweit aber auf dem Entwicklungs PC läuft es beim Laden der Bilder ohne Probleme.
Auf dem PC wofür das Programm bestimmt ist, kommt eine Zugriffsverletzung und zwar in Form von "Zugriffsverletzung bei Adresse .....A14554 in Modul 'ScreenPlayer.exe'. Lesen von Adresse 0000000000000000".
Die Bilder werden von einem Ordner geladen (JPEG's) und im Sample Programm in einem Thread geladen im Hintergrund.
Auf dem Entwicklungs-PC läuft alles Problemlos auf dem anderen kommt der Fehler. - Selben Bilder und Anzahl wird verwendet.
2. PC wo die Zugriffsverletzung kommt: Zotac nano AQ-01 mit Samsung EVO 120 GB und 4GB
RAM - CPU AMD A4-5000
- Beides Win7 Pro 64Bit
Debuggen kann ich auch nicht da Delphi den Prozess nicht "erzeugen" kann. Hab schon Delphi mit admin Rechten gestartet aber bringt auch nix. Kann das Programm nur ohne Debugger zum laufen kriegen.
Hat jemand eine Ahnung woran das liegen könnte?
Hier die Ladefunktion (nichts verändert gegenüber des Samples von Embarcadero).
Delphi-Quellcode:
procedure TImageDataSource.Load;
var
SR: TSearchRec;
Res: Integer;
I: Integer;
ImagesFilter: string;
begin
I := 0;
// Find all images
ImagesFilter := ImagesPath + '*.jpg';
Res := FindFirst(ImagesFilter, faAnyFile, SR);
while Res = 0 do
begin
SetLength(FImages, I + 1);
try
FImages[I] := TBitmap.CreateFromFile(ImagesPath + SR.Name);
except
showmessage('Fehler');
end;
Res := FindNext(SR);
Inc(I);
end;
if Length(FImages) > 0 then
FCurrentIndex := 0
else
FCurrentIndex := -1;
end;
Danke im vorraus!