Ver Mensaje Individual
  #5  
Antiguo 27-09-2008
Avatar de krlox31416
krlox31416 krlox31416 is offline
Miembro
 
Registrado: jun 2008
Ubicación: San Juan del Río, Querétaro, México
Posts: 75
Reputación: 16
krlox31416 Va por buen camino
es exactamente lo que dice delphius...

pero según a las necesidades de cada uno tambien se puede en el evento onclose;

Código Delphi [-]
procedure TForm5.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
begin
if Application.MessageBox('¿Desea salir de proveedores?','Confirmación',MB_YESNO+MB_ICONQUESTION) = mrNO Then
   begin
   CanClose := false;
   Form3.Visible:=False;
   ComboBox1.SetFocus;
   end
   else
   begin
   Form3.Visible:=True;
   Edit1.Clear;
   Edit2.Clear;
   Edit3.Clear;
   Edit4.Clear;
   Edit5.Clear;
   Memo1.Clear;
   ComboBox1.Text:='    Día';
   ComboBox2.Text:='         Mes';
   ComboBox3.Text:='      Año';
   end;
end;

espro y te sirva...
SALUDOS!!!
__________________
el cielo me dio un cariño sin merecerlo... chimikuilo!!!
Responder Con Cita