Registriert seit: 28. Feb 2005
Ort: Berlin
281 Beiträge
Delphi 7 Professional
|
Re: Image Problem???
16. Nov 2005, 09:49
Hallo,
Ich hab es mal mal BitBlT ausprobiert , da passiert bei mir nix
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
begin
BitBlt(Image1.Canvas.Handle, 0, 0, PaintBox1.Width div 2, PaintBox1.Height,
PaintBox1.Canvas.Handle, 0, 0, SrcCopy);
end;
Hab ich da noch was vergessen?
Gruss Bernd
Bernd Es ist keine Schande, nichts zu wissen, wohl aber, nichts lernen zu wollen.
Sokrates
|