cacher une MDi

Question

Bonjour tout le monde, vala, j'ai un petit probleme avec une form mdi:

en effet, mon but est de cacher l'application pour la mettre dans le tray. Chose que j'arrive tres bien a faire sur une application normal, mais quand j'ai essayé avec des fenetres filles dans la MDI, ben pas moyen de cacher...j'ai donc essayé de cacher les filles, mais ca me fait une belle erreur disant que cacher une form MDI spobien :D

si quelqu'un a une idée ^^

le code actuel c'est ca :)


procedure TMain.OnMinimize(Sender:TObject);
Var
  Info : TNotifyIconData;
  I    : integer;
begin
  Application.MainForm.Visible := false;
  Info.cbSize := SizeOf(Info);
  Info.Wnd    := self.Handle;
  Info.uID    := 1;
  Info.hIcon  := ExtractIcon(Application.Handle,PChar(Application.exename), 0);
  Info.uCallbackMessage := WM_XIRCICONE;
  Info.uFlags := NIF_TIP Or NIF_ICON Or NIF_MESSAGE;
  Shell_NotifyIcon(NIM_ADD,@Info);
end;


bouh

cs_neko · Answer

Bon, bha ai finallement trouvé, j'ecrit le soluce pour si y'en a un qui se retrouve avec le meme probleme:
suffisait de mettre ShowWindow(application.handle, SW_HIDE); ^^'

bouh

am0n · Answer

Cacher une MDi

2 réponses

Votre réponse

Discussions similaires