程序如下:
procedure TForm1.FormMouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
var
btn:TButton;
begin
btn:=TButton.Create(Self);
btn.Parent:=Self;
btn.Left:=X;
btn.Top:=Y;
btn.Width:=btn.Width+50;
btn.Caption:=Format('Button at %d,%d',[x,y]);
end;出现的错误如下:Undeclare identifier:'TButton'.
TButton类不是delphi默认定义的吗?怎么会出现这种错误呢?
procedure TForm1.FormMouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
var
btn:TButton;
begin
btn:=TButton.Create(Self);
btn.Parent:=Self;
btn.Left:=X;
btn.Top:=Y;
btn.Width:=btn.Width+50;
btn.Caption:=Format('Button at %d,%d',[x,y]);
end;出现的错误如下:Undeclare identifier:'TButton'.
TButton类不是delphi默认定义的吗?怎么会出现这种错误呢?
解决方案 »
- 关于左右声道切换的问题 CDSoftwareWj 进来
- 请教sql语句的写法
- 请教:Edit1.Text := vartostr(ClientDataSet1.Aggregates.Items[0].Value);为何不能得到Aggregate字段的值?
- 有问题了
- 我的提问怎么看不到
- 求组关于COMBOBOX
- 怎样通过网页上的链接打开 一桌面窗口?? 救我啊~~
- 菜鸟求救:怎样得到Listview中被选中的某一个Subitem值,最好有代码,详细点,谢谢
- 取出网页中所有<td>标签中的内容
- 图形菜单是如何制作的?(用Delphi)
- CSDN论坛秀后期的活动由:JINJAZZ支持,感谢JINJAZZ带给我们论坛多姿的生活,感谢JINJAZZ的劳动
- 请问有没有类似温度计的带刻度的水柱的控件???
针对使用delphi一周以上者的解决方案:在pas头部uses中写入StdCtrls.
昨天我也是在uses那里加了,但由于我写成了StdCotrls,所以老是编译不过去,我以为我加的地方错了~~!!!谢谢两位!!!