Форум: "Начинающим";
Текущий архив: 2006.02.05;
Скачать: [xml.tar.bz2];
ВнизПомогите разобраться Найти похожие ветки
← →
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;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.011 c