delphi皮肤的读入(100分)

  • 主题发起人 主题发起人 jzrenxiaoyan
  • 开始时间 开始时间
J

jzrenxiaoyan

Unregistered / Unconfirmed
GUEST, unregistred user!
各位高手:
我刚开始学习delphi,现在有棘手问题向各位请教:
我想做一个类似QQ皮肤编辑器一样的软件,能把任意一个用delphi开发的应用程序的界面(皮 肤)读入到这个编辑器下的编辑区里(某个容器)。
请问:1、怎么把一个delphi应用程序的皮肤界面保存下来,到外存
2、怎么能把delphi应用程序的界面(皮肤)从外存中读出来,且只能读到编辑区
 
呵呵,刚开始你的难度有点大
去往上找个VCL Skin控件看看
 
高手才敢这样想[:D]
 
谢谢两位大哥,小妹我还是想试试,请高手给一些实际的建议!
 
http://www.link-rank.com
 
谢谢uiit,只是这个网址总是打不开,呵呵
我们这里的网速太慢了吧
 
呵呵,看来我问的问题比较大,再提个具体点的:
能不能把一个应用程序下的form和另一个应用程序下的form建立联接,对一个操作相当于对另一个进行操作
 
可以.属于进程间的通信问题.具体怎么做,我忘了.好像记得看过一次.呵呵.

VCL Skin控件也许对你有用.去盒子下个.

你这些问题不像是刚学Delphi的人会问的吧?
 
VclSkin的皮肤做得不错,可以去下载一个。
进程之间通讯的代码:
var
SendText: string;
SendDataStruct: CopyDataStruct;
begin
SendText := 'Send';
SendDataStruct.cbData := length(Sendtext);
SendDataStruct.lpData := @SendText[1];
SendMessage(FindWindow(PCHAR('TForm1'), PCHAR('form1')), WM_CopyData, Application.Handle, lparam(@SendDataStruct));
end;

接收者:
procedure DataIn(var DataMessage: TWMCopyData); message wm_copydata;

procedure DataIn(var DataMessage: TWMCopyData);
var
ReceieveData : CopyDataStruct;
temp: pchar;
ReceieveStr : string;
begin
ReceieveData := DataMessage.CopyDataStruct^;
temp := ReceieveData.lpdata;
ReceieveStr := string(temp);
end;

不一定要用windows定义的消息,还可以自定义消息,如:
WM_MYMSG=WM_USER+1001;
然后在Application.OnMessage处写代码,截获消息并做相应处理
 
谢谢kenmnb2000大哥
问题讨论还没有结束
 
你要运行的两个程序可是在同一台计算机上运行啊。如果在同一PC,我想我还是有办法的。。。。。。能不能把你的问题再具体一点。
 
liuwei_43:
不好意思,前几天出去了。
是在同一台机器上运行的,前台是应用程序界面,后台是界面编辑器。
需要解决的问题:
1、如何对前台应用程序的DFM进行解析,在后台界面编辑器的编辑区下动态生成和前台一样的界面。
2、如何把后台动态创建的界面控件的事件和前台应用程序界面控件的事件一一对应起来!
谢谢!!!!!
最好有源代码!!!!
 
liuwei_43:
很忙吗?周末帮我看一下吧,谢谢
 
多人接受答案了。
 
后退
顶部