7.2. Derivados de TCustomForm

Close()

El método Close() cierra el formulario, pero antes realiza una llamada a la función CloseQuery() para preguntar si es correcto cerrarlo.

La función CloseQuery() llama al manipulador de eventos  OnCloseQuery. Si la variable lógica que pasa el manipulador es false, el formulario no se cierra y si es true, el formulario se cierra normalmente.

Se puede utilizar el manipulador de eventos  OnCloseQuery para pedir al usuario que guarde un archivo que aún no se ha guardado, antes de cerrar el formualario.

Nota: Cuando el formulario de la aplicación se cierra, la aplicación termina.

void __fastcall Close(void);

The following method closes a form when a button called Done is clicked:

void __fastcall TForm1::DoneClick(TObject *Sender)
{
Close(); 
}

CloseQuery()

CloseQuery se usa para determinar cuando el formulario puede ser cerrado. Si el formulario puede ser cerrado, CloseQuery retorna true de lo contrario retorna false.

Para un formulario MDI principal, CloseQuery llama a los métodos CloseQuery de los formularios MDI secundarios para determinar el valor de retorno.

bool __fastcall CloseQuery(void);

DefocusControl()

Quita el foco del un control situado en el formulario.

void __fastcall DefocusControl(Controls::TWinControl* Control, bool Removing);

FocusControl()

Activa el foco de un control situado en el formulario.

void __fastcall FocusControl(Controls::TWinControl* Control);

GetFormImage()

Hide()

Oculta el formulario sin descargarlo de memoria. El método hide actúa sobre la propiedad visible situándola a false.

HIDESBASE void __fastcall Hide(void);

This code uses a button and a timer on a form. When the user clicks the button, the form disappears for the period of time specified in the Interval property of the timer control, then the form reappears:

 

void __fastcall TForm1::Button1Click(TObject *Sender)
{
  Timer1->Enabled = true;
  Hide();
}
void __fastcall TForm1::Timer1Timer(TObject *Sender)
{
  Visible = true;
  Timer1->Enabled = false;
}

Print()

Imprime el contenido del formulario. Solo se imprime el área del cliente, no se imprime la leyenda, la barra del título ni los bordes. Es un método útil para realizar volcados rápidos del formulario a la impresora.

void __fastcall Print(void);

This example uses a button named Print on a form. When the user chooses the button, the form prints.

void __fastcall TForm1::PrintClick(TObject *Sender)
{
   Print();
}

Release()

Destruye el formulario y libera la memoria ocupada por este.

void __fastcall Release(void);

This example displays a message box about the form going away, calls Release, and terminates the application.

void __fastcall TForm1::ButtonClick(TObject *Sender)
{
Application->MessageBox("This form is going away forever", "Release Notice", MB_OK);
Release();
Application->Terminate();
}

SendCancelMode()

SetFocus()

Activa el formulario y lo coloca en primer plano. En la propiedad ActiveControl se especifica el componente que recibe el foco.

virtual void __fastcall SetFocus(void);

When the user clicks the button on this form, the list box becomes the active control and receives the input focus:

void __fastcall TForm1::Button1Click(TObject *Sender)
{
   ListBox1->SetFocus();
}

SetFocusedControl()

Enfoca un control contenido en el formulario.

bool __fastcall SetFocusedControl(Controls::TWinControl* Control);

Show()

Show() abre un formulario de forma no modal (otros formularios se pueden activar mientras éste está visible).

Nota: El método Show actúa sobre la propiedad Visible del formulario situándola a true.

HIDESBASE void __fastcall Show(void);

This code puts away the current form and displays another:

void __fastcall TForm1::Button1Click(TObject *Sender)
{
Form1->Hide();
Form2->Show();
}

To run this example you must include the header file for Form2.

ShowModal()

Con ShowModal, el formulario se ejecuta de forma modal (un formulario modal debe cerrarse para seguir trabajando con la aplicación).

int __fastcall ShowModal(void);

This code uses two forms and a button on the first form. The user must close Form3 before the focus returns to Form1.

#include "Unit3.h"
void __fastcall TForm1::ButtonClick(TObject *Sender)
{
Form3->ShowModal();
}