Komponente per Canvas kopieren/neu zeichnen

**Oldy**

Hi Leute
ich möchte eine Komponente (auch an eine andere Position) neu zeichnen.

Ich dachte mir, dass es evtl so geht:

Delphi-Quellcode:

			VAR

  x,y,

    pixel: integer;

BEGIN

  FOR x := 0 TO 65 DO BEGIN // 65 = Testbuttonbreite

      FOR y := 0 TO 25 DO BEGIN // 25 = Testbuttonhöhe

           pixel:=canvas.Pixels[x,y];

           canvas.Pixels[x+160,y]:=pixel;

        END;

    END;

geht aber leider nicht, es kommt nur eine Schwarze Fläche in Größe des Buttons.
Wo liegt der fehler?
Oder bin ich komplett auf dem Falschen Fuß?

**DeddyH**

Ich weiß zwar nicht, was das werden soll, aber schau Dir doch mal TCanvas.CopyRect an.

Komponente per Canvas kopieren/neu zeichnen

Komponente per Canvas kopieren/neu zeichnen

Re: Komponente per Canvas kopieren/neu zeichnen

Forumregeln

DeddyH Registriert seit: 17. Sep 2006 Ort: Barchfeld 27.542 Beiträge Delphi 11 Alexandria	#2 Re: Komponente per Canvas kopieren/neu zeichnen 12. Sep 2009, 18:21 Ich weiß zwar nicht, was das werden soll, aber schau Dir doch mal TCanvas.CopyRect an. Detlef *"Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen."* (Albert Einstein) Dieser Tag ist längst gekommen
	Zitat