Ver Mensaje Individual
  #4  
Antiguo 27-05-2013
Avatar de defcon1_es
defcon1_es defcon1_es is offline
Miembro
 
Registrado: mar 2004
Ubicación: Cuenca - España
Posts: 533
Reputación: 21
defcon1_es Va por buen camino
Hola. En el evento OnClick del navegador ya se indica el botón pulsado...

Código Delphi [-]
procedure TForm1.DBNavigator1Click(Sender: TObject; Button: TNavigateBtn);
begin
(*
  TNavigateBtn = (nbFirst, nbPrior, nbNext, nbLast,
                  nbInsert, nbDelete, nbEdit, nbPost, nbCancel, nbRefresh);
*)
  if Button = nbFirst then
    lo_que_sea;
end;
__________________
Progress Openedge
https://abevoelker.com/progress_open...dered_harmful/


Delphi forever...
Responder Con Cita