Foros Club Delphi - Capturar cambios en un DBLookUpComboBox

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)

- OOP (https://www.clubdelphi.com/foros/forumdisplay.php?f=5)

- - Capturar cambios en un DBLookUpComboBox (https://www.clubdelphi.com/foros/showthread.php?t=27576)

Capturar cambios en un DBLookUpComboBox

No encuentro una manera facil de capturar el cambio de opcion, realizada por el usuario, en un DBLookUpComboBox.

En el DBComboBox, utilizo el evento OnChange, pero no se como hacerlo en este caso.

Desde ya muchas gracias por sus sugerencias !!! ;)

Un abrazo.

Puedes utilizar el evento OnClick.

Un Saludo.

Otra forma de hacerlo sería capturando el evento OnChange del campo que está relacionado con el DBLookUpComboBox, es decir, abres el editor de campos del DataSet y cada uno de los campos tendrá su propio evento Onchange.

Saludos

Muchas Gracias a Ambos !!!... Era lo que necesitaba :)

Un abrazo.

Otra manera de hacerlo

Me he encontrado con el mismo problema e investigando he encontrado otra manera de hacerlo: usando la técnica de las clases interpuestas que explica a las mil maravillas nuestro amigo Marteens en este artículo y usando el siguiente código para implementar el evento OnChange en la clase TDBLookupComboBox

Código Delphi [-]unit MyDBLookupComboBox;
 
interface
 
uses Classes, DBCtrls;
 
type
  TDBLookupComboBox = class(DBCtrls.TDBLookupComboBox)
  private
    FOnChange: TNotifyEvent;
  protected
    procedure KeyValueChanged; override;
  published
    property OnChange: TNotifyEvent read FOnChange write FOnChange;
  end;
 
implementation
 
procedure TDBLookupComboBox.KeyValueChanged;
begin
  inherited;
  if Assigned(FOnChange) then
    FOnChange(Self);
end;
 
end.

Un saludo