Классы и список

[goto ∞]

Описал класс книга следующим образом

TBook = class
         private
            Name : string;
            Avtor: string;
            Count: byte;
         public
            constructor Create; overload;
            constructor Create(pName, pAvtor : string; pCount : integer); overload;
            destructor Destroy;
            function GetName : string;
            function GetAvtor: string;
            function GetCount: integer;
            procedure SetCount(pCount : integer);                        //      Изменение информации о количестве данной книги
            procedure SetBook(pName, pAvtor : string; pCount : integer); //
      end;

Теперь нужно описать класс отдел причем каждый отдел рассматривается как набор книг
Для объединения книг в отделах используется очередь на основе обычного массива со сдвигом элементов

TOtdel = class
      private
               Name : string;   //Название отдела
             Number : integer;// Номер отдела
             Books  : array [1..N] of TBook;
     public
             constructor Create; overload;  
             constructor Create()  // ???

А дальше не могу понять, с какими параметрами правильно будет объявить метод Create класса TOtdel

[Аватар]

А чего не коллекцию использовать?

[goto ∞]

В задание нету, точнее есть но разрешается использовать только как дополнение к свои классам

[Sciv]

Сообщение от goto ∞

с какими параметрами правильно будет объявить метод Create класса TOtdel

Ну наверное, с теми же, которые у Вас в секции private? Должен же отдел как-то имя и номер получить...

А что касается массива с книгами - сделайте динамический массив и допишите в класс методы AddBook и DeleteBook.

А ещё вопрос - в чём смысл задавать по два конструктора (с параметрами и без)?

[goto ∞]

Сообщение от Sciv

Ну наверное, с теми же, которые у Вас в секции private? Должен же отдел как-то имя и номер получить...

А что касается массива с книгами - сделайте динамический массив и допишите в класс методы AddBook и DeleteBook.

А ещё вопрос - в чём смысл задавать по два конструктора (с параметрами и без)?

Я пробовал так, мне сказали что это абсолютно неправильно

...
constructor Create(pName : string; pNumber : integer; pBook : array of TBook); overload;
...

Без параметров это когда по умолчанию устанавливаются свойства.

[goto ∞]

Может правильно будет таким образом?

constructor TOtdel.Create(pName : string; pNumber : integer; pBook : TBook); overload;

Хотя это должно быть в методе AddBook то что подчеркнуто.

Вообщем такую ересь задают преподы под названием ООП которую преподают по двухстраничным пособиям, РФ образование


Может стоит в класс Отдел добавить свойства First и Last для работы структуры данных очередь :

TOtdel = class
      private
               Name : string;   //Название отдела
             Number : integer;// Номер отдела
             Books  : array [1..N] of TBook;
             First, Last : integer;  // First - первая занятая ячейка, Last первая свободная ячейка
...

[goto ∞]

Вот такой вариант без добавления и удаления и некоторых методов

TOtdel = class
      private
               Name : string;                //Название отдела
             Number : integer;               //Номер отдела
             Books  : array [1..N] of TBook;
             First, Last : integer; // First - первая занятая ячейка, Last первая свободная ячейка
      public
             constructor Create; overload;
             constructor Create(pName : string; pNumber, pFirst, pLast : integer); overload;
             ...
    end;

Получается в методе Create вообще массив в качестве параметра не нужно использовать

[Аватар]

Не надо pNumber, pFirst, pLast в конструкторе. Методы AddBook (возможно и AddBooks для добавления массивом), DeleteBook должны сами внутри классовые переменные такого рода поддерживать. Снаружи они вообще должны быть не доступны. Зато должнs быть свойства только для чтения CountBooks и индексное для доступа к объекту книга. А также возможно метод FindBook по наименованию

[goto ∞]

Сообщение от Аватар

Не надо pNumber, pFirst, pLast в конструкторе. Методы AddBook (возможно и AddBooks для добавления массивом), DeleteBook должны сами внутри классовые переменные такого рода поддерживать. Снаружи они вообще должны быть не доступны. Зато должнs быть свойства только для чтения CountBooks и индексное для доступа к объекту книга. А также возможно метод FindBook по наименованию

Оставить только pName? Добавить свойство CountBooks (число книг в этом отделе)