有人知道如何在FORM中画一个“点”吗???XZXCAZ 画一个象素不就可以了吗! Canvas.MoveTo(200,200); Canvas.LineTo(201,201); 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 procedure TForm1.Button1Click(Sender: TObject);var i,j:integer;begin for i:=1 to round(form1.clientwidth/2) do for j:=1 to round(form1.clientheight/2) do form1.Canvas.Pixels[i*2,j*2]:=clBlack;end; 在delphi中查询的结果表怎么让数字右对其比如学号。 ComboBox控件无法显示全部内容 提两个问题: 中国队对得起观众,却对不起我老婆 dll中动态创建Table出错 如何作大按钮的工具栏,象winrar一样 用report builder 做报表,如何设置打印纸张为A3纸张 国奥1:0 U21 撒分鼓励~~~~ delphi 做计算器功能 疑惑!求解 Chart的用法 Delphi 4 编程技术内幕 to BCB(:): 你知道outbar怎样注册吗?
var
i,j:integer;
begin
for i:=1 to round(form1.clientwidth/2) do
for j:=1 to round(form1.clientheight/2) do
form1.Canvas.Pixels[i*2,j*2]:=clBlack;
end;