Saber sobre que item estoy de un ComboBox

[ecfisa]

Hola.

Empezado por aguml

Por cierto, esto que haces:

Código PHP:

 (LPARAM)(pt.y * 65535 + pt.x) 


Viene a ser lo mismo que hacer esto ¿no?:

Código PHP:

 (LPARAM)MAKELONG(pt.x, pt.y) 


Si, es equivalente.

Por cierto en tu ejemplo saldría para todos los combobox del form pero en mi caso tengo dos forms y solo quiero ese comportamiento en uno por lo que supongo que teniendo el hWnd puedo obtener el nombre o el número de instancia para saber cual es ¿no?

Se me ocurre que una forma sencilla de discriminarlo podría ser:
.h

Código PHP:

class TForm1 : public TForm
{
__published:
...
private:
  bool FInCBox1;  
  void __fastcall AppIdle(TObject *Sender, bool &done);
... 


.cpp

Código PHP:

...
TStrings* ListaHints; 

void __fastcall TForm1::FormCreate(TObject *Sender)
{
  Application->OnIdle = AppIdle;
  ...
  FInCBox1 = false;
  ListaHints = new TStringList;
  ListaHints->Assign(ComboBox1->Items);
}

void __fastcall TForm1::AppIdle(TObject *Sender, bool &done)
{
  TPoint pt;
  HWND HWL;

  GetCursorPos( &pt );
  HWL = WindowFromPoint( pt );

  if ( HWL != 0 )
  {
    StatusBar1->SimpleText = "";
    char buff[128];
    GetClassName( HWL, buff, sizeof( buff ) );
    if ( StrIComp( buff, "ComboLBox" ) == 0)
    {
      if ( FInCBox1)
      {
        ::ScreenToClient( HWL, &pt );
        int inx = LOWORD( SendMessage( HWL, LB_ITEMFROMPOINT, 0,
          (LPARAM)(pt.y * 65535 + pt.x) ) );

        if ( inx >= 0 )
          StatusBar1->SimpleText = ListaHints->Strings[inx];
      }
    }
  }
}

void __fastcall TForm1::ComboBox1DropDown(TObject *Sender)
{
  FInCBox1 = true;
}

void __fastcall TForm1::ComboBox1CloseUp(TObject *Sender)
{
  FInCBox1 = false;
}

...

void __fastcall TForm1::FormDestroy(TObject *Sender)
{
  delete ListaHints;
} 


La StatusBar la tengo de forma que muestra los hint de todos los componentes al ponerse encima así que creo que con cambiar el hint me valdría ¿no?

Si.

Saludos