Как добавить в штатный класс свой обработчик события? - Visual Basic .NET

Формулировка задачи:

Нужно переопределить штатный класс TextBox, добавляя в него свои реализации требуемых нам обработчиков сообщений. На Delphi это выглядит так:

                    Листинг программы
                
 
                        
                          
                    
type
  TEdit = class(StdCtrls.TEdit)
  private
    procedure WMSetFocus(var Message: TWMSetFocus); message WM_SETFOCUS;
    procedure WMSetCursor(var Message: TWMSetCursor); message WM_SETCURSOR;
  end;
 
...
 
{ TEdit }
 
procedure TEdit.WMSetCursor(var Message: TWMSetCursor);
begin
  inherited;
  HideCaret(Handle);
end;
 
procedure TEdit.WMSetFocus(var Message: TWMSetFocus);
begin
  inherited;
  HideCaret(Handle);
end;

Как скрыть курсор?

Решение задачи: «Как добавить в штатный класс свой обработчик события?»

textual
                            Листинг программы 
                        
 
                        
                          
                    
Public Class MyTextBox
    Inherits TextBox
 
    Protected Overrides Sub WndProc(ByRef m As Message)
        'Обработка оконных сообщений
        MyBase.WndProc(m)
    End Sub
End Class

Оцени полезность:

10 голосов , оценка 3.8 из 5

Нужна аналогичная работа?

Оформи быстрый заказ и узнай стоимость

Похожие ответы