проблеммы с классом

← →
Sat © (2006-11-27 00:17) [0]

помогите правильно описать класс??
не пойму почему ругается на меня???

unit Unit2; interface type TInfo=record data:string; index:longword; end; TArrList=class private mas:array of TInfo; next:longword; FFree,FUse:longword; capacity:longword; procedure Inserts(Info:TInfo,n:longword); public constructor Create(Acapacity:longword); destructor Destroy;override; procedure Add(Info:TInfo); function Delete(Info:TInfo):boolean; end; ArrListException=class(Exception) end; implementation end.

← →
Джо © (2006-11-27 00:17) [1]

Enter почисть :)

← →
Anatoly Podgoretsky © (2006-11-27 00:57) [2]

> Sat (27.11.2006 0:17:00) [0]

Хоть один честно признался, а не свалил на Дельфи.
Вот если бы еще примеры ругани привел, то совсем хорошо бы было.

← →
DrPass © (2006-11-27 01:03) [3]

Если это весь текст модуля, то не мешало бы еще нажать Ctrl+Shift+C - тогда точно ругаться не будет :)

← →
Джо © (2006-11-27 01:07) [4]

> [3] DrPass © (27.11.06 01:03)
> Если это весь текст модуля, то не мешало бы еще нажать Ctrl+Shift+C
> - тогда точно ругаться не будет :)

Тссс. Пускай руками пишет — быстрее синтаксис в голове осядет :)

← →
Германн © (2006-11-27 01:10) [5]

> Тссс. Пускай руками пишет — быстрее синтаксис в голове осядет
> :)
>

Не. Это уже привело к спаму. :-)

← →
ASoft (2006-11-27 03:42) [6]

> procedure Inserts(Info:TInfo,n:longword);

замечание не по сути, а по форме:

mas:array of TInfo; next:longword; FFree,FUse:longword; capacity:longword;

Придерживаться стиля в наименовании полей класса лишь в одной строчке из 4 - тоже стиль?

> [6] ASoft (27.11.06 03:42)
>
> > procedure Inserts(Info:TInfo,n:longword);

http://delphimaster.net/view/2-1164575622/
:)

← →
ASoft (2006-11-27 05:20) [9]

проблеммы с классом Найти похожие ветки