forum.boolean.name - Показать сообщение отдельно - Как ускорить загрузку ресурсов если их много

vladpol1 · 15.11.2010, 14:42

Типа полоса одной строкой

 
Graphics 640,480,0,2:Rect 35,215,570,30,0:For n=40 To 600:Line n,240,n,220:Delay 8:Next:WaitKey ()
;или
;Graphics 640,480,0,2:Rect 45,210,555,35,0:For n=50 To 575 Step 25:Rect n,215,20,25,1:Delay 200:Next:WaitKey()

вместо Delay стоит пофантазировать с Loading'ом

15.11.2010, 14:42	#15
vladpol1 Оператор ЭВМ Регистрация: 03.11.2008 Адрес: Москва Сообщений: 29 Написано 7 полезных сообщений (для 11 пользователей)	Ответ: Как ускорить загрузку ресурсов если их много Типа полоса одной строкой Graphics 640,480,0,2:Rect 35,215,570,30,0:For n=40 To 600:Line n,240,n,220:Delay 8:Next:WaitKey () ;или ;Graphics 640,480,0,2:Rect 45,210,555,35,0:For n=50 To 575 Step 25:Rect n,215,20,25,1:Delay 200:Next:WaitKey() вместо Delay стоит пофантазировать с Loading'ом __________________ Шаманом можешь ты не быть, но в бубен постучать обязан!
(Offline)