Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Научите / 6 сообщений из 6, страница 1 из 1
01.04.2009, 16:50
    #35906331
Sid Sidov
Sid Sidov
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Научите
А научите пожалуйста делать полосы загрузки(точно пока не знаю как они называются). То есть делаю запрос, записей много, потом еще и в Excel экспортирую вот хотелось бы что бы в это время такая приблуда была!!! Покрасивше же!!! Спасибо!!!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
01.04.2009, 17:15
    #35906413
PaulWist
PaulWist
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Научите
ProgressBar
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
01.04.2009, 20:44
    #35906843
Dag
Dag
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Научите
Возможно SET TALK
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
01.04.2009, 23:00
    #35906980
alextashk
alextashk
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Научите
Самое красивое, но самое медленное
копирование по записи за раз и отображение данного процесса на красивой формочке.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
02.04.2009, 11:02
    #35907558
AleksMed
AleksMed
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Научите
Sid SidovА научите пожалуйста делать полосы загрузки(точно пока не знаю как они называются). То есть делаю запрос, записей много, потом еще и в Excel экспортирую вот хотелось бы что бы в это время такая приблуда была!!! Покрасивше же!!! Спасибо!!!
WAIT WINDOW будет достаточно
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
02.04.2009, 11:54
    #35907809
LUCIAN
LUCIAN
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Научите
Sid Sidov,

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
SELE CEXC
kstr=reccount()
SET PROC TO KLASS
oThermRef = CREATEOBJECT("thermometer","Формирование Excel-таблицы ")
oThermRef.Show()
oThermRef.Update( 0 ,"ОБРАБОТАНО ЗАПИСЕЙ 0")
prcs= 0 
OBRBZ= 0 
SCAN
	PRIT=IIF(LEFT(FIO, 5 )=="Итого",.T.,.F.)
	TOLSC=IIF(PRIT,xlThin,xlHairline)	
	With oSheet
	   .Rows(ALLT(STR(NROW))+':'+ALLT(STR(NROW))).RowHeight= 16 
		IF NOT PRIT
			FOR J= 1  TO  5 	
*****...................

*****.........
	nRow = nRow +  1 
	OBRBZ=OBRBZ+ 1 
	PRC=INT(OBRBZ* 100 /KSTR)
	IF PRC # PRCS
		PRCS=PRC
		oThermRef.Update(PRC,"Обработано записей:"+STR(OBRBZ, 6 )+" Всего:"+str(kstr, 6 ))
	ENDIF	
endscan
oThermRef.RELEASE()
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Научите / 6 сообщений из 6, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 1210ms
Закрыть
start [/forum/search_topic.php?author=Bolderoner&author_mode=last_posts&do_search=1]:
 0ms
get settings:
 9ms
get forum list:
 18ms
get settings:
 7ms
get forum list:
 12ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 25ms
get topic data:
 8ms
get forum data:
 2ms
get page messages:
 29ms
get tp. blocked users:
 1ms
others: 1093ms
total:  1210ms
x
x
Закрыть


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