You mean the default Windows XP / Vista Theme? You could change the Java/Jabaco Look and Feel. Or switch your default theme to "Windows Classic".
I tried this with no success
In Module1:
Public SetJLAF As New JBCLookAndFeel
In Form1, with a CommandButton Cmd2:
Public bl As Boolean
Public Const WinXP As String = "Windows XP"
Public Const WinClassic As String = "Windows"
Public Function SJLAF() As Boolean
SJLAF = setJLAF.setJabacoLookAndFeel(WinXP)
End Function
Public Sub Cmd2_Click()
bl = SJLAF()
If bl Then
msgbox("Success")
Else
msgbox("Failed")
End If
End Sub
When click Cmd2 I get this in the lower right list
Exception in thread "AWT-EventQueue-1" java.lang.ClassNotFoundException: Windows XP
at java.net.URLClassLoader$1.run(Unknown Source)
at java.security.AccessController.doPrivileged(Native Method)
at java.net.URLClassLoader.findClass(Unknown Source)
at java.lang.ClassLoader.loadClass(Unknown Source)
at sun.misc.Launcher$AppClassLoader.loadClass(Unknown Source)
at java.lang.ClassLoader.loadClass(Unknown Source)
at java.lang.ClassLoader.loadClassInternal(Unknown Source)
at java.lang.Class.forName0(Native Method)
at java.lang.Class.forName(Unknown Source)
at javax.swing.SwingUtilities.loadSystemClass(Unknown Source)
at javax.swing.UIManager.setLookAndFeel(Unknown Source)
at VB.JBCLookAndFeel.setJabacoLookAndFeel(JBCLookAndFeel.jsrc:21)
at Form1.SJLAF(Form1.jsrc:71)
at Form1.Cmd2_Click(Form1.jsrc:75)
at Form1$CommandButton._Click(Form1.jsrc:82)
at VB.CommandButton.actionPerformed(CommandButton.jsrc:9
at javax.swing.AbstractButton.fireActionPerformed(Unknown Source)
at javax.swing.AbstractButton$Handler.actionPerformed(Unknown Source)
at javax.swing.DefaultButtonModel.fireActionPerformed(Unknown Source)
at javax.swing.DefaultButtonModel.setPressed(Unknown Source)
at javax.swing.plaf.basic.BasicButtonListener.mouseReleased(Unknown Source)
at java.awt.AWTEventMulticaster.mouseReleased(Unknown Source)
at java.awt.Component.processMouseEvent(Unknown Source)
at javax.swing.JComponent.processMouseEvent(Unknown Source)
at java.awt.Component.processEvent(Unknown Source)
at java.awt.Container.processEvent(Unknown Source)
at java.awt.Component.dispatchEventImpl(Unknown Source)
at java.awt.Container.dispatchEventImpl(Unknown Source)
at java.awt.Component.dispatchEvent(Unknown Source)
at java.awt.LightweightDispatcher.retargetMouseEvent(Unknown Source)
at java.awt.LightweightDispatcher.processMouseEvent(Unknown Source)
at java.awt.LightweightDispatcher.dispatchEvent(Unknown Source)
at java.awt.Container.dispatchEventImpl(Unknown Source)
at java.awt.Window.dispatchEventImpl(Unknown Source)
at java.awt.Component.dispatchEvent(Unknown Source)
at java.awt.EventQueue.dispatchEvent(Unknown Source)
at VBA.JabacoEventQueque.dispatchEvent(Unknown Source)
at java.awt.EventDispatchThread.pumpOneEventForFilters(Unknown Source)
at java.awt.EventDispatchThread.pumpEventsForFilter(Unknown Source)
at java.awt.EventDispatchThread.pumpEventsForHierarchy(Unknown Source)
at java.awt.EventDispatchThread.pumpEvents(Unknown Source)
at java.awt.EventDispatchThread.pumpEvents(Unknown Source)
at java.awt.EventDispatchThread.run(Unknown Source)
Where am I doing the wrong thing?
/Henning