Criss
03 de Noviembre del 2004

Alguien sabe como puedo personalizar las acciones de los botones de un TDBNavigator????
Urgente

Julio
03 de Noviembre del 2004

Usa el evento BeforeAction, el cual tiene lugar antes de que suceda la acci贸n. Para averiguar que boton se ha pulsado usa el par谩metro Buttons.
Ejemplo: if (Button= nbEdit) then
// Pones aqui tu codigo.
Por ultimo, si quieres anular la acci贸n por defecto de ese bot贸n, por ejemplo si se ha pulsado nbInsert y no deseas que se inserte, escribes:
BtnClick(nbCancel);
BtnClick( lo que sea) simula que has pulsado ese bot贸n. En nuestro caso has cancelado la acci贸n de insertar.

cristina
03 de Noviembre del 2004

Hola, necesito t煤 ayuda urgentemente, no entiendo muy bien lo de BtnClick(nbCancel), me refiero a que no s茅 como ponerlo, entiendes?, podr铆as ponerme un ejemplo, por favor, es superurgente, gracias de antemano

track
03 de Noviembre del 2004

aqui hay un ejemplo de como personalizar el dbnavigator.

var
BtnName: string;
begin
case Button of
nbFirst : Begin BtnName := 'nbFirst'; ShowMessage('priemro'); end;
nbPrior : begin BtnName := 'nbPrior'; ShowMessage('anterior'); end;
nbNext : begin BtnName := 'nbNext'; ShowMessage('siguiente'); end;
nbLast : begin BtnName := 'nbLast'; ShowMessage('ultimo'); end;
nbInsert : begin BtnName := 'nbInsert'; ShowMessage('insertar'); end;
nbDelete : begin BtnName := 'nbDelete'; ShowMessage('borrar'); end;
nbEdit : begin BtnName := 'nbEdit'; ShowMessage('editar'); end;
nbPost : begin BtnName := 'nbPost'; ShowMessage('guardar'); end;
nbCancel : begin BtnName := 'nbCancel'; ShowMessage('cancelar'); end;
nbRefresh: begin BtnName := 'nbRefresh'; ShowMessage('priemro'); end;
end;