Probleme pour cacher mon applicationRésolu

Question

Bonsoir a tous voila enfaite j'ai crée une application et j'aimerais quand la personne lance mon application qu'elle ne soit pas visible a l'écran pour ce faire j'ai utilisé le SW_HIDE mais cela ne fonctionne pas ! Je ne sais pas trop comment l'utiliser

( J'aimerais si possible que mon application ne soit pas visible dans la barre des taches non plus)

Merci beaucoup

emirej · Accepted Answer

C'est bon j'ai trouvé pour le caché j'ai mit ceci dans le Oncreate

procedure TForm1.FormCreate(Sender: TObject);
begin
SetWindowLong(Application.Handle, GWL_EXSTYLE, WS_EX_TOOLWINDOW); // Rend l'application Invisible
end;

end.

Merci

shell13010 · Answer

mais dans le
fichier .dpr

application.ShowMainForm:=False;

et ton application sera invisible

emirej · Answer

Je note en Oncreate ?

emirej · Answer

Y aurai moyen d'avoir un exemple stp

emirej · Answer

je sais pas ou est le dpr

emirej · Answer

svp

shell13010 · Answer

tu as un fichier *.dpr un fichier *.pas etc..

click droit sur le fichier *.dpr ouvrir avec bloc note et tu rajoute apres le 
begin
application.ShowMainForm:=False;
etc......

emirej · Answer

Merci

emirej · Answer

Merci effectivement mon application est bien invisible a l'ecran mais y a un probleme car il est quand meme visible dans la barre des taches ( voir photo)
http://img369.imageshack.us/img369/2292/probdelphikh4.jpg

Pouvez m'aidé a le rendre invisible complétement ?

Nicolas___ · Answer

Pourquoi veux tu cacher ton programme ... ? 

Enfin ca marche tres bien , dans le dpr tu mets( comme cité au dessus) Application.ShowMainForm:=False;

ET 

dans le onCreate 

ShowWindow (Form1.Handle, SW_Hide);
showwindow(Application.handle,Sw_hide);

G testé , cela fonctionne tres bien , mais l'application est tjs visible dans le TaskManager de Windows

emirej · Answer

Merci je vais testé

Nicolas___ · Answer

Encore que je retire ce que j'ai dit ( Faudrait une fonction EDITER ! ) 

Il suffit de mettre  (pour mon cas , donc surement le tient vu que tu es aussi sous windows) 
    Application.ShowMainForm:=False; dans le DPR

emirej · Answer

C'est fait je le lance trjs invisible sauf dans la barre des taches comme la photo précédentes :s

Y a vraiment pas moyen qu'il ne s'affiche pas dans la barre des taches ? Normalment il y a moyen

Nicolas___ · Answer

Ben si qu'il y a moyen vu que moi ca ce cache dans la barre des taches ...

Ahh les joies de l'informatique 

Bon je vais encore regarder un peu a ca ...

emirej · Answer

Ah bon pourtant j'ai fait toutes les étapes ! Mofidier le dpr avec Application.ShowMainForm:=False; et le Oncreate comme tu me la dit ! Apres je build puis la il apparait dans la barre windows :\

Nicolas___ · Answer

La barre des taches te fait .... ?! 
Suffit de la virer :) 

var 
    TaskBar :HWND;

...

procedure TForm1.FormCreate(Sender: TObject);
begin
  TaskBar := FindWindow('Shell_TrayWnd', nil);
  ShowWindow(TaskBar , SW_HIDE);
end;

procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
   ShowWindow(TaskBar , SW_SHOW);;
end;

voila tant que ton prog tournera , il n'y aura pas de barres des taches :) 

Bon c pour rire , mais je trouvais ca assez fort

emirej · Answer

Ptdr ! Non je veux trjs la barre des taches chez moi xD Mais parcontre je veux pas que mon application apparaise dedans :p

emirej · Answer

Vous avez trouvé ?

Cirec · Answer

Sauf que quand tu minimise l'application elle se retrouve en bas de l'écran ... pas top

Dans le OnShow de ta Form tu mets :
  ShowWindow(Application.Handle, SW_HIDE);    

 
@+
Cirec

<hr siz="" />

Probleme pour cacher mon application

19 réponses

Votre réponse

Discussions similaires