Newsgroups : Borland : borland.public.delphi.internet.winsock : 2006 Jul : Upload Progress bar
| Subject: | Upload Progress bar |
| Posted by: | "MikeR" (nf4lnospam@pobox.com) |
| Date: | Thu, 6 Jul 2006 11:19:44 |
I'm uploading a file using winhttp.dll. The file is contained in strf.
Is there any way to use a progress bar here? Not using winhttp.dll is NOT an
option.
Mike
str2 := '--MikeyS001' + CCRLF;
str2 := str2 + 'Content-Disposition: form-data; name="upfile"; filename="' +
frmLog.CurrUser + '.xyz"' + CCRLF;
str2 := str2 + 'Content-Type: application/octet-stream' + CCRLF + CCRLF;
str2 := str2 + strf + CCRLF;
str2 := str2 + '--MikeyS001--' + CCRLF;
if not WinHTTPSendRequest(hRequest, PWideChar(hdr), LongInt(-1), PChar(str2),
length(str2), length(str2), nil) then
begin
ShowHTTPError;
exit;
end;