Hi!
this code
procedure TForm1.DrawBtnClick(Sender: TObject);
{Draw some ellipses on the canvas - random size and color}
var
i:integer;
cx,cy:integer;
begin
with image1, canvas do
begin
for i:= 1 to 10 do
begin
cx:=random(width);
cy:=random(height);
On Wed, 23 Jan 2013 11:27:31 +0100
duilio foschi duiliofos...@euplan.com wrote:
Hi!
this code
procedure TForm1.DrawBtnClick(Sender: TObject);
{Draw some ellipses on the canvas - random size and color}
var
i:integer;
cx,cy:integer;
begin
with image1, canvas do
begin
for
Hi!
Please do your homework yourself.
Bye
Hansi
___
fpc-pascal maillist - fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal
Hello,
Quite easy. Abstract concept:
- Take one framebuffer `ImageBuffer`, whose contents is the final image
- Take another framebuffer `InteractionBuffer` whose contents is
everything that's interactive
- The InteractionBuffer shall be an overlay of the imagebuffer
So when you want to draw it
