| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Как изменить TInplaceEdit у TDBGrid?

vadim2 ©   (2002-09-23 10:13:00) 

Конкретнее, как обработать WM_PASTE?

---

Рыжик   (2002-09-23 11:24:00) [1]

Т.е.:

procedure TMyInplaceEdit.WMPaste(var Message: TWMPaste);
begin
inherited;
ShowMessage("Paste");
end;

---

Рыжик   (2002-09-23 11:21:00) [2]

TMyInplaceEdit = class(TInplaceEdit)
private
procedure WMPaste(var Message:TWMPaste);message WM_PASTE;
end;

TMyDBGrid = class(TDBGrid)
protected
function CreateEditor: TInplaceEdit; override;
end;

procedure TMyInplaceEdit.WMPaste(var Message: TWMPaste);
begin
ShowMessage("Paste");
end;

function TMyDBGrid.CreateEditor: TInplaceEdit;
begin
Result:=TMyInplaceEdit.Create(Self);
end;

---

Наверх