| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Abstrack Error [D7, WinXP]

Kolan ©   (2004-11-03 00:38:00) 

Здравствуйте,

Вот возникает такая ошибка, вот код.

TLineParser = class
 private
   {***}    
   FCommands: TStrings;
   {***}
   procedure SetCommands(const Value: TStrings);
   function  GetCommands: TStrings;
 protected
   {***}

 public
   constructor Create;
   procedure ParseLine();
   procedure Clear;
 published
   {***}

 end;

вот конструктор

constructor TLineParser.Create;
begin
 FLine := '';
 FErrorString := '';
 FCommands := TStrings.Create;
end;
{***}
При использовании FCommands напр add и возникает ошибка.

Как исправить?

---

Defunct   (2004-11-03 01:21:00) [1]

чтобы override написать нужно чтобы у предка этот метод был виртуальным.

---

Kolan   (2004-11-03 01:05:00) [2]

> GuAV ©   (03.11.04 00:44) [1]

Благо дарю.
Я вот тут чужой исходник смотрю там так
constructor Create(AOwner: TComponent);override;
прпробовал получаю
: Cant override  static method

---

GuAV   (2004-11-03 00:44:00) [3]

Kolan ©   (03.11.04 0:38)

>  FCommands := TStrings.Create;

TStrings это абстрактный класс. Используй наследника реалищующего абстрактные методы TString, например TStringList.
FCommands := TStringList.Create;

---

Наверх