delphi2007无法使用以下代码?

钛元素 2010-04-18 05:18:18

use Registry ;

function GetRegistryValue(KeyName: string): string;
var
Reg: TRegistry;
begin
Reg := TRegistry.Create();
try
Reg.RootKey := HKEY_LOCAL_MACHINE; //就这行报错
Reg.OpenKey(KeyName, False);
Result := Reg.ReadString('VALUE1');
finally
Reg.Free;
end;
end;
...全文
44 4 打赏 收藏 转发到动态 举报
写回复
用AI写文章
4 条回复
切换为时间正序
请发表友善的回复…
发表回复
钛元素 2010-04-23
  • 打赏
  • 举报
回复
找到问题了。不是uses,上面的是我自己漏写了。
是我在新的pas文件里面,少加载了一个windows
火龙岛主 2010-04-19
  • 打赏
  • 举报
回复
use Registry ;搞错了,
应该为:uses Registry;
Frank.WU 2010-04-19
  • 打赏
  • 举报
回复
uses Registry;

代码完全没问题
JPEXE 2010-04-18
  • 打赏
  • 举报
回复
最好写出来报的什么错误信息,另外第一行use Registry;错了,应该是uses Registry;
Ehlib 是著名的数据库连接控制,版本为5.0.13,DBgrid增强VCL控件;支持多表头,多固定列,按表头排序,支持合计列,并支持直接打印。可以和PB的ataWindow媲美。 本版本含完整源代码,支持以下 IDE: Delphi 5,6,7,2005 C++Builder 5,6 BDS 2006 (Delphi 2006, C++Builder 2006) Delphi 2007 RAD Studio 2009 (Delphi 2009, C++Builder 2009) Embarcadero RAD Studio 2010 (Delphi 2010, C++Builder 2010) 本人已在Delphi 2010中运行通过,在本人编制的进销存软件中应用完全正常。 注:Delphi2010里面安装不要修改bpl文件的输出路径,采用默认值,否则安装难以成功。 Version 5.0的改进: + At design-time grid can show such components as DataSource, DataSet, DataDriver in its the bottom left part. These components can be selected in object inspector by mouse clicking. It allows to find quickly and select components which is connected to the grid. + New mode - RowPanel. In this mode grid allows to show out cells of record one under another and change height of every cell separately. + Grid can have special panel of detail information for record. It is allowed to put any control from component palette on this panel. At run time, panel is hidden and user can open it by pressing on a '+' sign which is shown at the begining of every row. + Grid can scroll data smoothly and by small steps of one pixel size. Grid can scroll data smoothly vertically and horizontally. + Hot track. Grid can highlight a cell or a row under mouse cursor. + Grid can show vertical line in gradient mode between data rows and bottom part of the grid. + In mode Column.AlwaysShowEditButton grid shows EditButtons in shadow mode. It doesn't irritate eyes by big amount of edit buttons in the grid. + New property EditButtonsShowOptions is added in the Grid of type TEditButtonsShowOptionsEh. TEditButtonsShowOptionsEh = set of (sebShowOnlyForCurCellEh, sebShowOnlyForCurRowEh, sebShowOnlyWhenGridActiveEh, sebShowOnlyWhenDataEditingEh); When Column.AlwaysShowEditButton is True, this property allows to customize, in which cases it is need to show EditButtons. : See detail information

5,386

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