[Error] haimengDBLookupComboBoxEx.pas(36): Incompatible types: 'Controls.TAlign' and 'haimengDBLookupComboBoxEx.TAlign'
[Error] haimengDBLookupComboBoxEx.pas(38): Incompatible types: 'StdCtrls.TBorderStyle' and 'haimengDBLookupComboBoxEx.TBorderStyle'原程序是这样:unit haimengDBLookupComboBoxEx;interfaceuses
Windows, Messages, SysUtils, Classes, Controls,StdCtrls, DBCtrls,QControls;type
_haimengDBLookupComboBoxEx = class(TDBLookupComboBox)
private
myEdit:TEdit;
{ Private declarations }
protected
{ Protected declarations }
public
constructor Create(AOwner:TComponent);override;
{ Public declarations }
published
{ Published declarations }
end;procedure Register;implementation
procedure Register;
begin
RegisterComponents('Samples', [_haimengDBLookupComboBoxEx]);
end;constructor _haimengDBLookupComboBoxEx.Create(AOwner:TComponent);
begin
inherited Create(AOWner);
myEdit:=TEdit.Create(Self);
myEdit.Align:=alLeft; //***
myEdit.Parent:=Self;
myEdit.BorderStyle:=bsNone; //***
end;end.
解决方案 »
- 如何将一“按扭”控件永远置在窗体中所有控件的最前面
- 请问函数声明错在哪儿了?
- delphi中string数组的问题,求教.
- 老菜鸟十分非常以及极其纳闷中,,,,,,,,,,,,,
- 查询dbgrid中某字段的值 如果该字段的值不存在
- 程序经常报这个错,怎么处理
- 如何自动让入库单号累加?
- fastreport247运行res\chinese\mak.bat和makdll.bat.装完后菜单变俄文?无法是中文吗?
- 绝难问题,WIN启动都在哪里自己加载程序呢?我差一个没找到。如果一点不懂的人可以到这学。懂的人帮我,UP有分!
- 为什么我的应用服务器第一次运行没反应,没注册?
- 关于Combobox
- 如何获得超过1000个字符以上的pchar??
myEdit.Align:=Controls.alLeft; //***
myEdit.BorderStyle:=Controls.bsNone; //***