Crear ventana de error DELPHI

[creus]

Estoy empezando con esto de Delphi y mi corta experiencia con este lenguaje no me permite crear una ventana con mensaje de error al escribir texto en un campo de caracter entero.
Gracias por la ayuda

[[seoane]]

Para mostrar un mensaje de error puedes usar el clásico ShowMessage:

Código Delphi [-]
ShowMessage('Teclea bien hombre ...');

Este se muestra en una ventana con un botón que pone 'OK'. Pero si quieres que el botón se muestre en castellano y aparezca un bonito icono de error podemos usar la función Messagebox:

Código Delphi [-]
procedure MostrarError(Titulo, Mensaje: string);
begin
  Messagebox(Application.Handle,PChar(Mensaje),PChar(Titulo),MB_OK or MB_ICONERROR);
end;

// Por ejemplo
MostrarError('Mensaje de error','Teclea bien hombre ...');

[creus]

Gracias por la ayuda, me has solventado el problemilla, supongo que tendré más dudas. De nuevo gracias.