[[Caral]]

Hola
Espero te sirva:

Código Delphi [-]
MessageBox(Handle, 
             PChar('Ha introducido un nombre que ya existe' + #13#10 + 
                   'Por Favor cambie por otro,---Gracias---'), 
             PChar('Cliente Duplicado'),
             MB_OK + MB_DEFBUTTON1 + MB_APPLMODAL);

Saludos