| |
|
|
| CompileMarkSeparationSource wurde am 15.07.2007 aus der MMJ-Quellcodesammlung (Dietmar Horn) in die Babyklappe auf XProfan.Com abgelegt:
Text: Lauftext erzeugen (2)
PRFellow-Vorlage
Autor: Thomas Hölzer, 1998
Ein einfacher Lauftext
Def Sleep(1) !KERNEL32,Sleep
Proc LaufText
Parameters delay%,txt$
SetTimer delay%
While Neq(Len(txt$),0)
Sleep(delay%)
WaitInput
Let txt$=Del$(txt$,1,1)
StartPaint GetActiveWindow()
DrawText 0,20,Add$(txt$, )
EndPaint
Angehängter Leerstring verhindert Schmierspuren
Wend
KillTimer
EndProc
Beispiel
Cls
UseFont ARIAL,16,0,0,0,0
LaufText 100,Bei diesem Verfahren ist es schwierig, den Text weich scrollen zu let.
|
|
|
| |
|
|
|
| my hint here for Source-area: for each View source a own Thread.
means wirf simply your Codeschnippel over again here in a new Topic namens "Erzeugen Lauftext Text".
(The name is only one suggestion... kannste naturally name How You want.) |
|
|
| |
|
|
|
Julian Schmidt | thanks for Tipp ^^ Have whom View source now in 'produce Lauftext3 ' moved |
|
|
| ˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗ Webseite [...] | 05/20/11 ▲ |
|
|
|
|
|
and look time in your Profil: [...] - there standing now with "Snippets" already a 1! |
|
|
| |
|
|
|
Julian Schmidt | one Snippet |
|
|
| ˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗ Webseite [...] | 05/20/11 ▲ |
|
|
|