| |
|
|
Julian Schmidt | Salut, je serait volontiers une VScroll sans cet komischen Pfeile à gauche et à droite erstellen. je vermute le moi dessen Stil Travailler muss. wohin finde je une Überblick trop cette. j'ai bereits dans Konstantinopel geschaut! là finde je une Eintrag Scrollbar, ist cela un Scrollbalken? Reicht es den Stil avec SetStyle trop transfert? ou bien muss je cela Element per Contrôle erstellen?
Windowstyle 24
Fenêtre 100,200-200,70
Windowtitle "Scrollbalken"
var Scrollbalken&=Créer("HScroll",%hwnd,»,10,10,width(%hwnd)-20,height(%hwnd)-20)
SetScrollRange Scrollbalken&,0,100
SetScrollPos Scrollbalken&,50
tandis que 1
waitkey
cas iskey(27) : end
Endwhile
LG
Julian |
|
|
| ˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗ Webseite [...] | 08.07.2011 ▲ |
|
|
|
|
| Mir zumindest ist pas bekannt cela un solch oui c'est ca comment de Dir beschriebenes Contrôle de qui Windows-GUI bereits vorgefertig vorgehalten wird.
mon TIP: Contrôle-Spy: [...] |
|
|
| |
|
|
|
Julian Schmidt | merci pour den Tipp. dans ControlSpy finde je keinen passenden Stil quel solch un Resultat bewirkt. Allerdings finde je une Message quelle qui Pfeile deaktiviert (zumindest den linken flèche)
Gibt es une autre Possibilité une Scrollbalken sans solche Pfeile trop erstellen. Ausgenommen qui Possibilité, cela Element selber sur dem Dialog trop zeichnen?
So, ou bien ähnlich lieu je mir den Scrollbalken avant...
|
|
|
| ˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗ Webseite [...] | 08.07.2011 ▲ |
|
|
|
|
| |
|
| |
|
|
|
Julian Schmidt | iF (08.07.11)
exposition fois le Winform.inc ( [...] ) et Ausmasse qui Pfeilboxen bekommst z.B. avec SM_CXHSCROLL per GetSystemMetrics-Funktion ( [...] ) ermittelt.
hmmmm...cela beschneiden des Scrollbalken's alla Winform.inc allez zwar pour une Moment, allerdings si on par-dessus fährt ist qui entier normale Scrollbalken wieder là.
$I Winform.inc
Windowstyle 24
Fenêtre 100,200-200,70
Windowtitle "Scrollbalken"
var Scrollbalken&=Créer("HScroll",%hwnd,»,0,10,width(%hwnd),height(%hwnd)-20)
SetScrollRange Scrollbalken&,0,100
SetScrollPos Scrollbalken&,50
forme.hdl(Scrollbalken&,10,0,width(Scrollbalken&)-15,height(%hwnd)-0)
tandis que 1
forme.hdl(Scrollbalken&,10,0,width(Scrollbalken&)-15,height(%hwnd)-0)
Endwhile
iF (08.07.11)
Julian57 [...] So, ou bien ähnlich lieu je mir den Scrollbalken avant... c'est (mais) une Trackbar.
hmmmmm....oui. Inwiefern peux on Trackbars qui Position auslesen, mettons, et qui 'Reichweite' begrenzen |
|
|
| ˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗ Webseite [...] | 08.07.2011 ▲ |
|
|
|
|
| Verrät Dir (doch) ControlSpy! |
|
|
| |
|
|
|
Jörg Sellmeyer | Such la fois im RGH-Forum pour 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 Dir (doch) ControlSpy!
sur quoi beziehst du cela eh bien? sur?
Julian57 (08.07.11)
iF (08.07.11)exposition fois le Winform.inc ( [...] ) et Ausmasse qui Pfeilboxen bekommst z.B. avec SM_CXHSCROLL per GetSystemMetrics-Funktion ( [...] ) ermittelt. hmmmm...cela beschneiden des Scrollbalken's alla Winform.inc allez zwar pour une Moment, allerdings si on par-dessus fährt ist qui entier normale Scrollbalken wieder là. $I Winform.inc
Windowstyle 24
Fenêtre 100,200-200,70
Windowtitle "Scrollbalken"
var Scrollbalken&=Créer("HScroll",%hwnd,»,0,10,width(%hwnd),height(%hwnd)-20)
SetScrollRange Scrollbalken&,0,100
SetScrollPos Scrollbalken&,50
forme.hdl(Scrollbalken&,10,0,width(Scrollbalken&)-15,height(%hwnd)-0)
tandis que 1
forme.hdl(Scrollbalken&,10,0,width(Scrollbalken&)-15,height(%hwnd)-0)
Endwhile
ou bien plutôt sur?
Julian57 (08.07.11)
IF (08.07.11)Julian57 (08.07.11)So, ou bien ähnlich lieu je mir den Scrollbalken avant... c'est (mais) une Trackbar. hmmmmm....oui. Inwiefern peux on Trackbars qui Position auslesen, mettons, et qui 'Reichweite' begrenzen
@Jörg
Jörg Sellmeyer (08.07.11)
Such la fois im RGH-Forum pour Trackbar.
Im Forum gibt es aucun direkten Suchergebnisse [...] |
|
|
| ˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗ Webseite [...] | 08.07.2011 ▲ |
|
|
|
|
|
|
|
| |
|
|
|
Jörg Sellmeyer |
Im Forum gibt es aucun direkten Suchergebnisse
Komisch - et wieso finde je ensuite juste im ersten Beitrag un lauffähiges Beispiel...?
|
|
|
| Windows XP SP2 XProfan X4... und hier mal was ganz anderes als Profan ... | 08.07.2011 ▲ |
|
|
|
|
| Tust la fois comme si Du lesen peux! |
|
|
| |
|
|
|
Julian Schmidt | @Jörg hmmmm....oui cela Beispiel habe je übersehen
@All comment peux je qui Postion qui Trackbar mettons
declare slider1&,slider2&, slider3&,slider4&
cls
Set("decimals",0)
slider1&=Contrôle("MSCTLS_TRACKBAR32", "Trackbar01", $54000012, 10, 100, 25, 100, %hwnd, 2011, %hInstance, $00010004)
slider2&=Contrôle("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
imprimer "Trackbar 1:";255-SendMessage(slider1&,$0400,0,0);" "
imprimer "Trackbar 2:";100-SendMessage(slider2&,$0400,0,0);" "
imprimer "Trackbar 3:";SendMessage(slider3&,$0400,0,0);" "
imprimer "Trackbar 4:";SendMessage(slider4&,$0400,0,0);" "
endwhile
|
|
|
| ˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗ Webseite [...] | 09.07.2011 ▲ |
|
|
|