Français
Forum

XProfanX4s SpinEdit souris roue Wheel

 

Rainer
Hoefs
Salut,

habe mir gestern qui XProfanX4s gekauft.
qui Hauptgrund était cela schönere SpinEdit-Contrôle.

eh bien lieu je fest, qui on y la valeur pas plus avec dem MouseWheel einstellen peux.

Kennt quelqu'un une Solution?

et ensuite encore une Frage:
je voudrais im SpinEdit aucun Eingabe sur qui clavier zulassen.

qui Wert soll seulement sur qui UpDown-Arrows ou bien sur cela MouseWheel eingestellt volonté peut.

Habe déjà dans den Messages gesucht, mais rien trouvé. (peut-être aussi avec einer falschen concept gesucht.)

Pour Aider toujours reconnaissant
Rainer

[OFFTOPIC]Hab la fois den Titel quelque chose ergänzt
Jörg
[/OFFTOPIC]
 
10.03.2018  
 




H.Brill
sofern cela Mausrad wieder allez, wird assez
schwierig.

l'autre l'affaire, qui es seulement sur qui Pfeile
allez, ist machbar.

Hab je aussi pas gewußt, mais ausprobiert :

SendMessage(spin, $00CF, 1, 0)

simple cela Modifier le champ de des Spins sur READ_ONLY mettons.

Siehe Messages pour Editfelder.

comment on so joli sagt :

VERSUCH MACHT KLUCH !!!!!!!!!!!!!!!
 
Benutze XPROFAN X3 + FREEPROFAN
Wir sind die XProfaner.
Sie werden von uns assimiliert.
Widerstand ist zwecklos!
Wir werden alle ihre Funktionen und Algorithmen den unseren hinzufügen.

Was die Borg können, können wir schon lange.
10.03.2018  
 




Rainer
Hoefs
merci
 
10.03.2018  
 




H.Brill
j'ai quelque chose gesucht et pourrait dir quelque chose comme
anbieten :
Déclarer Handle spin, Long ende
Fenêtre 600, 400
spin = Créer("SpinEdit",%HWnd,"0;0;100",10,10,48,24)
SendMessage(spin, $00CF, 1, 0)
Utilisateur Messages $20A, $010
ende = 0

WhileNot ende

    WaitInput

    Select %UMessage

        CaseOf $20A

        Si HiWord(&UWPARAM) = 120

            Si Val(GetText $(spin)) < 100

                SetText spin, Str$(Val(GetText $(spin)) + 1)' hoch

            EndIf

        D'autre

            Si Val(GetText $(spin)) > 0

                SetText spin, Str$(Val(GetText $(spin)) - 1)' runter

            EndIf

        EndIf

        CaseOf $010' wm_close

        ende = 1

    EndSelect

Endwhile

Fin

eh bien allez beides.
Einziges Manko :
cela Mausrad allez aussi im Hauptfenster, alors aussi außerhalb
des Editfeldes vom SpinEdit.
Quelque chose comme devrait on ensuite avec SubClassing intercepter.
mais peut-être suffisant dir cela oui déjà.
 
Benutze XPROFAN X3 + FREEPROFAN
Wir sind die XProfaner.
Sie werden von uns assimiliert.
Widerstand ist zwecklos!
Wir werden alle ihre Funktionen und Algorithmen den unseren hinzufügen.

Was die Borg können, können wir schon lange.
10.03.2018  
 




H.Brill
là es mir aucun Ruhe ließ, maintenant aussi avec
SubClassing :
Déclarer Handle spin, Long ende
Fenêtre 600, 400
spin = Créer("SpinEdit",%HWnd,"0;0;100",10,10,48,24)
SendMessage(spin, $00CF, 1, 0)
Utilisateur Messages $20A, $010
ende = 0

SubClassProc

    Si SubClassMessage(spin, $20A)

        Si HiWord(&sWParam) = 120

            Si Val(GetText $(spin)) < 100

                SetText spin, Str$(Val(GetText $(spin)) + 1)' hoch

            EndIf

        D'autre

            Si Val(GetText $(spin)) > 0

                SetText spin, Str$(Val(GetText $(spin)) - 1)' runter

            EndIf

        EndIf

        Set("WinProc", 0)

    EndIf

ENDPROC

SubClass spin, 1

WhileNot ende

    WaitInput
    /*
    Sonstige Abfragen
    */
    Cas %UMessage = $10 : ende = 1

Endwhile

SubClass spin, 0
Fin

comment es scheint, erreicht qui MouseWheel - nouvelle pas
seulement cela Hauptfenster, mais aussi qui anderen Controls.

si on plusieurs SpinEdits hat, ist cet Methode
besser.
 
Benutze XPROFAN X3 + FREEPROFAN
Wir sind die XProfaner.
Sie werden von uns assimiliert.
Widerstand ist zwecklos!
Wir werden alle ihre Funktionen und Algorithmen den unseren hinzufügen.

Was die Borg können, können wir schon lange.
10.03.2018  
 



répondre


Topictitle, max. 100 marque.
 

Systemprofile:

ne...aucune Systemprofil angelegt. [anlegen]

XProfan:

 Posting  Font  Smilies  ▼ 

s'il te plaît s'inscrire um une Beitrag trop verfassen.
 

Options du sujet

5.938 Views

Untitledvor 0 min.
Stringray05.01.2022
Michael Hettner02.09.2021
Sven Bader24.08.2021
Thomas Zielinski29.08.2019
plus...

Themeninformationen

cet Thema hat 2 participant:

H.Brill (3x)
Rainer Hoefs (2x)


Admins  |  AGB  |  Applications  |  Auteurs  |  Chat  |  protection des données  |  Télécharger  |  Entrance  |  Aider  |  Merchantportal  |  Empreinte  |  Mart  |  Interfaces  |  SDK  |  Services  |  Jeux  |  cherche  |  Support

un projet aller XProfaner, qui il y a!


Mon XProfan
Privé Nouvelles
Eigenes Ablageforum
Sujets-La liste de voeux
Eigene Posts
Eigene Sujets
Zwischenablage
Annuler
 Deutsch English Français Español Italia
Traductions

protection des données


Wir verwenden Cookies seulement comme Session-Cookies à cause de qui technischen Notwendigkeit et chez uns gibt es aucun Cookies de Drittanbietern.

si du ici sur unsere Webseite klickst ou bien navigierst, stimmst du unserer Erfassung de Informationen dans unseren Cookies sur XProfan.Net trop.

Weitere Informationen trop unseren Cookies et en supplément, comment du qui Kontrolle par-dessus behältst, findest du dans unserer nachfolgenden Datenschutzerklärung.


d'accordDatenschutzerklärung
je voudrais keinen Cookie