Скачать: CL | DM;

Как узнать все параметры ключа реестра?   Найти похожие ветки 

← →
XeLax   (2004-06-28 21:51) [0]

Как узнать все параметры из некоего ключа реестра?
Пишу так и выдает ошибку:

function GetChangedString(s : PChar) : PChar;
 var
   Reg : TRegistry;
   Strings : TStrings;
   i, j, k : integer;
   str, str1 : string;
 begin
   Result:=s;

   str:=s;
   Reg := TRegistry.Create;
   Reg.RootKey:=HKEY_LOCAL_MACHINE;
   Reg.OpenKey("\SYSTEM\WPA",true);

   Strings:=TStrings.Create;
   Reg.GetValueNames(Strings);
   for i:=0 to Strings.Count-1 do  //тута выдает ошибку !
   begin
     ....
   end;
   Reg.Free;
   Strings.Free;
 end;

---

← →
Mim1 ©   (2004-06-28 21:56) [1]

>  Strings : TStrings;


>  Strings:=TStrings.Create;


Strings := TstringList.Create

---

← →
panov ©   (2004-06-28 21:57) [2]

1. TStrings -абстрактный класс, а значит, что можно создавать толтько его потомков, например, TStringList
2. Экземпляр класса надо сначала создавать, а потом использовать:
var
  ...
  Strings : TStringList;
  ...
begin
  Strings := TStringList.Create;

  try
  ...

  finally
    Strings.Free;
  end;

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.021 c