Mecki14
Mitglied
AW: Anleitung für FixFotos Skript-Dialogeditor
Jetzt habe ich nochmal kräftig experimentiert und auch eine Lösung gefunden mit Hilfe von FF_SetDialogTimer dem VSLIDER einen beliebigen Einstellbereich zuzuordnen:
So ganz gefällt mir die Sache noch nicht. Je nach Einstellung des Timers ändert sich das Verhalten. Bei kurzen Zeiten kann man den Slider präziser einstellen, dafür reagiert das Skript aber schlechter auf die BUTTON-Betätigung "Ende". Eine Reaktion auf Betätigung des x oben rechts, das den Befehl "Cancel" auslöst, erfolgt nur sehr sporadisch.
Gibt es da Verbesserungsmöglichkeiten?
Jetzt habe ich nochmal kräftig experimentiert und auch eine Lösung gefunden mit Hilfe von FF_SetDialogTimer dem VSLIDER einen beliebigen Einstellbereich zuzuordnen:
Code:
'FFSubmenu=Test
'FFName=Test VSlider
Option Explicit
const Min = 60
const Max = 100
const Start = 75
Dim Wert
'** Start Dialog Test VSLIDER **
FF_AddDialog "Test VSLIDER",81,88
FF_AddControl "Test VSLIDER","VSL","VSLIDER",11,4,18,80
FF_AddControl "Test VSLIDER","AnzVSL","SLEDIT",45,22,21,10
FF_SetControlStyle "Test VSLIDER","AnzVSL",2049
FF_AddControl "Test VSLIDER","Ende","BUTTON",39,59,33,11
'** End Dialog Test VSLIDER **
FF_SetControl "Test VSLIDER","VSL", CInt((Start - Min) * 255 / (Max - Min))
do
FF_SetDialogTimer"Test VSLIDER",100 'Dialogtimer setzen
Wert = FF_GetControl("Test VSLIDER","VSL") 'Wert des Sliders abfragen,
Wert = CInt(Wert * (Max - Min) / 255 + Min) ' anpassen an die Konstanten
FF_SetControl "Test VSLIDER","AnzVSL", Wert ' und anzeigen
Select Case FF_ShowDialog ("Test VSLIDER") 'Befehle abfragen und Dialog öffnen
Case "CANCEL" 'bei Cancel Abbruch des Skript
exit do
Case "Ende" 'bei Ende Schleife verlassen
msgbox "Es wurde eingestellt:" & vbNewLine & "Wert " & FF_GetControl("Test VSLIDER","AnzVSL")
exit do
Case Else
End Select
loop
FF_CloseDialog ("Test VSLIDER") 'Dialog schließenSo ganz gefällt mir die Sache noch nicht. Je nach Einstellung des Timers ändert sich das Verhalten. Bei kurzen Zeiten kann man den Slider präziser einstellen, dafür reagiert das Skript aber schlechter auf die BUTTON-Betätigung "Ende". Eine Reaktion auf Betätigung des x oben rechts, das den Befehl "Cancel" auslöst, erfolgt nur sehr sporadisch.
Gibt es da Verbesserungsmöglichkeiten?
