powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Замена стандартного ProgressBar'а
25 сообщений из 29, страница 1 из 2
Замена стандартного ProgressBar'а
    #34121600
MAJIbIIII
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Мой вопрос такой: Есть ли возможность изменить стандартный вид ProgressBar'а VFP. Если да, то каким образом (ProgressBar ActiveX не предлагать)
...
Рейтинг: 0 / 0
Замена стандартного ProgressBar'а
    #34122613
Фотография Владимир СА
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
MAJIbIIIIМой вопрос такой: Есть ли возможность изменить стандартный вид ProgressBar'а VFP. Если да, то каким образом (ProgressBar ActiveX не предлагать)Я лично использую контейнер и в нем Shape.
...
Рейтинг: 0 / 0
Замена стандартного ProgressBar'а
    #34122657
Фотография Aleksey-K
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
MAJIbIIIIМой вопрос такой: Есть ли возможность изменить стандартный вид ProgressBar'а VFP. Если да, то каким образом (ProgressBar ActiveX не предлагать)
А зачем ProgressBar ActiveX не угодил? Я давно его использую (точнее, класс не его основе) и ничего.
С уважением, Алексей.
...
Рейтинг: 0 / 0
Замена стандартного ProgressBar'а
    #34122726
piva
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
А я использую на базе системного окна msctls_progress32 и даже не парюсь
...
Рейтинг: 0 / 0
Замена стандартного ProgressBar'а
    #34126492
foxwizard
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
...
Рейтинг: 0 / 0
Замена стандартного ProgressBar'а
    #34126505
foxwizard
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Я использую такой:
...
Рейтинг: 0 / 0
Замена стандартного ProgressBar'а
    #34128553
MAJIbIIII
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
OK. Тогда поставим вопрос таким образом. Ваши изображения мне понравились. Но как перехватывать значения прогрессбара FoxPro (учтите я навичок, желательно с примером и как можно больше пояснений).

Заранее благодарю всех.
...
Рейтинг: 0 / 0
Замена стандартного ProgressBar'а
    #34128609
Sergey Sizov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Значения прогрессбара не перехватываются, а устанавливаются. Сам по себе он ничего не знает и умеет только показать то, что ему скажут. Скажешь показать 50% - нарисует половинку, скажешь 100% - нарисует полный. Это всего лишь средство отображения какой-то величины и ничего более того.
...
Рейтинг: 0 / 0
Замена стандартного ProgressBar'а
    #34128615
Sergey Sizov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Заодно о стандартности. Где ты увидел в фоксе "стандартный" прогрессбар? Все, что есть - или ActivX, или рисованные шейпами.
...
Рейтинг: 0 / 0
Замена стандартного ProgressBar'а
    #34128642
MAJIbIIII
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Sergey SizovЗаодно о стандартности. Где ты увидел в фоксе "стандартный" прогрессбар? Все, что есть - или ActivX, или рисованные шейпами.

Под стандартным прогрессбаром понимается тот прогрессбар, который появляется при сложном запросе. Для его вывода используют следующий код:

set talk on
<sql - запрос>
set talk off
...
Рейтинг: 0 / 0
Замена стандартного ProgressBar'а
    #34128700
Cyv
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
авторпрогрессбар, который появляется при сложном запросе
посмотри здесь
...
Рейтинг: 0 / 0
Замена стандартного ProgressBar'а
    #34129167
Фотография Aleksey-K
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
MAJIbIIIIOK. Тогда поставим вопрос таким образом. Ваши изображения мне понравились. Но как перехватывать значения прогрессбара FoxPro (учтите я навичок, желательно с примером и как можно больше пояснений).

Заранее благодарю всех.
Что значит "перехватить", я не знаю, а вот прервать - пожалуйста
1. У меня на форме-ProgressBar с ActiveX добавлена кнопка "Отмена", которая устанавливает свойство CancelFlag этого класса в .T.
2. В цикле, где происходит обновление ProgressBar происходит проверка этого свойства на .T. и в случае именно .T. спрашиваю пользователя о его желании прервать цикл
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
#DEFINE IDYES            6        && Yes клавиша в MESSAGEBOX
....
m.loProgress = CREATEOBJECT("progess2")
m.loProgress.Show()
m.loProgress.pCount = RECCOUNT("Table1")
SELECT Table1
SCAN
   IF m.loProgress.CancelFlag
      IF MESSAGEBOX("Прервать обработку строк?", 4 + 32 ,"Прервать...") = IDYES
         EXIT
      ENDIF
      m.loProgress.CancelFlag = .F.
   ENDIF
   DOEVENTS
   m.loProgress.RefreshDisplay("Обработка записи...")
   *-- Тут обработка данных
....
.....
ENDSCAN
RELEASE progess2
....

