uses shellapi;  procedure TForm1.Button1Click(Sender: TObject); var  em_subject, em_body, em_mail : string;  begin  em_subject := 'Tes...

在您的使用中添加以下库：idSSLopenSSL，idHttp，Json这是POST JSON数据的示例代码：procedure TForm1.Button1Click(Sender: TObject);var  JsonStr: string;  sResponse: string;&nb...

uses ... IdFTP, IdFTPCommon ... procedure TForm1.Button1Click(Sender: TObject);begin  IdFTP1.Host := 'test.rebex.net';  IdFTP1.Port := 21;  IdFTP1.ConnectT...

Delphi IdFTP 错误：Socket error 10054 – connection reset by peer -连接被重置 问题场景：连接本地正常，连接远程服务器出现异常原因分析：IdFTP连接的2种模式：主动和被动。默认使用...

一、URLDownloadToFile()函数介绍使用微软提供的URLDownloadToFile function函数，函数原型：HRESULT URLDownloadToFile(             LPUNKNOWN  &nb...

program Project1;{$APPTYPE CONSOLE}{$R *.res}uses  System.SysUtils,  System.Classes,  System.Net.HttpClient,  System.RegularExpressions;const  url = 'http:...

program Project1;{$APPTYPE CONSOLE}{$R *.res}uses  System.SysUtils,  System.Classes,  System.Net.HttpClient,  System.RegularExpressions;const  url = 'http:...

unit Unit1;interfaceuses  Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics,  Vcl.Controls, Vcl.Forms, Vcl.Dialogs, System.N...

uses System.Net.Mime,System.Net.HttpClient;function Upload(const aFilePath: string): boolean;var  vData: TMultipartFormData; // uses System.Net.Mime  vHTTP: THTTPClient; ...

unit Unit1;interfaceuses  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,  Dialogs, IdBaseComponent, IdComponent, IdTCPConnection, IdTCPClient,...

利用DELPH 的ICMP控件检测服务器地址function CheckNetServer():Boolean;begin  IdIcmpClient1.Host := '192.168.1.230';  //服务器地址  IdIcmpClient1.Ping;  if IdIcmpC...

纯Delphi 原生写的 上传到七牛的功能。上传文件到七牛， 支持分片分段上传， 适用于Delphi XE, 10等新版本分两个函数： uploadToQiniu 和 directUploadToQiniuuploadToQiniu 这个函数使用分片，...

uniGUI HyperServer 是一种新的服务器体系架构, 旨在高度提高 uniGUI 应用程序的可用性、稳定性和特定的可伸缩性。 这一目标是通过应用业界已知和广泛使用的技术 (如负载平衡和过程回收) 实现的...

本文，我们将尝试深入了解uniGUI HyperServer。 可以将HyperServer所有功能分成三类：HyperServer和稳定性HyperServer和可扩展性HyperServer和远程部署HyperServer和稳定性HyperServer是一种新...

前提：PHP端用$_post 接收一、delphi idhttp post 上传数据 时如果使用 temp_stream: TStringStream;  内存流的方式上传 则需要指明IDHTTP的contentypevar  idhttp2: TIdHTTP;  ...

uses System.Net.HttpClient;function DownloadFile(const URL:string; const filename:string):boolean;varms:tmemorystream;hc:thttpclient;beginms:=tmemorystream.Create;hc:= thttpclient....

手机号码库段号地区查询 一个用 Delphi  解析的手机号码库  例子，虽然现在可以手机号码不换号转网了，但可以用来学习 Delphi 流文件解析。和二叉树的快速查询数据库来源：https...

unit Unit1;interfaceuses  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,  Dialogs, WinSock, StdCtrls;type  TForm1 = class(TForm)  &n...

unit Unit1;interfaceuses  Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics,  Vcl.Controls, Vcl.Forms, Vcl.Dialogs, IdBaseCo...

unit Unit1;interfaceuses  Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics,  Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.Butt...

unit Unit3;interfaceuses  Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics,  Vcl.Controls, Vcl.Forms, Vcl.Dialogs, IdBaseCo...

unit uGTTS;interfaceuses Windows, SysUtils, Variants, Classes, StrUtils, IdHTTP, HTTPApp, IdURI, ShellAPI, DateUtils, Forms, MPlayer, Controls;const LANG_TR = 'tr';&...

exe目录需要包含libeay32.dll和ssleay32.dll文件varSMTP:TIdSMTP;EPosta: TIdMessage;LHandler: TIdSSLIOHandlerSocketOpenSSL;HtmlPart:TIdText;mailhtml:string;ImagePart: TIdAttachmentFile...

function XMLPOST(url, postdata: String): String;var  GonderilecekVeri: TStrings;  DonecekSonuc: TStringStream;  XmlString, aa: string;  IdHTTP1: TIdHTTP;begin&n...

uses IdHTTP; function DoLogin(const username, password: string): string;var  IdHTTP: TIdHTTP;  Request: TStringList;begin  try    Request := TStringLi...