Uma forma simples de utilizar threads no Delphi. Use o synchronize corretamente e tudo correrá bem 🙂 Conteúdo da função 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;…
Este método adiciona ou remove www automaticamente ao aceder ao site. Basta inserir o código no ficheiro .htaccess. # Adicionar www RewriteCond %{HTTP_HOST} ^(?!www\.)(.+) [NC] RewriteRule ^(.*) http://www.%1/$1 [R=301,NE,L] # Remover www RewriteCond %{HTTP_HOST} ^www\.(.+) [NC] RewriteRule ^(.*) http://%1/$1 [R=301,NE,L]
Se ocorrer o erro “/usr/bin/rm: arg list too long” ao eliminar muitos ficheiros Pode eliminá-los com o comando abaixo. find . | xargs -n 1000 rm -f
Obtém a localização através da função geolocation e, caso as permissões necessárias não sejam concedidas ou o navegador não seja compatível, obtém-na através do endereço IP, usando a API disponibilizada pela Naver. Antes de usar, obtenha uma chave da API…
Veja como esvaziar ficheiros de registo que ficaram demasiado grandes. cat /dev/null > 로그파일명 Como referência, veja como encontrar ficheiros de grandes dimensões. find ./* -size +파일크기
1. https://golang.org/dl/ para descarregar e instalar 2. Criar uma pasta de trabalho (ex.: d:\source\Go) 3. Criar as pastas bin, pkg e src dentro dela 4. Painel de Controlo do Windows -> Sistema -> Definições avançadas do sistema -> Variáveis de…
Ao utilizar um servidor da Amazon, é apresentado o IP privado quando se obtém o IP do servidor. Por isso, criei isto para obter o IP público. <? 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’]; ?>
É um plugin criado para encontrar facilmente backdoors (PHP) instalados às escondidas para piratear servidores. Encontra ficheiros que utilizam funções PHP que podem ser exploradas e avisa-o por e-mail. Pode instalá-lo e utilizá-lo facilmente no WordPress e no Gnuboard…
Modo de utilização 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…
Ambiente de instalação: CentOS 7 padrão, 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 tar…
O Delphi foi atualizado para a versão 10.2. Este é o procedimento de instalação inicial para utilização no CentOS 7. # yum -y update # yum install -y firewalld # systemctl unmask firewalld # systemctl enable firewalld # systemctl start…
Criei-o para monitorizar se foi instalado PHP malicioso através de um ataque ao servidor e para verificar facilmente se existe código potencialmente perigoso. Escreva o código abaixo na conta do servidor e carregue-o. <? /** * Name: Kilho’s PHP Diagnosis…
