Club Delphi  
    Paypal   FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > OOP
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Coloboración Paypal con ClubDelphi

 
 
Herramientas Buscar en Tema Desplegado
  #2  
Antiguo 06-08-2007
Avatar de jhonny
jhonny jhonny is offline
Jhonny Suárez
 
Registrado: may 2003
Ubicación: Colombia
Posts: 7.070
Poder: 32
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
 



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Suma StrToInt para Edit vacios cocke C++ Builder 8 28-11-2006 09:19:40
Asistente para crear formularios (formas o fichas) Mauro.NET Varios 0 17-08-2005 18:36:09
Limpiar Campos En Los Formularios ercrizeporta Varios 3 26-06-2005 02:44:16
consultar campos vacios noe SQL 1 21-03-2005 17:35:42
Quiero crear un Boton para guardar Juan Ramon Conexión con bases de datos 3 02-11-2004 07:33:05


La franja horaria es GMT +2. Ahora son las 06:27:45.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi