J'ai besoin d'un prog. Facile a faire ?

J'ai besoin d'un prog. Facile a faire ? - Programmation

Marsh Posté le 16-12-2001 à 19:37:48    

je voudrais faire ce genre de programme :
 
http://nolimit22.multimania.com/prog.jpg
 
les 3 cases doivent émuler la fonction "executer" de windows.
 
donc si je tape l'adresse pour lancer un prog, ca doit l'executer.
par contre ca doit faire ca que quand le logiciel detecte une connexion a internet.
 
si possible, qd la connexion est coupée, ca ferme le logiciel.
 
si je veux faire ca en Delphi ou en C++
qu'elle fonction je dois utiliser ?  :??:

Reply

Marsh Posté le 16-12-2001 à 19:37:48   

Reply

Marsh Posté le 16-12-2001 à 20:39:33    

pour exécuter un programme et pouvoir le fermer par après, j'utiliserais CreateProcess (peut-être ShellExecute aussi, mais je ne suis pas sûr que tu puisses récupérer le programme après pour le fermer).
 
pour savoir si on est connecté ou pour simplement forcer la connexion/déconnexion, j'ai justement ça qui traînait sous la main, donc je le livre tel quel :
 

Code :
  1. uses wininet;
  2. Procedure SetGlobalOffline(fGoOffline:Boolean);
  3. var
  4.   ci: INTERNET_CONNECTED_INFO;
  5. Begin
  6.   if fGoOffline then
  7.   begin
  8.     ci.dwConnectedState := INTERNET_STATE_DISCONNECTED_BY_USER;
  9.     ci.dwFlags := ISO_FORCE_DISCONNECTED;
  10.   end
  11.   else
  12.     ci.dwConnectedState := INTERNET_STATE_CONNECTED;
  13.   InternetSetOption(nil,INTERNET_OPTION_CONNECTED_STATE, @ci, sizeof(ci));
  14. End;
  15. //Get Offline state;
  16. function IsGlobalOffline:Boolean;
  17. var
  18.   P : ^Longint;
  19.   size Word;
  20. Begin
  21.   result:=false;
  22.   Size:=4;
  23.   GetMem(P,Size);
  24.   if InternetQueryOption(nil,INTERNET_OPTION_CONNECTED_STATE,Pointer(p),Size) then
  25.     Result:= P^ and INTERNET_STATE_DISCONNECTED_BY_USER<>0;
  26.   Freemem(P,4);
  27. End;


---------------
mes programmes ·· les voitures dans les films ·· apprenez à écrire
Reply

Marsh Posté le 17-12-2001 à 20:04:16    

ok merci a toi  :)

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed