BitBlt und kopieren von Bitmaps

lars · Hält's aus hier Beiträge: 6

Hallo !
Ich habe das Problem, daß bei mir das kopieren von BitMaps mit BitBlt und anderen Optionen als SrcCopy nicht funktioneiert, wie es soll. Es kommt einfah das ergebnis wie mitSrcCopy. Woran könnte das liegen?
Und aknn mir auch jemand sgane wie MaskBlt funtioniert, daß habe ihc irgendwie auch nicht das gewünschte Resultat, trotz intensivem lesens der Hilfe (Ich habe XP und Delphi 5, kann es sein, daß die nicht kompatibel in diesem Punkt sind?)
Lars

Gast Erhaltene Danke: 1

Vielleich machst du etwas falsch. Hier ein Beispiel mit dem du ein wenig experimentieren kannst:

markieren

Quelltext

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:

procedure TForm1.Timer1Timer(Sender: TObject);
var
  Can: TCanvas;
begin
  Timer1.Interval := 500;
  Can := TCanvas.Create;
  try
    Can.Handle := GetWindowDC(GetDesktopWindow);
    BitBlt(Canvas.Handle, 0, 0, Screen.Width, Screen.Height, Can.Handle, 0, 0,
      NOTSRCCOPY); // SRCCOPY
    
  finally
    ReleaseDC(0, Can.Handle);
    Can.Free 
  end;
end;

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme