| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Создание компонента: [D6, D7, Win95/98, WinXP]
^Sanya © (2002-12-10 11:51:00)как в потомке TStringGrid переопределить OnGetEditText ?
Заранее благодарен.
^Sanya (2002-12-10 12:28:00) [1]
> VaS © (10.12.02 12:24)
Вот спасибо!
VaS (2002-12-10 12:24:00) [2]
...
protected
function GetEditText(ACol, ARow: Longint): string; override;
end;
function TMySGrid.GetEditText(ACol, ARow: Longint): string;
begin
Result:=inherited GetEditText(ACol, ARow);
//...
end;
^Sanya (2002-12-10 12:16:00) [3]
> Calm © (10.12.02 11:56)
> Точно так же, как и вседа.
Что-то не выходит у меня "как всегда" :(
> VaS © (10.12.02 11:58)
А как насчёт"Incompatible types"???
VaS (2002-12-10 11:58:00) [4]
...
protected
function GetEditText(ACol, ARow: Longint): string; override;
end;
function TMySGrid.GetEditText(ACol, ARow: Longint): string;
begin
inherited; //обязательно, иначе не будет выполнятся OnGetEditText
//...
end;
Calm (2002-12-10 11:56:00) [5]Точно так же, как и вседа.
Когда захочешь подвесить обработчик к экземпляру класса-потомка, то Дельфя сгенерит код
procedure MyForm.MyStringGrid1GetTextEdit(...);
begin
inherited;{Это и есть твой переоределенный обработчик}
end;
| |
