-
MY PROJECTS
-
Recent Posts
- Algo.Java.DFS.Theory
- Java.Algo.DFSExample
- Algo.Java.Xor to find difference between strings
- Java.Algo.AllSubArrays
- Linux. Ubuntu.Monitor resources
- Java.Algo.Get sum of Digits from int
-
Java. List
to int[] and backwards - Sql.Execution Order
- Algo.Java.BinarySearch
- SQL. Conditional expression with count()
- Java.Algo.CumulativeApproach
- Algo.Java.BFS in BinaryTree
- Java.Jackson.Serialize object to json
- Algo. Traverse linked list
- Algo. Java. Remove-duplicates-from-sorted-array
- Java.Hibernate.SimpleExample
- Java.Jdbc.SimpleExample
- SQL. Calc the sum with case, example
- Mullvad – free the internet :)
- Junit. Jupiter
Categories
- Aptana
- Azure
- C#
- DataSnap
- DBExpress
- Delphi
- Delphi и сети
- Delphi. Язык программирования
- ExtJS
- FastReport
- FireDAC
- FireMonkey
- GIT
- ICS
- IDE
- IIS
- Indy
- InnoSetup
- javascript
- jQuery
- JSON
- LiveBindings
- MSHTML
- MySQL
- PHP
- REST
- Ribbons
- SMS
- SQL инструкции
- SVN
- TRichView
- UniGui
- WebBroker
- WinAPI
- Windows
- Алгоритмы
- Без рубрики
- Деревья
- Ищу ответ
- Компонентостроение
- Мои компоненты
- Начальный уровень
- Обработка исключений
- Парсинг
- Потоки(Threads)
- Регулярные выражения
- Тестирование приложений
Category Archives: Delphi и сети
Delphi. UniGUI. Делаем витрину (showcase) 2 часть
В прошлом посте мы сделали подготовочку. Структуру базы данных, определили основные сущности программы, создали под них таблицы в базе и модули в прекрасной IDE Delphi. В данном посте добавим функцию добавления товара, выделения товара, удаления товара, а также наладим листание … Continue reading
Posted in Delphi, Indy, UniGui, Без рубрики
Comments Off on Delphi. UniGUI. Делаем витрину (showcase) 2 часть
Delphi. Uploading to Keep2Share. Successful attempt
А теперь удачная попытка. Суть в том, что мы сначала отправляем файлы на VPS, далее, уже на Keep2Share через PHP скрипт. Сам скрипт отправки файла с одного сервера на другой достаточно прост
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 |
<?php include "Keep2ShareAPI.php"; $api = new Keep2ShareAPI(); $api->username='panteleevstas@gmail.com'; $api->password='SLwA63'; $filepath=$_REQUEST['filepath']; var_dump($api->uploadFile($filepath)); /* object(stdClass)#2 (3) { ["user_file_id"]=> string(13) "5238354a724c3" ["status"]=> string(7) "success" ["status_code"]=> int(200) } */ ?> |
Он выдает некоторую информацию, из которой нам … Continue reading
Delphi. Uploading to Keep2Share. Half Successfull Atempt…
Поступил ко мне небольшой заказ на автоматизацию заливки файлов на файлообменник Keep2Share.cc Всего было у меня 2 попытки делания данного проекта. Сначала опишу неудачную попытку, а в другом посте удачную. Задача стояла таким образом, чтобы сделать заливку напрямую из Delphi … Continue reading
Posted in Delphi, Indy, Без рубрики
Comments Off on Delphi. Uploading to Keep2Share. Half Successfull Atempt…
Delphi. Indy. Как отправить Get запрос, принять и обработать его на idHTTPServer?
Уже была подобная статья про отправку запросов с параметрами методом POST, а также был подобный пост, который касался отправки файлов методом POST и был на порядок сложнее того, что я напишу сейчас. Данные во второй статье отправляются в кодированном виде и мы делали … Continue reading
Delphi. Indy. Проблема с русскими символами и решение
Проблема При отправке запросов, при помощи компонента idHTTP возникает проблема, если в строке GET запроса или параметрах POST запроса есть русские символы. Понятное дело, это связано с кодировкой! Выглядит это так (в HTTPAnalyzer) Естественно, сервера не в курсах, что за … Continue reading
Posted in Delphi, Delphi и сети, Indy
Comments Off on Delphi. Indy. Проблема с русскими символами и решение
Delphi. Как разделить файл на “чанки” (chunks), передать его на сервер и собрать обратно
В данном посте посмотрим, как разделить файл на части (так называемые chunks), передать его на сервер и собрать там обратно. Я использую Indy. idHTTPServer idHTTP Для начала опишу общую идею. Тайминг работы программы, отображенный в логе примерно следующий Если файл меньше … Continue reading
Delphi. Как заставить idHTTPServer отображать страницы или отдавать на загрузку файлы?
У меня получился такой вариант Вот главный кусок, который отвечает за отображение веб-страниц, либо отдачу файла
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 |
procedure TfHTTPServer.IdHTTPServerCommandGet(AContext: TIdContext; ARequestInfo: TIdHTTPRequestInfo; AResponseInfo: TIdHTTPResponseInfo); var filepath: string; IsWebPage: Boolean; WebPageContent: string; begin //...some code //Preparing file for download if it is on the Server begin if FHTTPServerCommandGet.IsFileOnServer(ARequestInfo.URI,filepath,IsWebPage,WebPageContent) then begin AResponseInfo.ResponseNo := 200; if IsWebPage then AResponseInfo.ContentText:=WebPageContent else AResponseInfo.ServeFile(AContext, filepath); end else AresponseInfo.ResponseNo := 404; end; end; |
В отдельном модуле метод проверки наличия файла на сервере
Delphi. idHTTPServer. Обработка ошибок сервера и получение их на клиенте
Для меня не очевидным был этот вопрос. Хотелось получить информацию об ошибке сервера на клиенте. То есть, примерно так… Ведь idHTTPServer многопоточный, и значит, возбуждение исключения при ошибке можно было сделать так Как обработать исключение из потока? Но idHTTP и … Continue reading
Delphi. Как послать POST запрос по HTTPS?
Итак, как послать POST запрос по HTTPS? Зачем? Чтобы скрыть данные от анализатора HTTP трафика. Вот чем займемся сегодня. В предыдущем посте мы делали SSL сертификаты. За основу возьмем приложение, написанное в посте Как отправить POST запрос, принять и декодировать … Continue reading
Delphi. Как создать SSL сертификат самостоятельно?
Если проект находится во внутренней сети и требуется SSL протокол, то, насколько я понял вполне можно обойтись сертификатами, сделанными самостоятельно. Браузеры, конечно, такой сертификат отвергнут напрочь, это и понятно. Тут и безопасность и бизнес. Но часть задач можно решить используя … Continue reading