Вопрос по созданию классов

← →
sever © (2005-01-11 18:16) [0]

Как правильно описать класс?

tupe
TMyClass=class(TObject)
FFild1:integer;
FFild2:bullean;
FFild3:string;

{о этого места все комреллируется }
{альше на первой же функции даед ошибку 10}
{ не работает даже в консольном приложении.}

function GetFild1:integer;
procedure SetFild1(fild1:integer);
function GetFild2:bullean;
procedure SetFild2(fild2:bullean);
function GetFild3:string;
procedure SetFild3(fild3:string);
end;
.
.
и т. д.

← →
Ega23 © (2005-01-11 18:18) [1]

.
.
и т. д.

Вот это и т.д. подробнее...

← →
begin...end © (2005-01-11 18:19) [2]

> sever © (11.01.05 18:16)

> tupe

type

> class(TObject)

class

> bullean

Boolean

> комреллируется

компилируется

> на первой же функции даед ошибку

Приведите текст ошибки. Без ошибок.

← →
Семен Сорокин © (2005-01-11 18:19) [3]

tupe = type

Ctrl+Shift+C пробовали нажимать? что за ошибка то?

>tupe, bullean, комреллируется, альше, даед
похоже перетрудились вы батенька (или недотрудились :)).

Я почти уверен, что в описАнии класса функции и процедуры объявлены, а их реализации нет.

См. Семен Сорокин © (11.01.05 18:19) [3]

Вопрос по созданию классов Найти похожие ветки