Bienvenido(a), Visitante. Favor de ingresar o registrarse.

Ingresar con nombre de usuario, contraseña y duración de la sesión

Foros del Club

Foros del Club > Programación > Pascal/Object Pascal > Borland™ Delphi > Aplicación siempre encima de las demás
Páginas: [1]   Ir Abajo
« anterior próximo »
  Enviar tema  |  Imprimir  
Autor Tema: Aplicación siempre encima de las demás  (Leído 629 veces)
0 Usuarios y 1 Visitante están viendo este tema.
CID
Administrador
Legend
*****

Prestigio: 22
Desconectado Desconectado

Sexo: Masculino
Estudiante de: Arte de la informática
Título universitario: Programador
Profesión: Desarrollador
Mensajes: 1136



WWW
Lenguajes:
Varios
Bases de datos:
Varios
« en: 20/08/2007, 00:10:54 »
Código:
procedure TfrmMain.AlwaysonTopClick(Sender: TObject);
begin
alwaysontop.Checked := not alwaysontop.checked;
if alwaysontop.checked=true then
setwindowpos(frmmain.windowhandle,hwnd_topmost,0,0,1,1,swp_nomove or swp_nosize);
else
setwindowpos(frmmain.windowhandle,hwnd_notopmost,0,0,1,1,swp_nomove or swp_nosize);
end;
En línea
Club Desarrolladores
Chat de Santa Fe
Devs
DevStudios Software
Pathetic World
MaxMath
Lithium Framework Forum
JoRgE-1987
Programador
Legend
**********

Prestigio: 7
Desconectado Desconectado

Sexo: Masculino
Título universitario: No.
Profesión: Programador
Mensajes: 633

Geek


WWW
Lenguajes:
Object Pascal
Pascal
HTML
Aprendiendo C++
« Respuesta #1 en: 25/08/2007, 11:59:06 »
Muy util, muchas gracias, lo acabo de implementar.

Asi que en W2K, esta probado.

¿Alguien sabe si funciona en todas las versiones de Win?
En línea

Foros del Club
   
 En línea
Páginas: [1]   Ir Arriba
  Enviar tema  |  Imprimir  
« anterior próximo »
 
Ir a: