Форум: "Основная";
Текущий архив: 2002.12.19;
Скачать: [xml.tar.bz2];

Вниз

Создание компонента:   Найти похожие ветки 

← →
^Sanya   (2002-12-10 11:51) [0]

как в потомке TStringGrid переопределить OnGetEditText ?
Заранее благодарен.

---

← →
Calm   (2002-12-10 11:56) [1]

Точно так же, как и вседа.
Когда захочешь подвесить обработчик к экземпляру класса-потомка, то Дельфя сгенерит код

procedure MyForm.MyStringGrid1GetTextEdit(...);
begin
inherited; {Это и есть твой переоределенный обработчик}
end;

---

← →
VaS   (2002-12-10 11:58) [2]


...
protected
function GetEditText(ACol, ARow: Longint): string; override;
end;

function TMySGrid.GetEditText(ACol, ARow: Longint): string;
begin
inherited; //обязательно, иначе не будет выполнятся OnGetEditText
//...
end;


---

← →
^Sanya   (2002-12-10 12:16) [3]

> Calm © (10.12.02 11:56)
> Точно так же, как и вседа.


Что-то не выходит у меня "как всегда" :(


> VaS © (10.12.02 11:58)

А как насчёт "Incompatible types"???

---

← →
VaS   (2002-12-10 12:24) [4]


...
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:28) [5]

> VaS © (10.12.02 12:24)

Вот спасибо!

---

Страницы: 1 вся ветка

Форум: "Основная";
Текущий архив: 2002.12.19;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.45 MB
Время: 0.007 c