Articles of delphi

CodeIgniter "sess_time_to_update" и Indy Cookies

У меня есть это ужасно разделенное delphi-код, который в основном заходит на сервер, сохраняет cookie в глобальном менеджере файлов cookie, а затем загружает файлы в потоки (используя Delphi 2010 + Indy 10.4736) Каждый поток читает глобальный менеджер файлов cookie и загружает файл. На стороне сервера я использую PHP с CodeIgniter . Все работает отлично, за […]

Кодирование Mime / Base 64

Мне нужен способ кодирования строки в Mime / Base64 в Delphi 7 и PHP Эти два кодера должны быть совместимы 🙂

Кто может помочь мне преобразовать этот небольшой PHP-код в Delphi?

Всем привет, У меня есть небольшой код на PHP, который я хотел бы преобразовать в Delphi, и у меня есть некоторые проблемы … Вот код PHP: $from = "121.198.0.0"; $to = "121.198.255.255"; $arry1 = explode(".", $from); $arry2 = explode(".", $to); $a1 = $arry1[0]; $b1 = $arry1[1]; $c1 = $arry1[2]; $d1 = $arry1[3]; $a2 = $arry2[0]; […]

попытка декодирования данных (экспорт Abs в MySQL)

У меня есть таблица базы данных: DROP TABLE translation_en_lt; CREATE TABLE translation_en_lt ( id INTEGER, lt_translation WIDEMEMO BLOBBlockSize 102400 BLOBCompressionAlgorithm ZLIB BLOBCompressionMode 9 ); Что было создано с помощью AbsManager (Абсолютный менеджер баз данных, Delphi). Однако он устарел, а синтаксис недействителен для текущего MySQL. Затем у меня есть этот ввод данных: INSERT INTO translation_en_lt (lt_translation) […]

PHP AES 128 ECB Ciphers и Delphi AES 128 ECB

Я шифрую строку «sifrelenecek» с Delphi, используя AES 128 ECB, используя ключ как «KRPTTT101103», и он дает мне «FBE4A4405D6C1B54503D9B213E41AE56», я проверяю с помощью http://aes.online-domain-tools.com/ и это правильно , Я пытаюсь создать такое же шифрование с помощью php с помощью этой функции; function sifrele($str, $key){ $block = mcrypt_get_block_size('rijndael_128', 'ecb'); $pad = $block – (strlen($str) % $block); […]

Портирование кода PHP на код Delphi

Я работаю над интеграцией с моим приложением Delphi; вся эта история объясняется в этой ссылке После этого я обыскал в Интернете, тогда я нашел код для переключения нового идентификатора в PHP function tor_new_identity($tor_ip='127.0.0.1', $control_port='9051', $auth_code=''){ $fp = fsockopen($tor_ip, $control_port, $errno, $errstr, 30); if (!$fp) return false; //can't connect to the control port fputs($fp, "AUTHENTICATE $auth_code\r\n"); […]

Написание PHP-расширений с использованием Delphi 2010 и php4Delphi

Во-первых, речь идет о php4Delphi, а не о RadPHP (ранее Delphi For PHP). С помощью Delphi 2010 PHP 5.3.6 (VC9, NTS) php4Delphi 7.2 (скомпилирован с директивой VC9) Windows Server 2008 R2 IIS 7 При попытке запустить расширение php4Delphi delphi_math.dll на сервере IIS / PHP я вижу следующую ошибку в файле C: \ Windows \ Temp […]

Хеширование файлов MD5 – соответствие вывода Delphi с помощью функции PHP md5_file

В настоящее время я использую этот код для хеширования md5 в Delphi 7: function MD5(const fileName : string) : string; var idmd5 : TIdHashMessageDigest5; fs : TFileStream; begin idmd5 := TIdHashMessageDigest5.Create; fs := TFileStream.Create(fileName, fmOpenRead OR fmShareDenyWrite) ; try result := idmd5.AsHex(idmd5.HashValue(fs)) ; finally fs.Free; idmd5.Free; end; end; и я пытаюсь получить результат так же, […]

Как выполнить HTTP POST в Utf-8 -> php script -> mysql

Я использую компоненты Delphi 7 и ICS для связи с php-скриптом и вставки некоторых данных в базу данных mysql … Как опубликовать данные в Юникоде, используя http post? После использования utf8encode из элементов управления tnt я делаю это для публикации в PHP-скрипте <?php echo "Note = ". $_POST['note']; if($_POST['action'] == 'i') { /* * This […]

Delphi TIdhttp Post JSON?

Кто-нибудь получает JSON для работы с TIdHttp? PHP всегда возвращает NULL в $_POST , я делаю что-то неправильно? Источник Delphi: http := TIdHttp.Create(nil); http.HandleRedirects := True; http.ReadTimeout := 5000; http.Request.ContentType := 'application/json'; jsonToSend := TStringStream.Create('{"name":"Peter Pan"}'); jsonToSend.Position := 0; Memo1.Lines.Text := http.Post('http://www.website.com/test.php', jsonToSend); jsonToSend.free; http.free; Источник PHP: <?php $value = json_decode($_POST); var_dump($value); ?>