Текущий архив: 2004.01.13;
Скачать: CL | DM;
Вниз
работа с TStrings Найти похожие ветки
← →
~GaMeRd~ © (2003-12-28 14:31) [0]Привет мастера!
Помогите разобраться в чем беда.
Пишу:
procedure getallvd;
var reg: TRegistry;
st: TStrings;
i: integer;
begin
reg := TRegistry.Create;
st := TStrings.Create;
reg.RootKey := HKEY_CURRENT_USER;
if reg.OpenKeyReadOnly(reg_path{string}) then
begin
reg.GetValueNames(st);
for i := 0 to st.Count-1 do
..................
end;
end;
Этот нигер пишет "Abstract error"
← →
Anatoly Podgoretsky © (2003-12-28 14:41) [1]Этот нигер прав, ты пытаешься создать экземпляр класса с абстрктными методами. Так нельзя используй наследника с перекрытыми методами.
← →
Dred2k © (2003-12-28 14:43) [2]А наследник зело знаменит и полезен - TStringList ...
Страницы: 1 вся ветка
Текущий архив: 2004.01.13;
Скачать: CL | DM;
Память: 0.46 MB
Время: 0.024 c
