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

Вниз

Как прочитать из реестра параметр типа REG_MULTI_SZ   Найти похожие ветки 

 
OlegM ©   (2003-02-27 07:55) [0]

Здрассте
Пытаю прочитать в переменную типа string, а delphi ошибку выдает типа invalid data type


 
Verg ©   (2003-02-27 08:02) [1]

Что-то типа этого:

function TRegistry.ReadMultiString(const Name: string; Ms : TStrings):boolean;
var
Len: Integer;
RegData: TRegDataType;
Dt, P : pchar;
begin
Result:=false;
Len := GetDataSize(Name);
if Len > 0 then
begin
GetMem(Dt, Len);
try
GetData(Name, Dt, Len, RegData);
if RegData = rdMultiString then
begin
P:=Dt;
While P^<>#0 do
begin
Ms.Add(P);
while P^<>#0 do inc(P); inc(P);
end;
result:=true;
end else ReadError(Name);
finally
FreeMem(Dt, Len);
end;
end else begin Ms.Clear; result:=true; end;
end;



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

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

Наверх




Память: 0.46 MB
Время: 0.012 c
3-54442
ruslan_as
2003-04-01 21:03
2003.04.17
Округление в InterBase


1-54549
anbezr
2003-04-04 10:35
2003.04.17
Изменение св-ва Parent


3-54477
saf
2003-03-30 12:46
2003.04.17
Где ошибка в запросе


14-54878
Сергей Чурсин
2003-04-02 09:59
2003.04.17
Ирак


3-54534
GavAl
2003-04-01 09:26
2003.04.17
Как в уже созданой таблице добавить поле программно