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ß?