Splashimage mit Taste wechseln

Post a reply


In an effort to prevent automatic submissions, we require that you complete the following challenge.
Smilies
:D :) ;) :( :o :shock: :? 8-) :lol: :x :P :oops: :cry: :evil: :twisted: :roll: :!: :?: :idea: :| :mrgreen: :geek: :ugeek: :arrow: :angel: :clap: :crazy: :eh: :lolno: :problem: :shh: :shifty: :sick: :silent: :think: :thumbup: :thumbdown: :salute: :wave: :wtf: :yawn: :facepalm: :bravo: :dance: :beard: :morebeard: :xmas: :HeHe: :trollface: :cookie: :rainbow: :monkeysee: :monkeysay: :happybday: :headwall: :offtopic: :superhappy: :terms: :beer:
View more smilies
BBCode is ON
[img] is OFF
[flash] is OFF
[url] is ON
Smilies are ON
Topic review
   

Expand view Topic review: Splashimage mit Taste wechseln

Re: Splashimage mit Taste wechseln

Post by rollewand » 22 Apr 2019, 23:33

Danke schön. Sowas hab ich gesucht Danke
THX. Thats what i kooking for THX

Re: Splashimage mit Taste wechseln

Post by garry » 19 Apr 2019, 11:26

danke, hier ein Versuch

Code: Select all

#warn
setworkingdir,%a_scriptdir%
wa:=A_screenwidth
ha:=A_screenHeight
xx:=101
hx:=(ha*95)/xx
count:=""

Pic1 = %a_scriptdir%\test1.jpg
Pic2 = %a_scriptdir%\test2.jpg

$F1::
Count++
a:=Mod(Count,2)
if a=0
Splashimage,%pic1%,x10 y10 zw-1 zh%hx% B
else
Splashimage,%pic2%,x10 y10 zw-1 zh%hx% B
SetTimer, DestroySplash, 3000
Return
DestroySplash:
SplashImage, Off
Return
esc::exitapp

Re: Splashimage mit Taste wechseln

Post by KHA » 19 Apr 2019, 10:15

Hallo, den Script von Krogdor verstehe ich es nicht. (bin selber noch Anfänger) Habe mir vor einiger Zeit, ein Script zusammengestellt, der mit Pfeiltasten Links und Rechts zwischen SplashImage wechselt. Vlt. hilft es dir weiter.


Code: Select all


pfad = pic\ ;Pfad ein geben

Dateiliste =
Loop, Files, %pfad%\*.bmp
Dateiliste = %Dateiliste%%A_LoopFileName%`n

Dateiliste := RTrim(Dateiliste, "`n")

Dname := StrSplit(Dateiliste, "`n")
MaxN := Dname.MaxIndex()
i = 0

Right:: ;Tastenkombination Vorwärts

i++
if (i> MaxN)
i = 1

SplashImage, Off
SplashImage, % pfad . Dname[i], ZH-1 ZW300 X800 Y200 B
return


Left:: ;Tastenkombination Rückwärts
if (i = 0)
i = % MaxN

SplashImage, Off
SplashImage, % pfad . Dname[i], ZH-1 ZW300 X800 Y200 B
i--
return

Re: Splashimage mit Taste wechseln

Post by rollwand » 19 Apr 2019, 08:58

Mit Textausgabe funktioniert das (Script by Krogdor)

Ich würde das aber gerne mit Grafiken machen.

F1::
Count++
SplashImage, , , , % "SCRIPT " (Mod(Count,2) ? "ON!" : "OFF!")
SetTimer, DestroySplash, 4000
Return
DestroySplash:
SplashImage, Off
Return

Splashimage mit Taste wechseln

Post by rollwand » 19 Apr 2019, 08:06

Hallo zusammen,

ist es möglich mit einem Tastendruck ein Splashimage zu wechseln?

Habe es mal hiermit probiert ohne Erfolg.

Danke für eure Hilfe

--------------------------------------------------------------------
Pic1 := "test.bmp"
Pic2 := "test1.bmp"

F1::
Count++
SplashImage, % (Mod(Count,2) ? %Pic1% : %Pic2%), b FS18
SetTimer, DestroySplash, 1000
Return
DestroySplash:
SplashImage, Off
Return

Top