DbLookUpComboBox y DbGtrlGrid

[roman]

¡Caramba! De veras que hay gente lista

Si no quieres usar las librerías RX puedes solucinar el problema con el DbLookupComboBox (apuntando al campo Lookup) y poniendo esto en el evento OnCreate del formulario:

Código Delphi [-]
procedure TForm1.FormCreate(Sender: TObject);
var
  I: Integer;
  MyDataLink: TDataLink;
begin
  for I := 0 to DBLookupComboBox1.ControlCount - 1 do
    if DBLookupComboBox1.Controls[i] is TPopupDataList then
    begin
      MyDataLink := TDataLink(
        DBLookupComboBox1.Controls[i].Perform(CM_GETDATALINK, 0, 0)
      );
      if MyDataLink <> nil then
        MyDataLink.DataSourceFixed := False;
        MyDataLink.DataSource := nil;
    end;

Por cierto, este tipo de cosas las he encontrado en los foros de Borland con la búsqueda "DbCtrlGrid DbLookupComboBox".

// Saludos