关于RX library demo icon的有趣问题(100分)

C

canna

Unregistered / Unconfirmed
GUEST, unregistred user!
在delphi 5安装了RX library 2.75控件包,执行其自带的Rxdemo,生成rxdemo.exe。
无论是在/project/options…/application中load icon …load我的icon;
还是在其project文件中加入 Application.Icon.LoadFromFile('myicon.ico'); 语句,
都无法改变所生成rxdemo.exe文件的icon。始终是原来的红色“RX”。
如何将rxdemo.exe的icon改为我的icon呢?谢谢!
 
需要DbPrgrss,从何处得到,你有吗?linsb3031@163.com
 
如下修改:
program RxDemo;

uses
Forms,
ExcptDlg,
DbExcpt,
Main in 'MAIN.PAS' {MainForm},
Dbaware in 'DBAWARE.PAS' {DBAwareForm},
Tools in 'TOOLS.PAS' {ToolsForm},
Ctrls in 'CTRLS.PAS' {ControlsForm},
About in 'ABOUT.PAS' {AboutForm},
PageDemo in 'PAGEDEMO.PAS' {ClientAssistant};

//{$IFDEF WIN32}
//{$R *.R32}
//{$ELSE}
{$R *.RES}
//{$ENDIF}

begin
{$IFDEF WIN32}
Application.Initialize;
{$ENDIF}
Application.Title := 'RX Demo';
RxErrorIntercept;
DBErrorIntercept;
Application.CreateForm(TMainForm, MainForm);
Application.Run;
end.
 
谢谢你,linsb。能讲讲原理吗?
 
原程序调用资源文件RxDemo.R32,因此,你的改动无效。删除部分语句即可调用自定义的资源文件。
 
接受答案了.
 
顶部