Ver Mensaje Individual
  #2  
Antiguo 06-08-2007
Avatar de jhonny
jhonny jhonny is offline
Jhonny Suárez
 
Registrado: may 2003
Ubicación: Colombia
Posts: 7.058
Reputación: 30
jhonny Va camino a la famajhonny Va camino a la fama
Ejemplo... tengo en un formulario, un TEdit (llamado Edit1) vacio y quiero mostrar el mensaje que quieres:

Código Delphi [-]
if StringReplace(Edit1.Text, ' ','', [rfReplaceAll]) = '' then
  if MessageDlg('Realmente desea guardar con datos vacios', mtConfirmation, [mbYes, mbNo],0) = mrYes then
     //Haga lo que tenga que hacer... por ejemplo, guardar los datos


Tambien puedes usar el MessageBox en lugar de MessageDlg (buscalo en la ayuda de Delphi) en caso de que asi lo quieras.
__________________
Lecciones de mi Madre. Tema: modificación del comportamiento, "Pará de actuar como tu padre!"

http://www.purodelphi.com/
http://www.nosolodelphi.com/

Última edición por jhonny fecha: 06-08-2007 a las 20:35:01.
Responder Con Cita