powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Замена стандартного ProgressBar'а
29 сообщений из 29, показаны все 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
Замена стандартного ProgressBar'а
    #34155594
MAJIbIIII
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Владимир СА MAJIbIIIIНе могли бы вы выслать мне исходники (пример) с вашим прогрессбаром???мыло то где???

foxwizardПисьмо мне на мыло кидал?
А то утром пришло письмо с подписью MAJIbIIII и улетело непрочитанным в помойку для спама.

Я обоим вам писал письмо с одинаковой просьбой:
Пожалуйсьа вышлите мне на мыло: majibiiii@yandex.ru примеры ваших прогрессбаров (demo-программу с прогрессбаром) картинки которого вы выложили в данном топике.

P.S. Заранее благодарен.
...
Рейтинг: 0 / 0
Замена стандартного ProgressBar'а
    #34156039
Ganordi
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Ник у тебя для воспроизведения методом постукивания по клавишам - сложен :))
По делу.... Стандартного,как ты выразился прогрессбара я не видел(видимо уж сильно сховали его) Есть ActiveX,но от него ты в отказе.Само построение прогрессбар - элементарно просто,и пытаться изобрести велосипед,пытаясь написать что-то "свое" - пустая трата времени.Пример,по которому мы все учились лежит в примерах работы с фоксом,если покопаешься ,найдешь там такую библиотеку.Немного фантазии и прикрутишь его в любом варианте к своему проекту.Можно в инете найти "навороченные" классы данной поделки,это уже варианты с поддержкой "тем" Windows XP изменение цветовой гаммы градиентной заливки самих сегментов составляющих(аналог XP-шного прогрессбара) термометра.Естественно авторы потрудились и с предоставлением
примеров.
Вот один такой вариает:
http://www.sweetpotatosoftware.com/SPSBlog/PermaLink,guid,87d20512-82d6-4ab2-827f-13a1bb5bbbf4.aspx
знание английского приветствуется ибо сайт не наш.Если есть желание,то там же можно поблагодарить автора,естественно на языке понятном ему :)
Вот тут второй вариант найдешь
http://www.ctl32.com.ar/ctl32_progressbar.asp
А еще можно найти много вариантов на дружественном сайте фоксклуба..
Только совет - тупое копирование - это использование,но обязательно надо знать,как это работает!!!Вообщем дерзай,изучай.Удачи!
...
Рейтинг: 0 / 0
Замена стандартного ProgressBar'а
    #34156410
Фотография Aleksey-K
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
MAJIbIIII
Я обоим вам писал письмо с одинаковой просьбой:
Пожалуйсьа вышлите мне на мыло: majibiiii@yandex.ru примеры ваших прогрессбаров (demo-программу с прогрессбаром) картинки которого вы выложили в данном топике.

P.S. Заранее благодарен.
Отправил письмо.
С уважением, Алексей.
...
Рейтинг: 0 / 0
Замена стандартного ProgressBar'а
    #34156589
foxwizard
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Отправил.
...
Рейтинг: 0 / 0
29 сообщений из 29, показаны все 2 страниц
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Замена стандартного ProgressBar'а
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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