Thema: Delphi TabOrder überschreiben

Einzelnen Beitrag anzeigen

Benutzerbild von SirThornberry
SirThornberry
(Moderator)

Registriert seit: 23. Sep 2003
Ort: Bockwen
12.235 Beiträge
 
Delphi 2006 Professional
 
#7

Re: TabOrder überschreiben

  Alt 4. Nov 2004, 07:20
du musst von TEdit ableiten und eine Message abfangen
Delphi-Quellcode:
  TTabEdit = class(TEdit)
  private
    procedure FWMGETDLGCODE(var Msg : TWMGetDlgCode); message wm_GetDlgCode;
  end;
[...]
procedure TTabEdit.FWMGETDLGCODE(var Msg : TWMGetDlgCode);
begin
  inherited;
  Msg.Result := Msg.Result or DLGC_WANTTAB;
end;
Anschließend bekommst du im OnKeyPress etc. auch das Event wenn die Tab-Taste gedrückt wird
Jens
Mit Source ist es wie mit Kunst - Hauptsache der Künstler versteht's
  Mit Zitat antworten Zitat