Форум: "Основная";
Текущий архив: 2004.01.13;
Скачать: [xml.tar.bz2];

Вниз

работа с 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;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.44 MB
Время: 0.007 c