Többszálú betöltő a wininet funkciókon keresztül

előző ◈ a következő

Hogyan használjuk a WinInet-t egy proxykiszolgálón keresztül?

Kurzor a WinInet használatára;
CTRL + ENTER
CTRL + F + "Proxy" + F3

nem eredeti és nem okos
a kódom dialupon működik
és nem működik proxyon

amit nem értek
ezért a kódot kérem

Szükséged van egy proxyra vagy cho?

Bár ez nem okos és egyáltalán nem eredeti, de még mindig nyitott WinIntet.pas és megtalálja ott

InternetOpen funkció (lpszAgent: PChar; dwAccessType: DWORD;
lpszProxy, lpszProxyBypass: PChar; dwFlags: DWORD): HINTERNET; stdcall;

itt a proxy szerver (különösen IP-címe)
ez az lpszProxy paraméter, de hol van az lpszProxy számára definiált port, jelszó és felhasználói név?

Menj fel akár 7 (hét) sorra a WinIntet.pas fájlban

Oké, akkor a sor száma mondja meg, mi

A port az lpszProxyBypass-ban van írva.
És nem adhat meg semmit. Minden paramétert az IE beállításokból készítenek

És hogyan kell továbbadni az IdHTTP használatával?

ConnectionSettings - a struktúra, amely a kapcsolat paramétereit tárolja

ha a ConnectionSettings.UseProxy majd
kezdődik
ProxyParams.ProxyServer: = ConnectionSettings.ProxyServer;
ProxyParams.ProxyPort: = ConnectionSettings.ProxyPort;
ha a ConnectionSettings.UseProxyLogin majd
kezdődik
ProxyParams.BasicAuthentication: = Igaz;
ProxyParams.ProxyUsername: = ConnectionSettings.ProxyUserName;
ProxyParams.ProxyPassword: = ConnectionSettings.ProxyPassword;
végén;
végén;

Mindenesetre az első paramétert megtehetjük, hogy az összes IE beállítást elvégezzük

Nos, ez nem megy el! palacsinta

hSession: = InternetOpen (PChar (sAppName), INTERNET_OPEN_TYPE_PRECONFIG, nulla, nulla, 0);
hURL: = InternetOpenURL (hSession, PChar (fileURL), null, 0,0,0);

majd egy ciklusban

InternetReadFile (hURL, @ Buffer, SizeOf (puffer), BufferLen);
BlockWrite (minden megnyitott fájl, puffer, BufferLen);

(Helyesen lett másolva) WinInet.

Memória: 0,75 MB
Idő: 0.037 c

előző ◈ a következő