Показать сообщение отдельно
  #5  
Старый 27.03.2013, 16:42
Аватар для The Atlantis
The Atlantis The Atlantis вне форума
Прохожий
 
Регистрация: 27.03.2013
Сообщения: 4
Версия Delphi: Delphi 7
Репутация: 10
По умолчанию

Цитата:
Сообщение от Uniq!
Ну ок, давай по порядку.

Создать кота: клика и длина. Это два отдельных Edit и Две кнопки. Вытаскиваем их. И всем свойство Enabled выставляем в False. Далее обрабатываем событие в контекстном меню:

Код:
Edit1.Enabled := True;
Edit2.Enabled := True;
Button1.Enabled := True;
Button2.Enabled := True;

Далее нам нужен тип кот у которого будет имя : string и длина : byte.

Код:
type TCat=class (TObject)
  Name : string;
  Length : byte;
end;

А остальное сейчас напишу... и скину

Буду благодарен т.к. срок сдачи продлен
Ответить с цитированием