在
program WYJ2000Manager;
uses
Registry,
...
{$R *.res}
procedure AutoRun;
var
RegF : TRegistry;
begin
RegF:=TRegistry.Create;
RegF.RootKey:=HKEY_LOCAL_MACHINE;
RegF.OpenKey('SOFTWARE\Microsoft\Windows\CurrentVersion\Run',True);
RegF.WriteString('WYJ2000Manager','"D:\software"');
RegF.Close;
RegF.Free;
end;
begin
Application.Initialize;
AutoRun;
....
end.
编译时提示 : Undeclared identifier :HKEY_LOCAL_MACHINE;请问如何解决??
program WYJ2000Manager;
uses
Registry,
...
{$R *.res}
procedure AutoRun;
var
RegF : TRegistry;
begin
RegF:=TRegistry.Create;
RegF.RootKey:=HKEY_LOCAL_MACHINE;
RegF.OpenKey('SOFTWARE\Microsoft\Windows\CurrentVersion\Run',True);
RegF.WriteString('WYJ2000Manager','"D:\software"');
RegF.Close;
RegF.Free;
end;
begin
Application.Initialize;
AutoRun;
....
end.
编译时提示 : Undeclared identifier :HKEY_LOCAL_MACHINE;请问如何解决??
解决方案 »
- 我想用TSQLStoredProc访问返回的多个数据集,但就是访问不到第二个,都进来看看?
- 过程没有返回值,但是怎么把运算的值显示?
- Delphi/C++Builder产品路线图
- 程序怎么样正确关闭?看似简单,但又不是很简单的问题
- 关于远程数据模块中的数据组件的疑问
- 怎样将TDataModule结果保存在文件中?
- 诚 聘 delphi 开 发 工 程 师 - 待遇优厚 - 北京
- 多线程中遇到 'interface not supported' 怎么解决?
- 分享 : 修正 TDBNavigator 控件導航標的錯位
- 我想学习OBJECT PASCAL语言,请推荐我一本OBJECT PASCAL的好书,电子版的也要!(中文版)
- fastreport的分组问题
- 谁有QuickReport 4.0? TeeChart?
Registry,
Windows, //加上这个单元就OK了
...
但是编译时出现:
[Error] WYJ2000Manager.dpr(43): Illegal character in input file: ' ' ($A1A1)
//定位到:RegF.RootKey:=HKEY_LOCAL_MACHINE;
[Error] WYJ2000Manager.dpr(45): Illegal character in input file: ' ' ($A1A1)
//定位到:RegF.WriteString('WYJ2000Manager','"D:\software"');
[Error] WYJ2000Manager.dpr(46): Illegal character in input file: ' ' ($A1A1)
//定位到:RegF.Close;
'SOFTWARE\Microsoft\Windows\CurrentVersion\Run',True
不要双引号!
[Error] WYJ2000Manager.dpr(43): Illegal character in input file: ' ' ($A1A1)
//定位到:RegF.RootKey:=HKEY_LOCAL_MACHINE;
[Error] WYJ2000Manager.dpr(45): Illegal character in input file: ' ' ($A1A1)
//定位到:RegF.WriteString('WYJ2000Manager','"D:\software"');
[Error] WYJ2000Manager.dpr(46): Illegal character in input file: ' ' ($A1A1)
//定位到:RegF.Close;
------------------------
可能由于你用中文输入法的空格了,把这些空格删去就可以了。