Ventanas estilo outlook
 

Hola a todos,

Tengo una inquietud, alguien ha hecho alguna aplicacion al estilo MS Outlook???, encontre este articulo http://www.delphi3000.com/articles/article_1619.asp?SK=, pero no me es muy claro del todo, asi que por favor alguien que me pueda dar una guia o un ejemplo para realizar esto. Gracias de antemano

q realmente quieres???
 

q es lo q realmente quieres hacer?, ya q el ejemplo q mencionas es para colocar form en paneles en una aplicacion cualquiera.

Código Delphi [-]
procedure TfrmIMMain.SetActiveDetailForm(F: TForm; ParentControl: 
TWinControl); 
begin 
  if ActiveDetailForm<>F then 
   begin 
    if Assigned(ActiveDetailForm) then 
        ActiveDetailForm.Hide; 
//the following two lines do what we need... 
    F.Parent:=ParentControl; 
    F.Align:=alClient; 
    ActiveDetailForm:=F; 
    F.Show; 
   end; 
end;

Gracias por responder, bueno te comento deseo realizar una aplicación pero al estilo Outlook Xp, en que la parte izquierda hay unos botones y si se da clic en uno de ellos a la derecha aparezca la ventana. No deseo tener muchas ventanas abiertas, algo como MDI pero al estilo que deseo, no se si soy muy claro...

Hola José.

Si no entiendo mal lo deseas hacer, creo que el ejemplo que te adjunto te sirvirá como guía. Es muy simple, consta de un TScrollBox, seis TBitBtn y un TPanel en el form principal y otro form.

A modo demostrativo, tiene asignado un código a los seis eventos OnClick de los TBitBtn. En él se cierran los forms abiertos (uno en este caso) y se crea un nuevo form que es mostrado en el TPanel de la derecha.

El TScrollBox es a fin de que puedas tener más botones que los que te permita la pantalla, ya que podrás desplazarte con el ScrollBar vertical hasta llegar a los no visibles en ese momento.


Saludos.