[JXJ]

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