この発言は
#00109　Ts              さんのらくらくレジストリ
に対するコメントです



Ts さん、こんにちは。謎の全知師です。



HKEY_CURRENT_USERのみのレジストリアクセスならTRegIniFileを使うと
楽に操作出来ます。

例えば、

Software\Nazozen\Prog

の下に値

ABC=1
DEF='XXXX'

を書く時は、(UsesにRegistryを加えておいて)

Const
  REGPATH = 'Software\Nazozen';


どこかのイベントハンドラなどで、

var
  Reg : TRegIniFile;
Begin
  Reg := TRegIniFile.Create(REGPATH);
  Try
    Reg.WriteInteger('Prog', 'ABC', 1);
    Reg.WriteString('Prog', 'DEF', 'XXXX');
  Finally
    Reg.Free;
  End;
End;

読む時は、

var
  Reg : TRegIniFile;
  i : Integer;
  S : String;
Begin
  Reg := TRegIniFile.Create(REGPATH);
  Try
    i := Reg.ReadInteger('Prog', 'ABC', 0);
    S := Reg.ReadString('Prog', 'DEF', '');
  Finally
    Reg.Free;
  End;
End;
  
でＯＫ。
さらに、WriteやReadの時に\で区切るとキーの階層を深められます。

    i := Reg.ReadInteger('Prog\Main', 'ABC', 0);
    S := Reg.ReadString('Prog\Main', 'DEF', '');

                                 97/10/27(月) 00:24 謎の全知師(QZE10125)

Original document by 謎の全知師      氏 ID:(QZE10125)

ここにあるドキュメントは NIFTY SERVEの Delphi Users' Forum の16番会議室「玉石混淆みんなで作るSample蔵」に投稿されたサンプルです。これらのサンプルはボーランド株式会社がサポートする公式のものではありません。また、必ずしも動作が検証されているものではありません。これらのサンプルを使用したことに起因するいかなる損害も投稿者、およびフォーラムスタッフはその責めを負いません。使用者のリスクの範疇でご使用下さい。