下載進度表 |
|
答題得分者是：frankiech
|
|
cyl
中階會員   發表：163 回覆：171 積分：66 註冊：2002-07-11 發送簡訊給我 |
|
|
frankiech
中階會員 發表：7 回覆：78 積分：52 註冊：2002-08-29 發送簡訊給我 |
引言: 請問我使用此方法URLDownloadToFile(nil,PChar(Source),PChar(Dest),0,nil) 下載http上的某一個檔案,但是我想顯示下載的進度表,不知該如何做???HRESULT URLDownloadToFile( LPUNKNOWN pCaller, LPCTSTR szURL, LPCTSTR szFileName, DWORD dwReserved, LPBINDSTATUSCALLBACK lpfnCB ); 可在 LPBINDSTATUSCALLBACK lpfnCB的CallBack Interface : IBindStatusCallback::OnProgress 去處理. |
|
cyl
中階會員 發表：163 回覆：171 積分：66 註冊：2002-07-11 發送簡訊給我 |
引言:可不可以寫一段範例給我看看,因為我不是很了解,謝謝引言: 請問我使用此方法URLDownloadToFile(nil,PChar(Source),PChar(Dest),0,nil) 下載http上的某一個檔案,但是我想顯示下載的進度表,不知該如何做???HRESULT URLDownloadToFile( LPUNKNOWN pCaller, LPCTSTR szURL, LPCTSTR szFileName, DWORD dwReserved, LPBINDSTATUSCALLBACK lpfnCB ); 可在 LPBINDSTATUSCALLBACK lpfnCB的CallBack Interface : IBindStatusCallback::OnProgress 去處理. |
|
frankiech
中階會員 發表：7 回覆：78 積分：52 註冊：2002-08-29 發送簡訊給我 |
你可參考這個元件(IEDownload)的Source : 它有使用IBindStatusCallback
,看一下它是如何Implement IBindStatusCallback. http://www.euromind.com/iedelphi/iedownload.htm ex:
TBSCB = class(TInterfacedObject, IBindStatusCallback)
public
function OnLowResource(reserved: DWORD): HResult; stdcall;
function OnProgress(ulProgress, ulProgressMax, ulStatusCode: ULONG;
szStatusText: LPCWSTR): HResult; stdcall;
function OnStartBinding(dwReserved: DWORD; pib: IBinding): HResult; stdcall;
function OnStopBinding(hresult: HResult; szError: LPCWSTR): HResult; stdcall;
function OnDataAvailable(grfBSCF: DWORD; dwSize: DWORD; formatetc: PFormatEtc;
stgmed: PStgMedium): HResult; stdcall;
function OnObjectAvailable(const iid: TGUID; punk: IUnknown): HResult; stdcall;
function GetPriority(out nPriority): HResult; stdcall;
function GetBindInfo(out grfBINDF: DWORD; var bindinfo: TBindInfo): HResult; stdcall; end;
|
發表時間：2002-10-29 11:02:44
IP:61.218.xxx.xxx 未訂閱
系統時間：2024-04-17 3:05:20
聯絡我們 | Delphi K.Top討論版
| 本站聲明 |
|
1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！ |