DELPHI DLL实参传窗体
//DLL 放在EXE中没问题
function SkinForm(var skfrm:TForm):Integer;stdcall;
var
skf:TbsBusinessSkinForm;
nskfrm:TForm;
begin
frmUUMain:=skfrm;
skf:=TbsBusinessSkinForm.Create(skfrm); //这里出现VA错误,
UpdateSkin(skfrm);
//SkinForm(skfrm);
Result:=0;
end;
请问怎么解决啊?
检查一下skfrm是否为空。
不会为空的。可以通过skfrm.Caption:='Changed'; 有效
有才 shxinzhou
skf:=TbsBusinessSkinForm.Create(TForm(skfrm)); //这样试试!
skf:=TbsBusinessSkinForm.Create(TForm(Integer(skfrm))); //这样。。。。。。。
我试试看啊。谢谢
Invalid Class Type,
TbsBusinessSkinForm.Create(nil)试试
一定要传入TFORM实体的。
相关问答:
返回的内容是如下代码,怎么能渠道2b?
<p class="text1">1a </p>
<p class="text1">2b </p>
<p class="text1">3c </p>
<p cl ......
VC 控制台程序:
#include <iostream>
using namespace std;
int main()
{
const int def_buffer = 1024 * 4;
DWORD t;
BYTE b[def_buffer];
memset(b, 0, sizeof(b));
PBYTE p;
t = GetTickC ......
select * from shuju.DB where 开盘价-收盘价<=0.02
开盘价 与收盘价 是数据库里的字段
select * from aTableName where ((开盘价-收盘价) <=0.02 )
开盘价比收盘价低两分以下的情况
Mark!!!!!!
se ......
我有一个edit,一个button,将edit输入的内容在sql中进行查找,button按下后在后面显示出来,但是我有一个问题,如果在sql查询不到就很麻烦,像报错一样的跳一个对话框出来,我想如果没有搜索到,那跳一个对话框出来 ......
listbox的Ondrawltem事件在什么情况下触发?
var
thepchar:array[0..79] of char;
thestring:string;
begin
...
strpcopy(thepchar,thestring);
longint(@thepchar);
......
end;
我想问
strpcopy(thepch ......