| |
| |
|
E.T. | Wurde vorhin eben darauf angesprochen, das unter Win 7 die Eingabefelder (Edit's) einen "dummen" Effekt haben:
Wird mit der Maus darüber hinweg gefahren, ändern diese Ihr Aussehen. Dies gefällt meinem Anwender gar nicht.
Habs eben auch unter XP probiert, passiert das gleiche.
Liegt das nun an X2 oder an irgendeiner Win-Einstellung 
NACHTRAG: Scheind nur bei leeren Edit's zu 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 | | Ich denke es hängt an keinen von Beiden. Poste mal den entsprechenden Quelltext-Ausschnitt. |
|
| |
| |
| |
|
|
E.T. | Habs gefunden:
Liegt am Einblenden mittels AnimateWindow
KompilierenMarkierenSeparieren {$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 mal ob Thema entfernen hilft: [...]  |
|
| |
| |
| |
|
|
E.T. | Danke, funzt:
KompilierenMarkierenSeparieren {$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 ich halt nur für jedes Edit machen... |
|
| |
| 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. | ... ist ja ein Sch**** !!
Aber wenn man das Theme komplett abschaltet, sieht es ja aus wie unter 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 habe ich auch, wenn ich die Schriftart ändere. Danach werden alle Buttons,Editfelder usw plötzlich 'Fett' beim überfahren mit der Maus |
|
| |
| |
| |
|
|
| Ich schätze ihr beide meint aber etwas anderes.
Dein "Problem" scheint mir eher, dass Du die Schriftart nicht per SetFont sondern
z.B. per setDialogFont setzt. Besser SetFont nutzen. |
|
| |
| |
| |
|
(872)
Deutsch
English
Français
Español
Italia