unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  StdCtrls;

type
  TForm1 = class(TForm)
    Button1: TButton;
    procedure Button1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.DFM}

procedure TForm1.Button1Click(Sender: TObject);
var
  Reg: TRegistry;
  Result: String;
begin
  Result := 'BDE Directory Not set';
  Reg := TRegistry.Create;
  try
    Reg.RootKey := HKEY_LOCAL_MACHINE;
    if Reg.OpenKey('SoftwareBorlandDatabase Engine',FALSE) then
    if Reg.ValueExists('DLLPAH') then
    Result := 'BDE Directory:' + Reg.ReadString('DLLPATH');
    Reg.closeKey;
    finally
    Reg.Free;
    end;
    ShowMessage(Result);
end;

end.

--------------------------------------
다른 사이트 팁에서 가져온겁니다.
근데, 코딩을 하니까, 자꾸만  [Error] Unit1.pas(28): Undeclared identifier: 'TRegistry' 라는 에러거 뜹니다.

TRegistry를 따로 정의해야 하나요?.....
넘 초보라서.......죄송합니다.
답변 기다리겠습니다.