Aparezca la opcion minimizar

[el_barto]

Buenos Dias

En una de mis ventanas del aplicativo cuando le daba clic en cerrar necesitaba que me apareciera un mensaje que me dijera que si estaba seguro de salir a si que hice esto:

Código Delphi [-]
procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
 begin
   with Application do
     CanClose := MessageBox('¿Esta Seguro de Cerrar el Aplicativo?',
       PChar(Title), MB_ICONQUESTION + MB_YESNO) = IDYES;
 end;

y funciono pero mi problema es que no me aparece la opcion de minimizar,
(-) y es indispensable que aparezca.

Gracias por la ayuda.

[kalimero]

Hola.
Revisa la propiedad BorderIcons del Formulario y mas concretamente biMinimice. Tiene que estar a true.

saludos

[el_barto]

Si Eso ya lo Habia mirado y esta en True, pero al momento de ejecutar el programa
no me quiere salir la opcion de minimizar.

[el_barto]

Ya me di Cuenta cual era el problema, el problema era que habia modificado algunas de las propiedades de la forma.

[roman]

¿Y qué tiene que ver esto con Interbase? Creo que con más de 400 mensajes ya es hora de que coloques los hilos en los lugares adecuados.

// Saludos

[vtdeleon]

Saludos

Es que la aplicacion utiliza Interbase!!*


*Solo es broma