| |
| |
|
Julian
Schmidt | ¡Hola,
Yo sería como un VScroll sin esta komischen Pfeile links y rechts redactar.
Yo vermute el Yo dessen Stil bearbeiten muss. Wo finde Soy un Überblick a esta. Yo habe ya en Konstantinopel geschaut! Dort finde Soy un Eintrag Scrollbar, es el una Scrollbalken? Reicht lo el Stil con SetStyle a transferencia? Oder muss Yo el Element por Control redactar?
Windowstyle 24
Ventana 100,200-200,70
Windowtitle "Scrollbalken"
var Scrollbalken&=Crear("HScroll",%hwnd,"",10,10,width(%hwnd)-20,height(%hwnd)-20)
SetScrollRange Scrollbalken&,0,100
SetScrollPos Scrollbalken&,50
mientras que 1
waitkey
caso iskey(27) : end
Endwhile
LG
Julian |
|
| |
| ˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗ Webseite [...]  | 08.07.2011 ▲ |
|
| |
|
|
 | Mir zumindest es no bekannt el una solch genau como de Usted beschriebenes Control de el Windows-GUI ya vorgefertig vorgehalten se.
Mein TIP: Control-Spy: [...] |
|
| |
| |
| |
|
|
Julian
Schmidt | Gracias para el Tipp.
In ControlSpy finde Yo no passenden Stil welcher solch una Resultat bewirkt.
Aunque finde Yo una Message welche el Pfeile deaktiviert (zumindest el linken Pfeil)
Gibt lo una otro Möglichkeit una Scrollbalken sin solche Pfeile a redactar.
Ausgenommen el Möglichkeit, el Element selber en el Diálogo para dibujar?
So, oder ähnlich lugar Yo el Scrollbalken antes...
 |
|
| |
| ˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗ Webseite [...] | 08.07.2011 ▲ |
|
| |
|
|
| |
| |
| |
| |
|
|
Julian
Schmidt | IF (08.07.11)
schau mal el Winform.inc ( [...] ) y Ausmasse el Pfeilboxen bekommst z.B. con SM_CXHSCROLL por GetSystemMetrics-Función ( [...] ) ermittelt.
hmmmm...el beschneiden des Scrollbalken's alla Winform.inc va zwar para una Moment, allerdings si uno darüber fährt es el bastante normale Scrollbalken otra vez como.
$I Winform.inc
Windowstyle 24
Ventana 100,200-200,70
Windowtitle "Scrollbalken"
var Scrollbalken&=Crear("HScroll",%hwnd,"",0,10,width(%hwnd),height(%hwnd)-20)
SetScrollRange Scrollbalken&,0,100
SetScrollPos Scrollbalken&,50
form.hdl(Scrollbalken&,10,0,width(Scrollbalken&)-15,height(%hwnd)-0)
mientras que 1
form.hdl(Scrollbalken&,10,0,width(Scrollbalken&)-15,height(%hwnd)-0)
Endwhile
IF (08.07.11)
Julian57 [...] So, oder ähnlich lugar Yo el Scrollbalken antes... Es (aber) una Trackbar.
hmmmmm....sí.
Inwiefern puede ser Trackbars el Position auslesen, conjunto, y el 'Reichweite' begrenzen |
|
| |
| ˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗ Webseite [...] | 08.07.2011 ▲ |
|
| |
|
|
| | Verrät Usted (doch) ControlSpy! |
|
| |
| |
| |
|
|
Jörg
Sellmeyer | | Such veces en el RGH-Foro después de Trackbar. |
|
| |
| Windows XP SP2 XProfan X4... und hier mal was ganz anderes als Profan ...  | 08.07.2011 ▲ |
|
| |
|
|
Julian
Schmidt | @IF
IF (08.07.11)
Verrät Usted (doch) ControlSpy!
Auf qué beziehst Si es usted el nun?
Auf?
Julian57 (08.07.11)
IF (08.07.11)schau mal el Winform.inc ( [...] ) y Ausmasse el Pfeilboxen bekommst z.B. con SM_CXHSCROLL por GetSystemMetrics-Función ( [...] ) ermittelt. hmmmm...el beschneiden des Scrollbalken's alla Winform.inc va zwar para una Moment, allerdings si uno darüber fährt es el bastante normale Scrollbalken otra vez como. $I Winform.inc
Windowstyle 24
Ventana 100,200-200,70
Windowtitle "Scrollbalken"
var Scrollbalken&=Crear("HScroll",%hwnd,"",0,10,width(%hwnd),height(%hwnd)-20)
SetScrollRange Scrollbalken&,0,100
SetScrollPos Scrollbalken&,50
form.hdl(Scrollbalken&,10,0,width(Scrollbalken&)-15,height(%hwnd)-0)
mientras que 1
form.hdl(Scrollbalken&,10,0,width(Scrollbalken&)-15,height(%hwnd)-0)
Endwhile
Oder más en?
Julian57 (08.07.11)
IF (08.07.11)hmmmmm....sí. Inwiefern puede ser Trackbars el Position auslesen, conjunto, y el 'Reichweite' begrenzen
@Jörg
Jörg Sellmeyer (08.07.11)
Such veces en el RGH-Foro después de Trackbar.
Im Foro hay no direkten Suchergebnisse [...] |
|
| |
| ˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗ Webseite [...] | 08.07.2011 ▲ |
|
| |
|
|
|
|
| |
| |
| |
|
|
Jörg
Sellmeyer |
Im Foro hay no direkten Suchergebnisse
Komisch - y wieso finde Yo entonces igual en el ersten Contribución una lauffähiges Ejemplo...?
 |
|
| |
| Windows XP SP2 XProfan X4... und hier mal was ganz anderes als Profan ... | 08.07.2011 ▲ |
|
| |
|
|
| Tust veces como si Usted lesen kannst!  |
|
| |
| |
| |
|
|
Julian
Schmidt | @Jörg
hmmmm....sí el Ejemplo Yo übersehen 
@All
¿Cómo se puede Yo el Postion el Trackbar conjunto
declarar slider1&,slider2&, slider3&,slider4&
cls
Conjunto("decimals",0)
slider1&=Control("MSCTLS_TRACKBAR32", "Trackbar01", $54000012, 10, 100, 25, 100, %hwnd, 2011, %hInstance, $00010004)
slider2&=Control("MSCTLS_TRACKBAR32", "Trackbar02", $5400000e, 70, 100, 40, 100, %hwnd, 2011, %hInstance, $00010004)
slider3&=control("MSCTLS_TRACKBAR32","Trackbar03",$50400061,10,210,400,30,%hwnd,0,%hInstance)
slider4&=control("MSCTLS_TRACKBAR32","Trackbar04",$50000010,10,250,400,30,%hwnd,0,%hInstance)
SendMessage(slider1&,$0406,0,MakeLong(0,255))
SendMessage(slider2&,$0406,0,MakeLong(0,100))
SendMessage(slider3&,$0406,0,MakeLong(0,100))
SendMessage(slider4&,$0406,0,MakeLong(0,100))
whilenot %scankey=27
waitinput
locate 1,1
imprimir "Trackbar 1:";255-SendMessage(slider1&,$0400,0,0);" "
imprimir "Trackbar 2:";100-SendMessage(slider2&,$0400,0,0);" "
imprimir "Trackbar 3:";SendMessage(slider3&,$0400,0,0);" "
imprimir "Trackbar 4:";SendMessage(slider4&,$0400,0,0);" "
endwhile
|
|
| |
| ˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗ Webseite [...] | 09.07.2011 ▲ |
|
| |
|
(507)
Deutsch
English
Français
Español
Italia
