Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Varios
Registrarse FAQ Miembros Calendario Guía de estilo Buscar Temas de Hoy Marcar Foros Como Leídos

Grupo de Teaming del ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 12-05-2007
JXJ JXJ is offline
Miembro
 
Registrado: abr 2005
Posts: 2.475
Poder: 22
JXJ Va por buen camino
Question PopUPForm sobre PopUPForm

Hola.

No saben como puedo obtener la posicion y tamaño de una
forma, creada, en tiempo de ejecucion.

Estoy haciendo mi popup tipo msn y ya casi quedo.
solo que no se como hacer que la forma nueva. este encima
de una anterior ya creada.

----------
|popup3 |
---------
|popup2 |
---------
|popup1|
---------
Systemtray
---------


en el boton empleo

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
var ordenes : Integer;
         NVN: TVNotF; //<- Form que quiero que funcione como la del  mssenger
begin
//if  condicion para mostrar PopUp = 0 then exit;
   NVN := TVNotF.Create(Form1);
  { Metemos los datos a la ventanita de notificación
  }
    ordenes := random(100);
    NVN.Label1.Caption := 'Notificacion de suceso ' + inttostr(ordenes);
    NVN.show;
end;



en la forma que quiero que sea popup tipo messenger
en el evento onformshow

Código Delphi [-]

procedure TVNotF.FormShow(Sender: TObject);
begin
// Aqui definimos el Tamaño del popup, al mostrarse.
self.clientheight:=200;  //Alto de la ventana
self.ClientWidth :=300;  //Ancho de la ventana
//Definimos posicion del la ventana en la pantalla
  self.Left := Screen.WorkAreaWidth - self.Width ; //ponemos la ventana a la Derecha de la pantalla
  self.Top := Screen.WorkAreaHeight - self.Height; //ponemos la ventana en la parte inferior de la pantalla
try  //si queremos cargar una imagen.
// Image1.Picture.LoadFromFile(ExtractFilePath(Application.ExeName)+'\carpeta\'+'imagen.jpg');
except
end;
end;

les adjunto el codigo que empleo.

gracias

Última edición por JXJ fecha: 02-12-2008 a las 19:11:18.
Responder Con Cita
  #2  
Antiguo 12-05-2007
Avatar de droguerman
droguerman droguerman is offline
Miembro
 
Registrado: abr 2005
Ubicación: tierra
Posts: 999
Poder: 20
droguerman Va por buen camino
revisa lo que te envio:
Archivos Adjuntos
Tipo de Archivo: zip popw3.zip (9,0 KB, 22 visitas)
__________________
self.free;
Responder Con Cita
  #3  
Antiguo 12-05-2007
JXJ JXJ is offline
Miembro
 
Registrado: abr 2005
Posts: 2.475
Poder: 22
JXJ Va por buen camino
muchas gracias droguerman
nunca se me ubiera ocurrido usar el timer de esa forma.
Responder Con Cita
Respuesta


Herramientas Buscar en Tema
Buscar en Tema:

Búsqueda Avanzada
Desplegado

Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro


La franja horaria es GMT +2. Ahora son las 17:36:28.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi