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

Вниз

Помогите!!!   Найти похожие ветки 

 
microlab   (2003-01-15 18:59) [0]

Как в TKOLListView поместить список всех имен переменных ключа реестра, полученных функцией RegKeyGetValueNames. Как я только не пытался, но постоянно выскакивает рен тайм ошибка


 
blackalex ©   (2003-01-15 19:07) [1]

Код в студию!


 
microlab   (2003-01-16 16:44) [2]

Вот примерный код в сокращенном варианте. Я думаю ошибка гдето в выделенной части
var key:hkey;
StrList:PstrList;
i:integer;
begin
List.LVColAdd("Colum1", taLeft, List.Width-4);
Key:=RegKeyOpenRead(HKEY_LOCAL_MACHINE,"Software\Microsoft\Windows\CurrentVersion\run");
if RegKeyGetValueNames(Key,StrList)=true then
for i:=0 to StrList.Count-1 do
( StrList[i])
Вот примерный код в сокращенном варианте. Я думаю ошибка гдето в выделенной части
var key:hkey;
StrList:PstrList;
i:integer;
begin
List.LVColAdd("Colum1", taLeft, List.Width-4);
Key:=RegKeyOpenRead(HKEY_LOCAL_MACHINE,"Software\Microsoft\Windows\CurrentVersion\run");
if RegKeyGetValueNames(Key,StrList)=true then
for i:=0 to StrList.Count-1 do
List.LVItemImageIndex[list.LVItemAdd(StrList[i])]:=0;
end;


 
microlab   (2003-01-16 18:33) [3]

Еже сам додумался.
Не хватало strList:= NewStrList;


 
blackalex ©   (2003-01-17 13:50) [4]

Не хватало strList:= NewStrList;<p>
Точно :) В конце не забудь StrList.Free , если он тебе больше не нужен.



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

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

Наверх




Память: 0.47 MB
Время: 0.017 c
9-71459
[Baradoo]
2003-03-20 22:48
2003.09.22
Налет хакеров на сервера от hotbox и mail


1-71742
Жук
2003-09-09 15:17
2003.09.22
Проблема с сохранением значения ToolBar.ButtonHeight


6-71779
nobody
2003-07-25 00:03
2003.09.22
tcp/ip programming


1-71640
ah
2003-09-09 10:17
2003.09.22
использую edit для индикации , как устранить возможность


4-72008
oduvan
2003-07-20 20:07
2003.09.22
Как получить список хендлов всех программ не в трее а в таскбаре?