IDE和Application.Title的问题

  • 主题发起人 主题发起人 import
  • 开始时间 开始时间
I

import

Unregistered / Unconfirmed
GUEST, unregistred user!
问题
在项目文件中{DPR}写一句
Application.Title := AppTitle;
其中AppTitle在另外一个单元里声明
如下
....
resourcestring
AppTitle = 'XXXXXXXXXXXXXXXX';
...
如此导致DELPHI IDE出错。没有反应
运行环境 Win2k + Delphi5.0
疑是resourcestring声明不同
又用const试了一下,又是一样
继续查询在Forms中设置时函数声明
procedure SetTitle(const Value: string);
呵呵,有const限定符是说该值在函数内部不能更改
但奇怪的是我将const除去就可以了,为什么会这样子呢?
将const去除,就可以运行了。
指的是
procedure SetTitle(const Value: string);
一下子想不通,请各位发表一下意见
我的D五打过补丁
回复人: Kingron(单身走我路……) ( ) 信誉:112 2002-09-05 19:01:00 得分:0
我猜想,这是因为Delphi的IDE会自动管理Application Options,其中就有一项是Application.Title然而,这个管理是在设计的时候的,就是说Delphi的IDE没有办法分析DPR文件中的变量或者常量,因此Delphi的IDE就干脆Disable了事儿!你打开Project Options对话框就明白了。
 
你可以用{$I指令来解决这个问题:
program Project1;
uses
Forms,
Unit1 in 'Unit1.pas' {Form1};
{$R *.res}
const
MY_CONST='Test';
begin
Application.Initialize;
{$I MYCONST.txt}
Application.CreateForm(TForm1, Form1);
Application.Run;
end.
///MYCONST.txt文件内容如下:
Application.Title:=MY_CONST;
然后你在其他的地方定义MY_CONST即可。
这样你的程序不会有任何影响,而Delphi的IDE也不会有任何影响,这个应该是比较完美的解决方法了。
 
后退
顶部