Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > C/C++ программирование > C++ Builder
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 16.02.2012, 12:50   #1
Drugnir
Форумчанин
 
Регистрация: 17.11.2010
Сообщений: 262
По умолчанию CopyFile + ProgressBar

Добрый день. Проблема, есть файл удаленный, я его копирую с помощью CopyFileA. Как с помощью ProgressBar показать процент загрузки файла. Ну и если можно, то в какой-нить label отобразить скорость закачки.

Нашел одну статью.
http://forum.vingrad.ru/topic-130819.html
Если кто так делал и другого подхода нет, то напишите к кому можно будет обратиться.

Переделал, вот код. Не пойму почему теряется коннект. Вот код.
Код:
HINTERNET hInternet, hRequest;
			hInternet = InternetOpenA("", INTERNET_OPEN_TYPE_DIRECT, 0, 0, 0);
			hRequest = InternetOpenUrlA(hInternet, FormFile->File.c_str(), 0, 0, 0, 0); //FormFile->File = \\\\192.168.5.1\\share\\1.exe
			DWORD SumSize;
			InternetQueryDataAvailable(hRequest, &SumSize, 0, 0);

			if(hRequest)
			{
			DWORD dwRead;
			char szTemp[1024];
			TFileStream* fs = new TFileStream(FormFile->FileUpd, fmCreate); //FormFile->FileUpd = D:\\1.exe
			ProgressBar1->Max = SumSize;
			ProgressBar1->Min = 0;
			while (InternetReadFile(hRequest, (LPVOID)szTemp, 1024, &dwRead))
			{
			if (!dwRead) break;
			fs->Write(szTemp, dwRead);
			ProgressBar1->StepBy(1024) ;
			}
			delete fs;
			}
			InternetCloseHandle(hRequest);
			InternetCloseHandle(hInternet);
Заранее благодарен.

Последний раз редактировалось Drugnir; 17.02.2012 в 11:51.
Drugnir вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
CopyFile MAZADA Общие вопросы Delphi 12 08.08.2011 09:40
copyfile Blad47 Общие вопросы C/C++ 10 12.12.2010 15:53
try copyfile except kosko Общие вопросы Delphi 2 11.08.2009 07:08
CopyFile Killbrum Общие вопросы Delphi 6 20.09.2008 22:59
CopyFile Airou Общие вопросы Delphi 15 22.05.2008 14:55