Einzelnen Beitrag anzeigen

ts_abc

Registriert seit: 22. Sep 2003
20 Beiträge
 
Delphi 10 Seattle Professional
 
#6

AW: Thread Exception beim laden von Thumbnails

  Alt 21. Jan 2019, 22:48
Puh Ok, ich hoffe ich habe den Fehler gefunden, jetzt läuft alles wie es soll. Der Fehler wurde wie es aussieht ausgelöst, in der Komponente TFileThumb. Diese arbeitet ebenfalls mit einem Bitmap aus dem Grunde, da das BS einen HBitmap als Thumbnail liefert. Hierbei war natürlich kein Look, Unlook beim arbeiten mit dem BMP drin. Somit flog mir das Ganze an dieser Stelle:
Delphi-Quellcode:
procedure TAnThumbThread.DoExecute;
var tBmp, tmpBmp: TBitmap; iPic: String; LParams: TAnThumbParam;
begin
  ...
    try
      if LParams.BuildType = btImg48Thumb then
        if FFileThumb.Size <> 128 then FFileThumb.Size := 128
      else
        if FFileThumb.Size <> 256 then FFileThumb.Size := 256;

      ...
    finally
      ...
    end;

  ...
end;
um die Ohren.

@Bernhard Geyer
Ne, ich werde mich hüten das zu mach , ich übertrage es Natürlich nicht direkt sondern Zeichne es auf dem Output.

Ok Luckie Danke, aber wieso in das Thema Multimedia?
  Mit Zitat antworten Zitat