Abstrack Error

← →
Kolan © (2004-11-03 00:38) [0]

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

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

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 и возникает ошибка.

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

← →
GuAV © (2004-11-03 00:44) [1]

Kolan © (03.11.04 0:38)

> FCommands := TStrings.Create;

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

← →
Kolan © (2004-11-03 01:05) [2]

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

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

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

Abstrack Error Найти похожие ветки