Форум: "Основная";
Текущий архив: 2004.10.24;
Скачать: [xml.tar.bz2];
Вниз
Abstact error Найти похожие ветки
← →
Девушка © (2004-10-08 10:08) [0]Хочу использовать следующую конструкцию
TMyFieldList=record
Fields:TStrings;
Captions:TStrings;
end;
fieldList:TMyFieldList;
procedure TForm1.FormCreate(Sender: TObject);
begin
fieldList.Fields:=TStrings.Create;
fieldList.Captions:=TStrings.Create;
end;
Теперь при попыткеfieldList.Fields.Add(St);
вылетает abstact error
Ошибка наверняка связана с недопониманием ООП, но что делать?
← →
Мастер © (2004-10-08 10:16) [1]Почитай Help и увидишь, что TStrings - абстрактный класс.
А экземпляры абстрактных классов нельзя использовать напрямую, нужно использовать наследников от них, например, TStringList.
-------
PS.
Молодой человек, хватит дурью маяться - пиши от своего имени.
← →
Александр Иванов © (2004-10-08 10:17) [2]TStrings - абстрактный класс, используйте TStringList.
Например так:
fieldList.Fields:=TStringList.Create;
fieldList.Captions:=TStringList.Create;
Либо в описании.
← →
Skeptik (2004-10-08 10:18) [3]что делать?
вместо
fieldList.Fields:=TStrings.Create;
fieldList.Captions:=TStrings.Create;
написать
fieldList.Fields:=TStringList.Create;
fieldList.Captions:=TStringList.Create;
и почитать хотя бы справку по TStrings
← →
Девушка © (2004-10-08 10:19) [4]Спасибо.
> Молодой человек, хватит дурью маяться - пиши от своего имени.
http://www.delphimaster.ru/cgi-bin/anketa.pl?id=1086432495
Читать интересное о себе :-)
← →
Мастер © (2004-10-08 10:23) [5]>Девушка © (08.10.04 10:19) [4]
Читать интересное о себе :-)
Было бы что читать. Даже открывать ссылку лень.
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2004.10.24;
Скачать: [xml.tar.bz2];
Память: 0.46 MB
Время: 0.034 c
