VPF::проектирование иерархии лассов

Dmitry1987

Дата 6.2.2013, 12:07 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 42
Регистрация: 3.5.2008

Репутация: нет
Всего: нет

В программе будут операции над значениями полей:

- Очистить
- Заменить полностью
- Заменить фрагмент
- Добавить текст вначало
- Добавить текст вконец

Помогите с проектированием иерархии классов операций. Нужно как-то хранить операцию и ее аргументы. Правильно ли делать классы-пустышки? У меня получилось так:

Код


TOperation = class
end;

TClear = class(TOperation)
end;

TReplaceFull = class(TFunction)
private
  FText: AnsiString;
public
  property Text: AnsiString read FText write FText;
end;

TReplacePartial = class(TFunction)
private
  FNewText: AnsiString;
  FOldText: AnsiString;
public
  property NewText: AnsiString read FNewText write FNewText;
  property OldText: AnsiString read FOldText write FOldText;
end;

TAddTop = class(TFunction)
private
  FText: AnsiString;
public
  property Text: AnsiString read FText write FText;
end;

TAddBottom = class(TFunction)
private
  FText: AnsiString;
public
  property Text: AnsiString read FText write FText;
end;

Чувствую что получилать бредовая иерархия, поправьте меня.

gesper

Дата 7.2.2013, 19:42 (ссылка)

(нет голосов)

Загрузка ...

"Shарфик"

Профиль
Группа: Участник
Сообщений: 183
Регистрация: 23.2.2005

Репутация: 1
Всего: 2

На.....ига? smile

--------------------

...И приколется обломившийся и oбломится приколовшийся...

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Общие вопросы \| Следующая тема »