Форум: "Начинающим";
Текущий архив: 2007.07.01;
Скачать: [xml.tar.bz2];
ВнизПотомок TMemo Найти похожие ветки
← →
iXT © (2007-06-04 12:15) [0]С понедельничком! :)
Есть у сабжа свойство RowCount (из названия я думаю понятно чего делает)
Надо перехватить OnChange (типа override) и потом что-то вроде:
begin
inherited ...
if Lines.Count > FRowCount then ...
end;
НО FOnChange определен как
FOnChange: TNotifyEvent;
property OnChange: TNotifyEvent read FOnChange write FOnChange;
Как его сюда приладить не сооброжу...
← →
clickmaker © (2007-06-04 12:18) [1]procedure TCustomEdit.Change; ?
← →
iXT © (2007-06-04 12:28) [2]> clickmaker © (04.06.07 12:18)
Да, видел ее. Тока запутался немного из-за read FOnChange write FOnChange;
Не понял как она тут прижилась
Получиться что-то вроде:
procedure TMyMemo.Change; override;
procedure TMyMemo.Change;
begin
inherited Cahge;
... // Мой код
end;
← →
iXT © (2007-06-05 17:24) [3]Как из Lines убрать (красиво) последний #13#10?
Страницы: 1 вся ветка
Форум: "Начинающим";
Текущий архив: 2007.07.01;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.004 c