Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.02.05;
Скачать: CL | DM;

Вниз

Помогите разобраться   Найти похожие ветки 

 
Comptoi's G   (2006-01-17 00:09) [0]

function TForm1.AllKeys(root: HKEY;key:string): String;
 var
 Reg:TRegistry;
 Str: TStrings ;
 begin
   Str:=TStrings.Create;
   Reg:=TRegistry.Create;
   try
   reg.RootKey := HKEY_CURRENT_USER;
   reg.OpenKey(key,false);
reg.GetKeyNames(str);
   reg.Closekey;
   except
   end;
   Reg.free;
   Str.free;
end;


Выдает ошибку, при выполнении программы в выделенной строке
что-то не так с переменной Str ?


 
Compton's G   (2006-01-17 00:16) [1]

Блин вот я баран, не Str:=TStrings.Create, а Str:=TStringList.Create


 
STK ©   (2006-01-17 01:08) [2]


> Str: TStrings ;


> а Str:=TStringList.Create

Ну наверно не при выполнении а при компеляции. Переменная типа Tstring, а create как TstringList - чистое не соответствие. Если я не путаю. Будь вниметельней.


 
STK ©   (2006-01-17 01:11) [3]

Не, походу дела я попутал х.. с трамвайной ручкой, но попробуй.



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

Текущий архив: 2006.02.05;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.044 c
2-1137762326
dr.Mind
2006-01-20 16:05
2006.02.05
Учет входящего трафика


2-1137793494
deamon_t
2006-01-21 00:44
2006.02.05
Bitmap1:=Bitmap2


2-1137405620
Пользователь
2006-01-16 13:00
2006.02.05
Создание компонента


2-1137772100
лом
2006-01-20 18:48
2006.02.05
Treeview


8-1125083612
Mr.Devil
2005-08-26 23:13
2006.02.05
Контроль звукового потока