B
BigBing
Unregistered / Unconfirmed
GUEST, unregistred user!
是这样的,俺为了减少EXE文件的大小,用了一个对话框资源,上面包含了一个Edit(ID设为
101),俺的问题是:怎样把一个String(比如'中华人民共和国')装入这个Edit,俺试过
用PostMessage,原型是:
s:='中华人民共和国';
for i:=1 to length (s)do
begin
postmessage getdlgitem (dlghandle,101),WM_CHAR,ord(StrToword(copy(directory,i,1))),0);
end;
结果行是行了,不过用了一个StrToword,于是就得在uses里加入一个IdTrivialFTPBase,
于是原来只有10多K的程序一下子变成了100多K,真是苦恼,请问各位虾哥虾弟,要怎么办
才可以把S输入Edit而又不增加额外的东西(uses里已有windows,message,shlObj.先谢啦!
101),俺的问题是:怎样把一个String(比如'中华人民共和国')装入这个Edit,俺试过
用PostMessage,原型是:
s:='中华人民共和国';
for i:=1 to length (s)do
begin
postmessage getdlgitem (dlghandle,101),WM_CHAR,ord(StrToword(copy(directory,i,1))),0);
end;
结果行是行了,不过用了一个StrToword,于是就得在uses里加入一个IdTrivialFTPBase,
于是原来只有10多K的程序一下子变成了100多K,真是苦恼,请问各位虾哥虾弟,要怎么办
才可以把S输入Edit而又不增加额外的东西(uses里已有windows,message,shlObj.先谢啦!