Исходники Delphi

Добро пожаловать на наш портал

На нашем сайте ежедневно публикуются десятки качественных и свежих материалов, которые Вы можете скачать абсолютно бесплатно. Рекомендуем Вам добавить Наш сайт в закладки, а также подписаться на RSS ленту, чтобы не пропускать интересных новостей.
Стартовая Избранное Главная Контакты Карта сайта

Меню

Не доступно

Не доступно

Опрос

Оцените мой сайт

Проголосовало: 118
Другие опросы

Главная » Информеры Progress|Statusbar
id: 117 Комментарии: 0 Просмотров: 1735 Автор: Reif Категория: Информеры Progress|Statusbar
Нажмите для увеличения на картинку
Как использовать progressbar при работе с IdHTTP(indy)? Как посмотреть, сколько процентов загружено на сайт через IdHTTP? Или просто idhttp + progressbar

1) Добавляем на форму IdHTTP.

2) Если у вас Delphi 7, то добавляем на форму IdAntiFreez из вкладки IndyMiscs. Дабы не зависала форма, если при добавлении антифриза, форма всё равно виснет, добавьте к программе поток.

3) Выберите IdHTTP и действуйте по инструкциям ниже:

В обработчике событий найдите: OnWorkBegin, далее вбейте этот код:

Код
procedure TmainForm.IdHTTPWorkBegin(Sender: TObject; AW ... Читать дальше »
id: 86 Комментарии: 0 Просмотров: 1450 Автор: Reif Категория: Информеры Progress|Statusbar
Нажмите для увеличения на картинку
Пример использования StatusBar


в этом уроке я покажу простой пример использования StatusBar
Создадим новый проект, на форму кинем StatusBar с вкладки Win32 и таймер с вкладки Sistem
далее кликнем два раза по компоненту StatusBar и создадим две разделительные вкладки (там интуитивно понятно)

Далее два раза кликнем по значку Тimer и введем код:
Код

procedure TForm1.Timer1Timer(Sender: TObject);

begin
with StatusBar1 do
begin
Panels[0].Text := 'Дата: ' + DateToStr(Now);
P ... Читать дальше »

Название блока

Здесь html код

Название блока

Здесь html код

Название блока

Здесь html код

Название блока

Здесь html код

 
Исходники Delphi
Сделать бесплатный сайт с uCoz |