控件是从TEdit继承下来, 有个初始化动作, 调用了DLL, 但是DLL跟BPL在同一个目录, 安装控件没问题, 卸载时, IDE提示异常, 然后就崩溃了. 代码如下:unit QEdit1;interfaceuses
SysUtils, Classes, QControls, QStdCtrls;type
TEdit1 = class(TEdit)
private
{ Private declarations }
protected
{ Protected declarations }
public
{ Public declarations }
function Initialize: Boolean;
published
{ Published declarations }
end;function COMM_Initialize: Integer; stdcall; external 'comm.dll' name 'COMM_Initialize';procedure Register;implementationprocedure Register;
begin
RegisterComponents('Standard', [TEdit1]);
end;{ TEdit1 }function TEdit1.Initialize: Boolean;
begin
COMM_Initialize;
end;end.
SysUtils, Classes, QControls, QStdCtrls;type
TEdit1 = class(TEdit)
private
{ Private declarations }
protected
{ Protected declarations }
public
{ Public declarations }
function Initialize: Boolean;
published
{ Published declarations }
end;function COMM_Initialize: Integer; stdcall; external 'comm.dll' name 'COMM_Initialize';procedure Register;implementationprocedure Register;
begin
RegisterComponents('Standard', [TEdit1]);
end;{ TEdit1 }function TEdit1.Initialize: Boolean;
begin
COMM_Initialize;
end;end.
重新安装一下吧!!可能要全部卸载再安装!!