begin process at 2010 03 20 07:49:24
  Trouver un code source :
 
dans
 
Accueil > 

Code

 > 

Système

 > VERIFICATION D'EXECUTION DU DELPHI "DELPHI32"

VERIFICATION D'EXECUTION DU DELPHI "DELPHI32"


 Information sur la source

Note :
1,33 / 10 - par 3 personnes
1,33 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10
Catégorie :Système Classé sous :exécution, delphi, verification Niveau :Initié Date de création :27/08/2006 Vu / téléchargé :3 246 / 446

Auteur : abdousoft

Ecrire un message privé
Site perso
Commentaire sur cette source (5)
Ajouter un commentaire et/ou une note

 Description

salut
ce petit programme verifier l'execution du delphi"delphi32"
si delphi et en cours d'execution ou hors connection



 Fichier Zip

Les Membres Club peuvent télécharger directement un fichier contenu dans le zip sans télécharger le zip en entier !
  •   Verifier Delphi32
    • Unit1.~ddpTélécharger ce fichier [Réservé aux membres club]51 octets
    • Unit1.~dfmTélécharger ce fichier [Réservé aux membres club]353 octets
    • Unit1.~pasTélécharger ce fichier [Réservé aux membres club]1 180 octets
    • Unit1.dcuTélécharger ce fichier [Réservé aux membres club]4 482 octets
    • Unit1.ddpTélécharger ce fichier [Réservé aux membres club]51 octets
    • Unit1.dfmTélécharger ce fichier [Réservé aux membres club]360 octets
    • Unit1.pasTélécharger ce fichier [Réservé aux membres club]Voir ce fichier1 180 octets
    • Verifier.cfgTélécharger ce fichier [Réservé aux membres club]Voir ce fichier434 octets
    • Verifier.dofTélécharger ce fichier [Réservé aux membres club]Voir ce fichier3 253 octets
    • Verifier.dprTélécharger ce fichier [Réservé aux membres club]Voir ce fichier188 octets
    • Verifier.exeTélécharger ce fichier [Réservé aux membres club]394 752 octets
    • Verifier.resTélécharger ce fichier [Réservé aux membres club]1 620 octets

Télécharger le zip


 Sources du même auteur

Source avec Zip Source avec une capture POPUPMENU STYLE XP SANS COMPOSANT
Source avec Zip CONVERTISSEUR BINAIRE
Source avec Zip LA LISTE DES ERREURS DU BDE
Source avec Zip DEPLACER UNE FENETRE A L'AIDE DES TOUCHES DU CLAVIER
Source avec Zip EXEMPLE GENERAL D'UTILISATION DU SGBD PARADOX

 Sources de la même categorie

Source avec une capture VOTRE PROGRAMME DE MAIL COMME CLIENT MAIL PAR DÉFAUT SOUS WI... par MAURICIO
SYNCHRONISATION DE THREADS DANS DES DLL par saib
Source avec Zip Source avec une capture DISKINFO V1.0.0 par Christophe67
Source avec Zip Source avec une capture MEMORYSTATUS par Christophe67
Source avec Zip Source avec une capture GLIBWMI VCL COMPONENT LIBRARY 1.8B par Neftali

 Sources en rapport avec celle ci

FONCTION DE CONVERSION DE MILLISECONDES EN HH:MM:SS:MMM par vyseR
Source avec Zip Source avec une capture GLIBWMI VCL COMPONENT LIBRARY 1.8B par Neftali
Source avec Zip Source avec une capture PACKAGE BORLAND par blueperfect
Source avec Zip Source avec une capture PACKAGE MICROSOFT par blueperfect
Source avec Zip Source avec une capture DELPHI CSB (CODE SOURCE BIBLIOTHÈQUE) par Delphinet27

Commentaires et avis

Commentaire de CptPingu le 27/08/2006 17:13:17

Ta source est un peu maigre... Je m'attendais à un soft qui se protegerais contre les debuggers, mais on se retrouve avec simplement une recherche de Delphi dans les processus actifs.

De plus, ca ne marche pas chez moi. J'ai WinXP pro SP1, et Delphi 7.0 pro. Ton code me met toujours cette phrase "Delphi et fermer" (en passant on écrit "Delphi est fermé").

Si tu pouvais modifier ta source de facon à ce qu'on sache si l'executable à été lancé normalement ou à travers le debuggeur Delphi, là ca serait effectivement interessant.

Commentaire de hurrycane le 27/08/2006 21:59:41

Tout d'abord :

1. Ton code ne marche pas. parceque tu recherche la presense de delphi par le titre de la fenetre de l'inspecteur d'objet et le nom de sa classe dans la version que ce qui differe selon les version ou bien la personnalisation des fenetres de l'ide !!!

2. Meme si ca marche c'est pas fiable car on peut contourner ceci facilement par la creation d'une applii avec un nom de fiche "Object Inspector" et un nom de classe "TPropertyInspector"

