Q
qingniao
Unregistered / Unconfirmed
GUEST, unregistred user!
for j:=0 to 145 do
with image1.Canvas do
begin
Brush.Color:=clgreen;
Pen.Width:=1;
LineTo(image1.Left+146-j,image1.Top+36);
moveto(image1.Left+146-j,image1.Top+byterecieve[j] div graphicscale);
end;
with image1.Canvas do
begin
Brush.Color:=clgreen;
Pen.Width:=1;
LineTo(image1.Left+146-j,image1.Top+36);
moveto(image1.Left+146-j,image1.Top+byterecieve[j] div graphicscale);
end;