Name der aktiven Komponente ermitteln

[Bummi]

Mit GetFocus bekommst Du eine Fensterhandle zurück, das ist in diesem Fall aber nicht das Handle der Combobox, sondern eines "internen" Windowshandles

Delphi-Quellcode:

var
  s : String;
  h:HWND;
begin
  SetLength(s,255);
  h := GetFocus;
  GetClassName(h, @s[1], Length(s));
  Caption := s;
end;

bei einem normalen Edit bekommst Du TEdit bei der Combobox Edit