[lazarus] Bug Report Update

[Mattias Gaertner]

On Mon, 16 Jun 2003 20:16:24 +0200
domin <dominz at wp.pl> wrote:

> Dnia pon 16. czerwca 2003 19:42, Mattias Gaertner napisa__:
> 
> > TCanvas in cancas.inc uses the Get/SetPixel functions of the
> > gtk-interface. Can you send me an example, where it does not work?
> 
> New Project, one button,  one TPaintBox (left,top<>0) + simple code:
> 
> procedure TForm1.Button1Click(Sender: TObject);
> var i,j: integer;
> begin
>   for i := 10 to 20 do
>     for j := 10 to 20 do
>        PaintBox1.Canvas.Pixels[i, j] := clBlue;
> end;

Still works for me. Blue square in the paintbox.

 
> //  And I can see funny little blue square begining at (10,10) of the
> _Form_//  BTW I'll try to download CVS again


Mattias