С уважением, Алексей
P.S. Класс можно скачать тут http://www.caws.atnet.ru/vfox/download.html
...
Рейтинг: 0 / 0
Замена стандартного ProgressBar'а
    #34130915
MAJIbIIII
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Всем спасибо вопрос решен. Особое спасибо Aleksey-K и Cyv за неплохие примеры...
...
Рейтинг: 0 / 0
Замена стандартного ProgressBar'а
    #34138936
MAJIbIIII
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Назрел еще один вопрос, по поводу того же прогрессбара, но уже слегка другого.
Есть такая инструкция:
Код: plaintext
1.
2.
3.
4.
USE TABLE1
USE TABLE2
...
USE TABLE5
Так вот: надо, чтобы пользователь видел процесс открытия таблиц. Команды типа:
Код: plaintext
WAIT WINDOW "Пожалуйста ждите" NOWAIT 
неподходит.

P.S. Такая ситуация сложилась, из-за того, что в каждой таблице хранится более 1000 записей, компы у юзеров медленные, и при открытии таблиц юзеры начинают паниковать, бегут ко мне: "У меня опять компьютер завис!!!".
Мне это надоело!!! У меня нервы не железные же.
...
Рейтинг: 0 / 0
Замена стандартного ProgressBar'а
    #34139000
Jura.K
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Ну и увеличивай значение прогрессбара на 1 после открытия каждой таблицы
...
Рейтинг: 0 / 0
Замена стандартного ProgressBar'а
    #34139085
Фотография Redrik
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
MAJIbIIII...в каждой таблице хранится более 1000 записей...
1. На USE это не влияет!
2. Подход не тот...
...
Рейтинг: 0 / 0
Замена стандартного ProgressBar'а
    #34145989
GoshaS
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
А можно ли сделать прогрессбар отражающий выполнение запроса на SQL сервере?
...
Рейтинг: 0 / 0
Замена стандартного ProgressBar'а
    #34146088
Samvel
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
в разделе "решения" Foxclub-а есть много примеров прогесбара
...
Рейтинг: 0 / 0
Замена стандартного ProgressBar'а
    #34146612
Фотография Aleksey-K
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
GoshaSА можно ли сделать прогрессбар отражающий выполнение запроса на SQL сервере?
Можно, если будет асинхронное соединение с сервером.
С уважением, Алексей.
...
Рейтинг: 0 / 0
Замена стандартного ProgressBar'а
    #34146693
karly™
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
MAJIbIIIIНазрел еще один вопрос, по поводу того же прогрессбара, но уже слегка другого.
Есть такая инструкция:
Код: plaintext
1.
2.
3.
4.
USE TABLE1
USE TABLE2
...
USE TABLE5
Так вот: надо, чтобы пользователь видел процесс открытия таблиц. Команды типа:
Код: plaintext
WAIT WINDOW "Пожалуйста ждите" NOWAIT 
неподходит.

P.S. Такая ситуация сложилась, из-за того, что в каждой таблице хранится более 1000 записей, компы у юзеров медленные, и при открытии таблиц юзеры начинают паниковать, бегут ко мне: "У меня опять компьютер завис!!!".
Мне это надоело!!! У меня нервы не железные же.Посмотри здесь и здесь
...
Рейтинг: 0 / 0
Замена стандартного ProgressBar'а
    #34147072
Strong
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
pivaА я использую на базе системного окна msctls_progress32 и даже не парюсь

Это как так? любопытно очень стало.
...
Рейтинг: 0 / 0
Замена стандартного ProgressBar'а
    #34148706
piva
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Там все написано. Я только идею выдрал
...
Рейтинг: 0 / 0
Замена стандартного ProgressBar'а
    #34151976
MAJIbIIII
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Владимир СА MAJIbIIIIМой вопрос такой: Есть ли возможность изменить стандартный вид ProgressBar'а VFP. Если да, то каким образом (ProgressBar ActiveX не предлагать)Я лично использую контейнер и в нем Shape.

Не могли бы вы выслать мне исходники (пример) с вашим прогрессбаром???
...
Рейтинг: 0 / 0
Замена стандартного ProgressBar'а
    #34152058
foxwizard
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
MAJIbIIII
Письмо мне на мыло кидал?
А то утром пришло письмо с подписью MAJIbIIII и улетело непрочитанным в помойку для спама.
...
Рейтинг: 0 / 0
Замена стандартного ProgressBar'а
    #34153450
Фотография Владимир СА
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
MAJIbIIIIНе могли бы вы выслать мне исходники (пример) с вашим прогрессбаром???мыло то где???
...
Рейтинг: 0 / 0
25 сообщений из 29, страница 1 из 2
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Замена стандартного ProgressBar'а
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]