| |
|
|
E.T. | Wurde vorhin eben darauf angesprochen, el bajo Win 7 el Eingabefelder (Edit's) una "dummen" Effekt haben: Wird con ratón darüber hinweg gefahren, ändern esta Ihr Aussehen. Dies gefällt mi Anwender nada.
Habs eben auch bajo XP probiert, passiert el gleiche.
Liegt el nun a X2 oder a irgendeiner Win-Einstellung
NACHTRAG: Scheind sólo en leeren Edit's a passieren... |
|
|
| Grüße aus Sachsen... Mario WinXP, Win7 (64 Bit),Win8(.1),Win10, Win 11, Profan 6 - X4, XPSE, und 'nen schwarzes, blinkendes Dingens, wo ich das alles reinschütte... | 06.04.2013 ▲ |
|
|
|
|
Julian Schmidt | Yo denke lo hängt a no de Beiden. Poste veces el entsprechenden Ver código fuente-Ausschnitt. |
|
|
| |
|
|
|
E.T. | Habs gefunden: Liegt al Einblenden mittels AnimateWindow KompilierenMarcaSeparación {$IQ}
'{$CLQ} 'wenn fertig, Exe erzeugen
CLS
Var D& = @Control("Dialog","",$44000000,5,5,@Width(%HWnd,0)-10,@Height(%HWnd,0)-10,%HWnd,1,%HInstance,$10000)
Create("Groupbox",D&,"Testbox ",10,10,300,300)
WhileLoop 0,10
Create("Edit",D&,"",30,30+&loop*25,200,20)
EndWhile
'ShowWindow(D&,1)'So sieht's gut aus
Einblenden(D&,300,~AW_Ver_NEGATIVE)'So nicht !!!
Waitinput
End
Proc Einblenden
Parameters wnd&,Time&,Richtung&
~AnimateWindow(wnd&,Time&,~AW_SLIDE | Richtung&)
ENDPROC
|
|
|
| XProfan X2Grüße aus Sachsen... Mario WinXP, Win7 (64 Bit),Win8(.1),Win10, Win 11, Profan 6 - X4, XPSE, und 'nen schwarzes, blinkendes Dingens, wo ich das alles reinschütte... | 06.04.2013 ▲ |
|
|
|
|
| Schau auch veces si Thema entfernen hilft: [...] |
|
|
| |
|
|
|
E.T. | Gracias, funzt: KompilierenMarcaSeparación {$IQ}
'{$CLQ} 'wenn fertig, Exe erzeugen
Def Setwindowtheme(3) !"uxtheme.dll", "SetWindowTheme"
Declare Ed&[]
CLS
Var D& = @Control("Dialog","",$44000000,5,5,@Width(%HWnd,0)-10,@Height(%HWnd,0)-10,%HWnd,1,%HInstance,$10000)
Create("Groupbox",D&,"Testbox ",10,10,300,300)
WhileLoop 0,10
Ed&[&loop] = Create("Edit",D&,"",30,30+&loop*25,200,20)
Disablexptheme(Ed&[&loop])
EndWhile
'ShowWindow(D&,1)'So sieht's gut aus
Einblenden(D&,300,~AW_Ver_NEGATIVE)'So nicht !!!
Waitinput
End
Proc Disablexptheme
Parameters Hwnd&
Declare Word#
Dim Word#, 2
Setwindowtheme(Hwnd&, Word#, Word#)
Dispose Word#
EndProc
Proc Einblenden
Parameters wnd&,Time&,Richtung&
~AnimateWindow(wnd&,Time&,~AW_SLIDE | Richtung&)
ENDPROC
Muss Yo sólo sólo para cada Editar hacer... |
|
|
| XProfan X2Grüße aus Sachsen... Mario WinXP, Win7 (64 Bit),Win8(.1),Win10, Win 11, Profan 6 - X4, XPSE, und 'nen schwarzes, blinkendes Dingens, wo ich das alles reinschütte... | 06.04.2013 ▲ |
|
|
|
|
E.T. | ... es sí una Sch**** !!
Aber si al Theme komplett abschaltet, sieht lo sí de como bajo 3.11
Obwohl... Nostalgie |
|
|
| XProfan X2Grüße aus Sachsen... Mario WinXP, Win7 (64 Bit),Win8(.1),Win10, Win 11, Profan 6 - X4, XPSE, und 'nen schwarzes, blinkendes Dingens, wo ich das alles reinschütte... | 07.04.2013 ▲ |
|
|
|
|
Richi | Diesen Effekt Yo auch, si yo el Schriftart ändere. Danach voluntad todos Buttons,Editfelder usw plötzlich 'Fett' beim überfahren con ratón |
|
|
| |
|
|
|
| Yo schätze ihr beide meint aber de otra manera.
Su "Problem" scheint me más, dass Usted el Schriftart no por SetFont pero z.B. por setDialogFont setzt. Besser SetFont nutzen. |
|
|
| |
|
|