3. Cite moi un seul cas de figure ou en aurait besoin de savoir si delphi est en cours d'execution.si ton exemple etait personnalisable pour rechercher un processu (mais pas de cette maniere) ce serait plus ou moins utile.

4. 3. Le niveau initié ????? pourquoi !

je te donne 2/10 essaie de le développer plus d'enfaire un utilitaire de recherche de processus générique (la recherche par nom de processus c'est plus intéressant !)je pense ue meme dans ton exemple on a pas besoin du nom de classe !!! je vais voir

Commentaire de qoprek le 28/08/2006 12:37:22

J'ai pas testé mais d'après mes souvenirs je fait comme cela (donc j'écris le code de mémoire, ptet ya des trucs a changer):

Il faut rechercher la classe TAppBuilder et si elle est présente alors rechercher (d'après le handle récupéré) si le texte de la fenêtre associé contient Delphi. On aurait une fonction de ce style, tu peux t'arreter a la recherche de TAppBuilder si tu veux detecter si un EDI Borland est en cours et pas seulement Delphi, maintenant il faut vérifier que pour les produits MS le nom de classe adéquat et ainsi étoffer la fonction pour essayer de détecter un max d'outils de dévpt:

function EDIBorlandEnCours : Boolean;
Var nom : Array[0..31] Of Char;
    h   : THandle;
Begin
  Result := False;
  h := FindWindow('TAppBuilder', Nil);
  If h>0 Then Begin
    GetWindowText(Result,nom,32);
    If AnsiUpperCase(Nom[0]+Nom[1]+Nom[2]+Nom[3]+Nom[4]+Nom[5])='DELPHI' Then Result:=True;
  End;
End;

- Une autre possibilité serait de regarder si le fichier exe de delphi est en cours d'utilisation avec une fonction de ce style:

Function DeterminerSiUtilise(fichier:String):Boolean;
Var HFileRes : HFILE;
Begin
  If FileExists(fichier) Then Begin
    HFileRes:=CreateFile(PChar(fichier),GENERIC_READ Or GENERIC_WRITE,0,Nil,OPEN_EXISTING,FILE_ATTRIBUTE_NORMAL,0);
    Result:=(HFileRes=INVALID_HANDLE_VALUE);
    If Not Result Then CloseHandle(HFileRes);
  End Else
    Result:=False;
End;

Mais là cela suppose que tu saches (d'apres la BDR) ou est localisé Delphi sur le disque.


Voila si ca peut aider.



Commentaire de japee le 28/08/2006 13:41:16 administrateur CS

Qoprek> pas mal, pour un code écrit de mémoire ;o)

On te pardonnera donc la 5ème ligne de la function EDIBorlandEnCours, où le premier paramètre passé est erronné. Il fallait donc écrire :

GetWindowText(h, nom, 32);

Sinon, ça fonctionne nickel, avec D6 comme avec D4.

Commentaire de salamo1980 le 07/05/2007 22:01:58

maerci amis

 Ajouter un commentaire


Discussions en rapport avec ce code source dans le forum

Exécution de projets V5 V6 ou V7 avec Delphi V4 [ par jack554 ] BonjourLorsque j'essaie d'exécuter des exemples téléchargés ici sur mon vieux et fidèle Delphi V4, j'obtiens presque à chaque fois le message "Impossi Débutant:Probléme delphi exécution. [ par TriplePattes ] Bonjour à tous, Voilà , j'utilise Delphi3 opur mes débuts en programmation .Pour pouvoir utiliser les comandes "enregistrer sous" et "palette de coleu Exécution [ par tmsoft ] Salut..Qu'est ce qui le faut pour Exécter une application avec Delphi sans installer Delphi sur le PC. Installation -Exécution d'une application delphi [ par habib1976 ] salut tout le monde, en fait j'ai 2 questions:1- j'ai crée le programme d'installation de mon application (delphi6 avec une base de données paradox) q test de la présence de delphi à l'exécution [ par ericamiens ] bonjour,j'aimerais savoir si un programme est exécuté à partir de delphi ou bien lancé seul (par l'explorateur windows par exemple) ; mais sans avoir aide alert [ par zelze ] J'ai commencais le delphi il y a environ... Une heure.J'passe du vb au delphi et je connais pas du tout le langage.Quelqu'un peut il me dire comment f recherche coder delphi [ par WaReD ] bon alors voila j aurais besoin d un bon coder en delphi, pour bossé sur un projet que j expliquerai par mail, et j ai dit un BON coder po une bréle d Recherche Delphi [ par ojecker ] Je recherche une version de Delphi 5 ou 6 Pro ou Entreprise ...Merci de faire vous offres c++ builder vs delphi [ par actiprog ] Salut à tous J' ai un peut abordé le stade avencé de VB 6 .J' ai découvré aisi les limites de ce language qui reste toujours agréable .Grace à l'INTER


Nos sponsors


Sondage...

CalendriCode

Mars 2010
LMMJVSD
1234567
891011121314
15161718192021
22232425262728
293031    

Consulter la suite du CalendriCode

Photothèque

 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 0,515 sec (4)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales