Einzelnen Beitrag anzeigen

Benutzerbild von Sir Rufo
Sir Rufo

Registriert seit: 5. Jan 2005
Ort: Stadthagen
9.454 Beiträge
 
Delphi 10 Seattle Enterprise
 
#25

AW: Programm mit Zugriffsverletzung - 1. PC funktioniert - 2. Nicht

  Alt 14. Apr 2014, 00:38
Um zu erkennen, warum die Bilder nicht geladen werden (bei mir werden alle 10 Bilder angezeigt), ersetz doch mal die Execute-Methode hiermit (damit werden die Exceptions aus dem Thread angezeigt):
Delphi-Quellcode:
procedure TSplashImagesLoader.Execute;
begin
  if not Assigned( Form ) or not Assigned( FImages )
  then
    Exit;

  try
    Synchronize( FForm.ShowSplashLoading );
    try
      FImages.Load;
    finally
      Synchronize( FForm.HideSplashLoading );
    end;
  except
    on E : Exception do
      Synchronize(
          procedure
        begin
          Application.ShowException( E );
        end );
  end;

end;
Kaum macht man's richtig - schon funktioniert's
Zertifikat: Sir Rufo (Fingerprint: ‎ea 0a 4c 14 0d b6 3a a4 c1 c5 b9 dc 90 9d f0 e9 de 13 da 60)

Geändert von Sir Rufo (14. Apr 2014 um 00:42 Uhr)
  Mit Zitat antworten Zitat