Was kann Paint, was ich nicht kann? ( Clipboard pasten )

[DGL-luke]

@Elvis: Sorry, bin da nicht so bestückt... ich werd aber heute noch die D2006 Pro SSL bestellen.
(D3 Professional hab ich noch...)
(btw: SKU?)

@Muetze1: Ich hab aber keine Ahnung, wo die AV herkommt. Die Breakpoints wollen nämlich irgendwie nicht, deshalb auch das showmessage-zeugs. Ich poste hier noch mal die komplette routine:

Delphi-Quellcode:

procedure TFMain.SBPasteClick(Sender: TObject);
var pic: TPicture;
    b: TBitmap;
    h: HBITMAP;
begin
  pic := TPicture.Create;
  b := TBitmap.Create;

 if Clipboard.HasFormat(CF_BITMAP) then
    begin
      Showmessage('CF_BITMAP');
      h := Clipboard.GetAsHandle(CF_BITMAP);
      b.Handle := h;  // Ich glaube, die AV kommt hier. Eventuell muss man dem bitmap ja noch sagen, es soll ein WinAPI-Handle jetzt bekommen?!
    end
  else
   Exit;

  LoadImage(pic);
  pic.Free;
end;

@SirT: Ja, vermute ich auch... allerdings funktionierts mit einem Windows-Screenshot.