Catégorie : IT

IT

Utilisation des threads dans Delphi

Voici comment utiliser facilement les threads dans Delphi. Synchronize fonctionne bien si on l’utilise correctement 🙂 Contenu de la fonction uses System.Classes, System.SysUtils, Vcl.Forms; procedure Wait(Proc: TProc); var Thread: TThread; begin Thread := TThread.CreateAnonymousThread(procedure() begin Proc; end); Thread.FreeOnTerminate := True;…

Lire la suite — Utilisation des threads dans Delphi
IT

Obtenir l’adresse IP de connexion sur AWS (PHP)

Lorsqu’on utilise un serveur Amazon, l’adresse IP du serveur renvoyée est une adresse IP privée. J’ai donc créé ceci pour obtenir l’adresse IP publique. <? if(in_array(substr($_SERVER[‘SERVER_ADDR’], 0, 3), array(‘172’))) if(strrpos(gethostname(), ‘.compute.internal’)!==false) $_SERVER[‘SERVER_ADDR’] = file_get_contents(‘http://169.254.169.254/latest/meta-data/public-ipv4’); echo $_SERVER[‘SERVER_ADDR’]; ?>

Lire la suite — Obtenir l’adresse IP de connexion sur AWS (PHP)
IT

Surveillance du registre (Delphi)

Mode d’emploi procedure RegistryMonitor(RootKey: HKEY; Key: string; Proc: TProc; WatchSub: boolean); begin TThread.CreateAnonymousThread(procedure var Reg: TRegistry; Event: cardinal; begin Reg := TRegistry.Create; Reg.RootKey := RootKey; if Reg.OpenKeyReadOnly(Key) then begin Event := CreateEvent(nil, False, False, nil); if Event > 0 then…

Lire la suite — Surveillance du registre (Delphi)
IT

Installation et utilisation de l’analyse morphologique (PHP)

Environnement d’installation : CentOS 7 de base, PHP 7 yum install gcc-c++ java-1.7.0-openjdk-devel python-devel zlib-devel openssl openssl-devel git -y wget https://www.python.org/ftp/python/3.6.1/Python-3.6.1.tgz tar xf Python-3.* cd Python-3.* ./configure make make altinstall pip3.6 install JPype1-py3 pip3.6 install konlpy cd .. wget https://bitbucket.org/eunjeon/mecab-ko/downloads/mecab-0.996-ko-0.9.2.tar.gz…

Lire la suite — Installation et utilisation de l’analyse morphologique (PHP)