Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Состояние загрузки файла по ftp - TProgressBar, Как реализовать? 
V
    Опции темы
kefir01
Дата 29.12.2007, 22:17 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 213
Регистрация: 22.6.2007

Репутация: 1
Всего: 2
Код

int handle;
handle = open(OpenDialog1->FileName.c_str(), O_RDONLY);
int FSize = filelength(handle);
close(handle);
        for(int i=0;i<=FSize;i++)
        {
        ProgressBar1->Position=i;
        }


Код

                try
                {
                IdFTP1->Put(OpenDialog1->FileName,ExtractFileName(Edit1->Text),false);
                }
                catch(...)
                {
                MessageDlg("FTP Error",mtInformation,TMsgDlgButtons() << mbOK, 0);
                Abort();
                }



Вопрос как их друг к другу прикрутить, чтобы в ProgressBar1 отображался ход загрузки
PM MAIL   Вверх
kefir01
Дата 3.1.2008, 00:45 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 213
Регистрация: 22.6.2007

Репутация: 1
Всего: 2
Ну что, нет идей?
Помогите плиз
PM MAIL   Вверх
dumb
Дата 3.1.2008, 12:42 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


sceloglauxalbifacies
****


Профиль
Группа: Экс. модератор
Сообщений: 2929
Регистрация: 16.6.2006

Репутация: 32
Всего: 158
у IdFTP есть события OnWorkBegin, OnWork, OnWorkEnd
PM MAIL   Вверх
kefir01
Дата 3.1.2008, 18:39 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 213
Регистрация: 22.6.2007

Репутация: 1
Всего: 2
А можно пример обработки этих событий?
Пожалуйста.
PM MAIL   Вверх
kefir01
Дата 3.1.2008, 23:50 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 213
Регистрация: 22.6.2007

Репутация: 1
Всего: 2
Решил вопрос
Код

void __fastcall TForm1::IdFTP1Work(TObject *Sender, TWorkMode AWorkMode,
      const int AWorkCount)
{
  ProgressBar1->Position = AWorkCount;
}
//---------------------------------------------------------------------------

void __fastcall TForm1::IdFTP1WorkBegin(TObject *Sender,
      TWorkMode AWorkMode, const int AWorkCountMax)
{
int handle;
handle = open(OpenDialog1->FileName.c_str(), O_RDONLY);
int FSize = filelength(handle);
close(handle);
ProgressBar1->Max = FSize;
}
//---------------------------------------------------------------------------

void __fastcall TForm1::IdFTP1WorkEnd(TObject *Sender, TWorkMode AWorkMode)
{
ProgressBar1->Position = 0;
}
//---------------------------------------------------------------------------
PM MAIL   Вверх
  
 Ответ в темуСоздание новой темы Создание опроса
Правила форума "С++ Builder"
Rrader

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по С++ Builder обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Настоятельно рекомендуем заглянуть в DRKB (Delphi Russian Knowledge Base) - крупнейший в рунете сборник материалов по Дельфи

Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Rrader.
 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | C++ Builder | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




[ Время генерации скрипта: 0.1651 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
 По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.