Ayuda para mostrar un mensaje

[jose001]

Hola buenas tardes estoy trabajando con una aplicacion desarrollada en delphi 2010
lo que necesito es realizar una eliminacion de una grilla la cual tiene varios datos que corresponden a 2 tablas, Lo que quiero es al apretar el boton eliminar mostrar un mensaje que diga" Desea eliminar todo el registro de este cliente o solo su puesto de trabajo" y en los botones esto me digan "Todo,Solo puesto,Cancelar" y segun el boton que clikee realizar alguna accion
e buscado mucho y no encontre una forma para cambiar los mensajes de los botones, No se si esto es posible en delphi, alguna ayuda ? gracias

[Casimiro Notevi]

¿Te refieres al texto de los botones?

[roman]

y en los botones esto me digan "Todo,Solo puesto,Cancelar" y segun el boton que clikee realizar alguna accion


Pues mira, podrías crear tu propio cuadro de diálogo con un formulario y los botones exactos que deseas. O bien, usar este código para salir al paso:


var
Dialog: TForm;

begin
Dialog := CreateMessageDialog(
'¿Desea eliminar todo el registro de este cliente o solo su puesto de trabajo?',
mtWarning,
[mbYes, mbNo, mbCancel]);

TButton(Dialog.Controls[2]).Caption := 'Todo';
TButton(Dialog.Controls[3]).Caption := 'Sólo puesto';
TButton(Dialog.Controls[4]).Caption := 'Cancelar';

try
case Dialog.ShowModal of
mrYes: ShowMessage('Escogió todo');
mrNo: ShowMessage('Escogió sólo puesto');
mrCancel: ShowMessage('Escogió cancelar');
end;
finally
Dialog.Free;
end;
end;


LineComment Saludos