-
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. Indy. Трабл с кодировкой имен файлов при загрузке на FTP сервер
Пользуюсь INDY. При загрузке файлов на FTP сервер методом Put столкнулся вот с этим Поискав немного в сети, понял, что это какой трабл в Инди. Временное решение, в отсутствие времени – транслит.
|
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 40 41 42 43 |
function TForm2.Translit(s: string): string; const rus: string = 'абвгдеёжзийклмнопрстуфхцчшщьыъэюя'; lat: array[1..33] of string = ('a', 'b', 'v', 'g', 'd', 'e', 'yo', 'zh', 'z', 'i', 'y', 'k', 'l', 'm', 'n', 'o', 'p', 'r', 's', 't', 'u', 'f', 'h', 'ts', 'ch', 'sh', 'shch', '''', 'y', '''', 'e', 'yu', 'ya'); var p, i, l: integer; begin s:=widelowercase(s); Result := ''; l := Length(s); for i := 1 to l do begin p := Pos(s[i], rus); if p<1 then Result := Result + s[i] else Result := Result + lat[p]; end; end; procedure TForm2.bPutFileClick(Sender: TObject); var DestName:string; begin idFTP.MakeDir('/myfiles'); IdFTP.ChangeDir('/myfiles'); if OpenDialog.Execute then begin FFileToPut:=OpenDialog.FileName; DestName:=Translit(ExtractFileName(OpenDialog.FileName)); idFTP.Put(OpenDialog.FileName,DestName); // idFTP.Disconnect; end; end; |
После чего получаем Не так идеально, … Continue reading
Delphi. FTP. Как создать свой FTP сервер и FTP клиент и передать файл с клиента на сервер?
Встала задача передачи файла на сервер. Выбрал FTP протокол. В Delphi есть соответствующие компоненты INDY IdFTPServer IdFTP Но как ими пользоваться? Как их настроить так, чтобы всё работало и выполнялась задача передачи файлов с клиента на сервер?
Delphi. Get | Post запросы. Работа с cookie. HTTP Analyzer
Итак, в данном материале – расширим немного работу с Get | Post запросами. “Пошпионим” немного за веб-сервисами с помощью замечательной программы HTTP Analyzer, по-другому именуемой “сниффер”. Для тех, кто не знаком с тем, что это такое – привожу краткое определение … Continue reading
Posted in Delphi, Delphi и сети, FireMonkey, Indy, Парсинг
Comments Off on Delphi. Get | Post запросы. Работа с cookie. HTTP Analyzer
Delphi. PHP. Get and Post Requests
В данном посте решил разобраться с GET | POST запросами к серверу по протоколу http. В принципе ничего сложного, и в общих чертах все понятно. Но тем не менее хотел попрактиковаться. Учебную задачу для себя поставил так – создать HTML … Continue reading
Posted in Delphi, Indy, PHP, Без рубрики
Comments Off on Delphi. PHP. Get and Post Requests
Delphi. Как загрузить сайт для парсинга?
Наверное, самый простой способ загрузить сайт для парсинга это компонент TIdHTTP и его метод Get. Если открыть официальную документацию компонентов Indy, то можно увидеть следующее описание метода Get, компонента TidHTTP
|
1 2 3 |
function Get( AURL: string ): string; overload; |
И ещё одна его перегруженная версия, которая грузит сайт в … Continue reading
Posted in Delphi, Delphi и сети, Без рубрики
Comments Off on Delphi. Как загрузить сайт для парсинга?
Delphi. Indy. Как отправить файл по FTP?
В данном посте загрузим файл по FTP на хостинг… Вот как будет выглядеть форма… IDAntiFreeze1 добавлен для стабильности по совету из книги глубины Delphi.
Posted in Delphi, Indy, Без рубрики
Comments Off on Delphi. Indy. Как отправить файл по FTP?
Delphi. Как отправлять Email из VCL приложения?
Всем привет. В данном посте посмотрим как отправлять Email через SMTP сервер Яндекса. Для остальных SMTP серверов – можно сделать по аналогии, заменив порты и др. сетевые реквизиты. Яндекс и многие другие почтовики работают через SSL, поэтому нам понадобится дополнительный компонент, … Continue reading
Posted in Delphi, Delphi и сети, Indy, Без рубрики
Comments Off on Delphi. Как отправлять Email из VCL приложения?
Delphi. Простейший UDP чат
В данном посте напишем простейший UDP чат c помощью компонентов Indy. Я оттолкнулся от примера М.Фленова из книги “Delphi глазами хакера”. Но, кое-где пришлось поправить код, потому что часть функций изменилась с тех времен (2003 г. – выпуск книги). Данный … Continue reading
Posted in Delphi и сети, Indy, Без рубрики
Comments Off on Delphi. Простейший UDP чат
Delphi. Ping через Internet Component Suite
Данный пример восстановил из книги М.Фленова “Delphi глазами Хакера”. Пришлось дополнительно установить библиотеку Internet Component Suite (ICS). Она бесплатная и относительно легко установилась. Итак, как “пропинговать ” тот или иной компьютер? Что будет на форме?
Posted in Delphi и сети, ICS, Без рубрики
Comments Off on Delphi. Ping через Internet Component Suite
Delphi. WhoIS
Восстановил пример из книги Фленова “Delphi глазами Хакера”. VCL приложение. Компоненты…
Posted in Delphi, Delphi и сети, Indy, Без рубрики
Tagged Delphi и сети
Comments Off on Delphi. WhoIS