Delphi - Eliminar icono X

 
Vista:

Eliminar icono X

Publicado por jesus (1 intervención) el 04/10/2004 12:02:33
Hola tengo una pequeña ventana en una aplicación y quiero se salga de ella por el botón SALIR que lleva un close;
¿es posible eliminar el X de la esquina superior derecha, o por lo menos, desactivarla?
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Eliminar icono X

Publicado por Dr Juzam (821 intervenciones) el 04/10/2004 13:23:31
Pon el siguiente código en el OnCreate del Form

var
hMenuHandle : HMENU;
begin
hMenuHandle := GetSystemMenu(Form1.Handle, FALSE);
if (hMenuHandle <> 0) then
DeleteMenu(hMenuHandle, SC_CLOSE, MF_BYCOMMAND);
end;

También puedes poner la propiedad biSystemMenu (en BorderIcons del Form) a False. De este modo no aparecerá ningún botón.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar