Search results
Search results 21-40 of 48.
Dear visitor, welcome to Jabaco - Community.
If this is your first visit here, please read the Help. It explains in detail how this page works.
To use all features of this page, you should consider registering.
Please use the registration form, to register here or read more information about the registration process.
If you are already registered, please login here.
Hello With Substance skin engine, you can create very professional look of your application. 1.Download engine from https://substance.dev.java.net/ (download Substance 5.2 library) 2.Add to your CLASSPATH (F1 in Jabaco) 3.Add reference for UIManager and SwingUtilities 4.Add this code to Form_Load Jabaco Source 1 2 UIManager.setLookAndFeel ("org.jvnet.substance.skin.SubstanceMistAquaLookAndFeel") SwingUtilities.updateComponentTreeUI(Me) That is all Screenshots of skins can be found on https://sub...
Hello, I try to use JFormattedTextField with this code: Public Sub Form_Load() Dim DatF As java#text#DateFormat= New java#text#SimpleDateFormat ("dd-MM-yyyy") Dim df As javax#swing#text#DateFormatter=New javax#swing#text#DateFormatter(DatF) Dim tf As javax#swing#JFormattedTextField=Newjavax#swing#JFormattedTextField(df) tf.SetBounds(10,10,100,20) Me.add tf End Sub ... and i got class descriptor. Can anyone try this code, and tell me a result? Thanks Milan PS: tags dont work with Google Chrome
Maybe RS232 routines via JNI
Hello vdecampo, It's nice to see you on this forum. For those who don't know, vdecampo is FREEBASIC GURU!!! I hope that he well bring up to the developing higher level of this community. Welcome again
Hi to all I want to change property of TextBox wich is on Form2. Main routine is on Form1. I try to reference it like dim txtBox as Form2#Text1 txtBox.Text="bla bla bla" ... but with no success. How to do that? Milan
Hi Blue Blazes Here is answer Jabaco Source 1 2 3 4 5 6 7 8 9 10 11 Dim fh As VBFileHandler fh=Open ("c:\test",append ) fh.appendString ("1" & Chr(13)) fh.appendString ("2" & Chr(13)) fh.appendString ("3") fh.close fh=Open ("c:\test",Input) MsgBox fh.readLine MsgBox fh.readLine MsgBox fh.readLine fh.close All read and write operations is done via stream. Stream don't know anything about any special character. So, you must add it manually. Milan
Hi guys, Question is: How Jabaco teat STRING? Like a object, or like a datatype?
Hello RvdN In Jabaco, you must use jdbc for database connection. First find JDBC driver for ISAM databases, then add it to classpath. Then look in the forum sample for other database, and just change part of code for driver initialisation. If you have any problem, post it Milan
Cool OlimilO. Now, when we know how to implement custom events for swing controls, only imagination is limit. There are very big collection of great swing custom controls on sourceforge.net Take a look. Milan
Ok, i found solution Code for Form Source code 1 2 3 4 5 6 7 8 9 10 11 12 Implements java#awt#Event#ActionListener Public Sub Command1_Click() Dim jb As JButton=New JButton ("Test") jb.addActionListener Cast(Form1,java#awt#Event#ActionListener) Me.add jb jb.setBounds 10,10,60,20 End Sub Public Sub actionPerformed(arg2 As ActionEvent) MsgBox "test" End Sub Thanks to OlimilO for directions Milan
OlimilO, can you post example for ActionListener of JButton? Thanks Milan
OlimilO, i do not have currently any. I just investigate how to use events with swing and jabaco. I hope that you understand me. Sorry for my poor english.
Can i get little sample how to do it?
Hi OlimilO Let to say that i want to use some swing usercontrol, like grid, or anyone, and i want to add some EventHandler for that control, like click on cell... is there any other way to create class for that event, or i must add every time new class file? Thanks Milan
Ok, with little thinking i got answer. First create new class file like Class1 and add code... Source code 1 2 3 4 Implements ActionListener Public Sub actionPerformed(arg2 As ActionEvent) MsgBox "dd" End Sub Then create java component and add ActionListener... Source code 1 2 3 4 5 6 7 Public Sub Command1_Click() Dim jb As JButton=New JButton ("test") Dim test As New Class1 jb.addActionListener (test) Me.add jb jb.setBounds 10,10,60,20 End Sub But, new question is: is there any other solution t...
Hi to all! Can someone explain me how to implement ActionListener class in Jabaco? I have little success with this code, but results are non excepted. Thanks Source code 1 2 3 4 5 6 7 8 9 10 11 Function Test () As ActionListener MsgBox "proba" End Function Public Sub Command1_Click() Dim jbut As JButton=New JButton jbut.addActionListener (Test) Me.add (jbut) jbut.setBounds (10,10,30,30) End Sub
Thanks for help guys Milan