Имя пользователя:
Пароль:  
Помощь | Регистрация | Забыли пароль?  

Показать сообщение отдельно
MKN MKN вне форума

Ветеран


Сообщения: 2355
Благодарности: 558

Профиль | Отправить PM | Цитировать


Бегущая текстовая строка

Код: Выделить весь код
!include "nsDialogs.nsh" 
OutFile "ScrollTxt.exe" 
Page custom myPage 

var dialog 
var txt 

Function myPage 
nsDialogs::Create 1018 
Pop $dialog 
${NSD_CreateText} 0 0 100% 8% "С Рождеством !  " 
Pop $txt 
SetCtlColors $txt 0xFF0000 0xffffff 
${NSD_CreateTimer} OnTimer 250
nsDialogs::Show
${NSD_KillTimer} OnTimer
FunctionEnd

Function OnTimer
${NSD_GetText} $txt "$1"
StrCpy $2 $1 1   #   в $2 будет помещен первый символ из $1
StrCpy $1 "$1$2" "" 1    #  из $1$2 будет отсечен первый символ и помещён в $1
${NSD_SetText} $txt "$1"
FunctionEnd

Section 
SectionEnd
В данном примере текст "бежит" справа налево. Вопрос : как изменить направление движения ?

Отправлено: 15:41, 05-01-2015 | #1428