Unschönes Perform (WM_NEXTDLGCTL,0,0) wenn edit dis-/enabled

[vt670]

Hallo Luckie,

danke für den Tipp. Werde die funktion heute morgen mal einbauen und austesten.
Zwar sehe ich auf anhieb keinen zusammenhang mit dem Problem aber man wiess ja nie
Ich hatt vermutet das Windows bei einem disable die TabOrder ändert und bei einem enable
diese falsch reproduziert. Mal sehen wie es sich hier verhält.
Danke für deine mühe und
viele grüsse
vt

Zitat von Luckie:

Ich benutze immer folgende Routine um Windows Kontrolls zu deaktivieren:

Delphi-Quellcode:

function EnableControl(hParent: THandle; ID: DWORD; Enable: Boolean): LongBool;
var
  hWnd                   : THandle;
begin
  hWnd := GetFocus;
  // jump to next control if control to disable has the focus
  // otherwise we will get stuck and TAB won't work
  if hWnd = GetDlgItem(hParent, ID) then
    SendMessage(hParent, WM_NEXTDLGCTL, 0, 0);
  result := EnableWindow(GetDlgItem(hParent, ID), Enable);
end;