|
Form.ActiveForm will return the form with the focus in your app.
|
|
|
|
|
Thanks alot
--
"Keyboard not found. Press < F1 > to RESUME. "
Source unknown (appears in many common BIOSes as a real error message)
|
|
|
|
|
This doesn't seem to be working...It keeps returning nothing from form.activeform...here is a link that shows the debug i was doing:
My Debug Session
--
"Keyboard not found. Press < F1 > to RESUME. "
Source unknown (appears in many common BIOSes as a real error message)
|
|
|
|
|
How about Me.ActiveForm . Of course, that will only work if the code is in a form class. It won't work outside of a form.
|
|
|
|
|
It is under a modual with my Sub Main. The only way I could make it work so far is to use
Private Sub mKeyLogger_KeyPressed(ByVal theKey As System.Windows.Forms.Keys, ByVal isDown As Boolean) Handles mKeyLogger.KeyPressed
If isDown Then
Dim f As Form = mFrmMain.ActiveMdiChild
If Not f Is Nothing Then
If TypeOf f Is IHandlesDirectInput Then
DirectCast(f, IHandlesDirectInput).HandleInput(theKey, isDown)
End If
End If
End If
End Sub
The problem with this is that it limits me to only MDI childre, and not a dialog that could be showing...I need the top level form or dialog at the time the key is pressed so that I can dispatch the key directly to that form or dialog and let it handle it.
--
"Keyboard not found. Press < F1 > to RESUME. "
Source unknown (appears in many common BIOSes as a real error message)
|
|
|
|
|
Well, it's definately not working as advertised. I never use it, so all I have to go on is the documentation.
Hmmm... Well. Quick and drity, it's possible to set a Shared variable from the Form.Activate event of each form you want to handle.
|
|
|
|
|
Expand the event to include the form object so that you can call it's routine
|
|
|
|
|
better yet, expand the event and pass the delegate that you want the logger to call...
|
|
|
|
|
As is ANY form implementing the interface WILL be called if it is in the front, except for dialogs...There is no way to expand the event to include the form, the event is fired from the key logger which has no knowledge of the form that will receive the event. The key logger simply sees the trapped key being pressed and raises an event saying it was pressed and letting me know if its state is up or down. passing delegates would require the form to know about the key logger and the key logger to know about the form, violating the principle of least privilege...besides if there was a way of knowing which form is in front from the key logger, then the same can be done from the event, its just a matter of how to find the current form or dialog that is running in the front of the application.
--
"Keyboard not found. Press < F1 > to RESUME. "
Source unknown (appears in many common BIOSes as a real error message)
|
|
|
|
|
Is there an easy way to Compact and Repair Access Database.
|
|
|
|
|
I found this article which may interest you:
http://support.microsoft.com/default.aspx?scid=kb;en-us;Q303528[^]
I wrote a utility to compact an access database using some code that I had found somewhere. I referenced Microsoft DAO 3.6 Object Library Com object and then used the following code:
Private Sub CompactFile(ByVal strFileIn As String, ByVal strFileOut As String)
Try
'First check the file u want to compact exists or not
If My.Computer.FileSystem.FileExists(strFileIn) Then
Dim objDAO As New DAO.DBEngine()
'CompactDatabase has two parameters, creates a copy of compact DB at the Destination path
objDAO.CompactDatabase(strFileIn, strFileOut)
End If
Catch ex As Exception
MsgBox("Compact File Error: " & ex.Message)
End Try
End Sub
Note: This method will save the compacted database under a new name. If you want it to appear that the file itself was compacted you will have to add code to delete the exising db and replace it with the compacted one after you perform this method.
Hope this helps.
|
|
|
|
|
How to add a chart in vb.net application?
Thanks In advance.
Ejaz
|
|
|
|
|
Ejaz, Look up article 301982 in support.microsoft.com. Worked as a start for me. OH
ohart
|
|
|
|
|
Thanks ohart but I tried to search this at support.microsoft.com but did not find this.
Can you please provide me the link for this article?
Thanks
|
|
|
|
|
support.microsoft.com/kb/301982 contains the article.
Other articles are 242243 and 822750 (altho this one is a little harder to understand and get going, at least if you are new to VB.NET like I am).
OH
ohart
|
|
|
|
|
hi...
how can i insert data to sql database...
plz, advice me...
thz a lot...
|
|
|
|
|
|
if you want to be helped here you have to be specific.
you want to use an application front end to do that or you want to run a an insert statement into the database. be specific.
Vuyiswa Maseko
|
|
|
|
|
Can we use non-english characters as listview column heading at run-time?
I mean when I add the columns for the listview at run time
listview1.columns.add("<b>I want to write Urdu word as heading</b>",100,Center)
Thanks In advance
Ejaz
|
|
|
|
|
Yes U can certainly do that , i hav done that
dim lst as new listviewitem
Me.ListView1.BeginUpdate()
lst = ListView1.Items.Add("0")
lst.subitems.add("1")
lst.subitems.add("2")
lst.subitems(2).font = New Font(" U R Urudu Font", 16, FontStyle.Bold)
Me.ListView1.EndUpdate()
This code will Show The 2nd Column of u r listview in Urudu Language
Reply, How It Helped.
Prabumj
Prabumj@gmail.com
|
|
|
|
|
Howdy folks
This is my first time posting, very new to the whole Microsoft Development Paradigm, Primarily come from a Web Marketing, PHP, and MySQL background .
I'm pretty much learning trial by fire, and am looking at some classic Visual Basic 2003 code for a web admin. I'm used to full color coding, and it appears that Visual Studio 2003 does not differentiate between user defined functions and language functions. Both appear to be in black text.
I'm used to seeing something more along these lines
Where language centric (in this case PHP) functions are colored as bold green text and user defined functions are regular case and purple
Is there anyway of replicating this behavior inside of visual studio 2003 and visual studio 2005?
|
|
|
|
|
Michaeljd wrote: Is there anyway of replicating this behavior inside of visual studio 2003 and visual studio 2005?
Nope. There's no way of telling them apart.
The are no "language-defined" functions in VB.NET. They're now done as Shared methods of various classes in the Microsoft.VisualBasic namespace. So, in essence, everything is a user-defined class/method now. There's no way to tell the difference between a predefined class in the .NET Framework and one that you can write yourself.
|
|
|
|
|
thank you for your quick reply
That's strange, I would think because the language is strongly typed, and microsoft pretty much knows what classes they've written that it would be able to create some sort of addon that replicates this. Not so important to veteran users, but nifty for newbies.
|
|
|
|
|
How I can add textboxes at run time?
I am using this method to add the control
Dim txtbox1 As New TextBox
Me.Controls.Add(txtbox1)
this works fine but I want to create controls through loop
like
For i = 1 to mnumber 'mnumber can be different - sometimes it can be 4 or 5 or 10
I want to add textboxes like
txtbox1,txtbox2,txtbox3,txtbo4 and so on
next
How this can be solve.
Thanks In advance
Ejaz
|
|
|
|
|
No problem, you should keep the references of the new TextBoxes in some kind of collection;
it could be an array, an ArrayList, a generic List, whatever. You can not have individual
identifiers ("variable names") for each of your TextBoxes when you create them in a loop;
if that is what you want (why should you?) then you need to use explicit statements
without a loop.
Dim myTBList as New ArrayList ' or some other list...
for i=1 to 10
Dim txtbox1 As New TextBox
Me.Controls.Add(txtbox1)
myTBList.Add(txtbox1)
next
Luc Pattyn [Forum Guidelines] [My Articles]
this weeks tips:
- make Visual display line numbers: Tools/Options/TextEditor/...
- show exceptions with ToString() to see all information
- before you ask a question here, search CodeProject, then Google
|
|
|
|