DBNavigator con TEdit/TCombobox

[koalasoft]

Una duda .. este procedimiento ...

Código Delphi [-]
// Asignado al evento OnClick de los 4 botones
procedure TForm1.ButtonsOnClick(Sender: TObject);
begin
  with TButton(Sender) do
    case Tag of
      1: tuDataSet.First;  // ir al primer registro
      2: tuDataSet.Next;   // ir al siguiente registro
      3: tuDataSet.Prior;  // ir al registro anterior
      4: tuDataSet.Last;   // ir al último registro
    end;
end;

Lo comento por que el parametro ButtonsOnClick no me aparece y me marca [Error] Undeclared identifier: 'ButtonsOnClick' al colocarlo..

Hay que crearlo tal cual o ese codigo va en CADA evento OnClick de cada boton (BtnUltimo, BtnProximo.... etc) ?

[ecfisa]

Hola.

En tiempo de diseño, aprieta la tecla Ctrl y haciendo click izquierdo del mouse (sin soltarlo) selecciona los cuatro Edits, levanta el botón del mouse. El Object Inspector dirá: "4 items selected" indicando que los 4 botones quedaron seleccionados.

Desde el mismo Object Inspector hace click en la pestaña Events y doble click sobre el evento OnClick. El evento se asignará a los 4 botones y por defecto se llamará Button1Click.

Podes dejar el nombre por defecto o cambiarlo por uno más significativo como lo hice en el ejemplo anterior.

Saludos.

[koalasoft]

Excelente !! ... Muchas Gracias !! ...