Форум: "Основная";
Текущий архив: 2002.02.14;
Скачать: [xml.tar.bz2];
Внизработа с объектами в TStringList Найти похожие ветки
← →
AlexSV (2002-01-30 10:42) [3]> perov
Не совсем понятно несколько моментов:
1. if <> -1 then begin
- что проверяем?
2. a := flist.objects[i] as tcalss1;
a1 := a.a1; // вот тут идет глюк
- согласно объявлению tcalss1 не имеет свойств аX
tclass1 = class
f1: string;
f2: integer;
f3: pointer;
end;
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2002.02.14;
Скачать: [xml.tar.bz2];
Память: 0.43 MB
Время: 0.004 c