|
Hi all
suppose I have these lines:
AddHandler MyControl1.Parent.Paint, AddressOf PaintParentHandler1
AddHandler MyControl2.Parent.Paint, AddressOf PaintParentHandler1
AddHandler MyControl3.Parent.Paint, AddressOf PaintParentHandler1
AddHandler MyControl1.Parent.Paint, AddressOf PaintParentHandler2
AddHandler MyControl1.Parent.Paint, AddressOf PaintParentHandler3
The questions are:
- how can I find, at runtime, the procedures that are attached to a given event?
- how can I find, at runtime, the events a given procedure is subscribed to?
In other words: what are the procedures that reacts to MyControl1.Parent.Paint and to which events PaintParentHandler1 respond?
Thanks a lot
-- modified at 3:19 Sunday 7th May, 2006
|
|
|
|
|
Hi,
1. if the event is within the same class than a call to GetInvocationList will give you an array of Delegates. I think the compiler will not accept this when calling it on an event defined outside the current class. You might nevertheless reach it via Reflection.
2. Not possible. An event is simply a collection of references to methods and the referenced methods don't know anything about it.
|
|
|
|
|
Hi Robert,
1. if the event is within the same class than a call to
GetInvocationList will give you an array of Delegates.
I think the compiler will not accept this when calling it on an
event defined outside the current class. You might nevertheless
reach it via Reflection.
Absolutely right! I've found a lot of samples that uses MyEventEvent.GetInvocationList(). Unfortunately for me, they are all inspecting events INSIDE the same class where they are declared. In my case, I need to find a list of eventhandlers for an event of a given object used elsewhere. The MyControl1.Parent.Paint sample is not casual...
Do you have an idea on how solve it using Reflection?
2. Not possible. An event is simply a collection of references
to methods and the referenced methods don't know anything about
it.
I agree. But what I'm thinking is that the compiler exactly knows that a procedure is attached to an event.
However, for me is much more important to solve #1.
As you can see in the first three lines of my sample, lines 2 and 3 are useless. In fact, if MyControl1, MyContro2 and MyContro3 are inside the SAME parent, PaintParentHandler1 is called three times, while only the first time is needed.
Thank you for any suggestion...
carlo
-- modified at 4:07 Sunday 7th May, 2006
|
|
|
|
|
Hi,
I've played around a bit but just couldn't bring the compiler to accept any call (even reflection) on an event. I know it must be somehow possible (because some tools I've seen are able to do so) but I don't know how they made it.
The only other workaround for your problem I can image would be holding a seperate list which holds the already bound references which you could check before binding the next event.
|
|
|
|
|
Hello Robert
you are right. Mantaining an embedded list of eventhandlers calls is a good idea.
However, yesterday I implemented and tested this:
<br />
RemoveHandler MyControl1.Parent.Paint, AddressOf PaintParentHandler1<br />
AddHandler MyControl1.Parent.Paint, AddressOf PaintParentHandler1<br />
<br />
RemoveHandler MyControl2.Parent.Paint, AddressOf PaintParentHandler1<br />
AddHandler MyControl2.Parent.Paint, AddressOf PaintParentHandler1<br />
<br />
RemoveHandler MyControl3.Parent.Paint, AddressOf PaintParentHandler1<br />
AddHandler MyControl3.Parent.Paint, AddressOf PaintParentHandler1<br />
This allows to have just a single PaintParentHandler1 call whithout any useless stack... and seems to work!
Thank you for your help.
Carlo
-- modified at 3:15 Monday 8th May, 2006
|
|
|
|
|
Hi all,
I have a Winforms 2.0 app in which I have a DataGridView which is populated from my own data objects (ie: from my own classes, not from a database or strongly typed dataset). The DGV is readonly so no editing or adding new rows can be done. Since some of the columns need to have a custom sort I set the SortMode property on those columns to "Programmatic" and then added the following event handler to the code:
Private Sub dgvMeetings_SortCompare(ByVal sender As System.Object, ByVal e As DataGridViewSortCompareEventArgs) Handles dgvMeetings.SortCompare
'Try to sort based on the columns in the current column.
e.SortResult = System.String.Compare(e.CellValue1.ToString(), e.CellValue2.ToString())
'If the cells are equal, sort based on the race start time column
If e.SortResult = 0 Then
e.SortResult = System.String.Compare(dgvMeetings.Rows(e.RowIndex1).Cells("RaceDate").Value.ToString(), _ dgvMeetings.Rows(e.RowIndex2).Cells("RaceDate").Value.ToString())
End If
e.Handled = True
End Sub
However, this event is simply not firing at all... I can click on the column headers until I'm blue in the face and the event never fires. The columns in the DGV that are set to sort automatically work fine so would anyone know why SortCompare is not working? I also tried adding an AddHandler which pointed to the same method (without the "Handles ..." of course) and it still ignores it. I actually got the code above from the MS document about the DGV (at http://download.microsoft.com/download/5/6/4/5646742C-3EB7-48F7-BFB3-CC295D618CF9/DataGridView%20FAQ.doc) in which it says this is the way to custom sort unbound data - but it doesn't seem to work for me... anyone know what I might be missing here?
TIA for any help...
Mike
-- modified at 0:13 Sunday 7th May, 2006
|
|
|
|
|
Worked out what is was - I actually needed to set the sort mode of each column to "Automatic" rather than "Programmatic". Seems the latter mode is really only for managing the sort glyphs etc. Now the SortCompare event fires but I have a new problem which is to get numeric columns such as "Race Number" to sort by the value (not the string value) then by the race start date (which is a DateTime column).
I was going to delete this post but thought I'd leave it there for anyone else that runs into the same problem.
Mike
|
|
|
|
|
hi all
i want to insert the value in field of type "time stamp" in sql server 2000 from vb.net application. that field is not null.
when i had tried to insert new record in a row of table leaving time stamp field empty but it insert value as <binary>. how to get time stamp and insert into sql server.
Tasleem Arif
|
|
|
|
|
 MY dear, I have a table Product in Sql server with 2 fields Prod_id & Prod_Name, I want to populate the combo box with prod Name , & when I select the Prod Name from the list then I need Prod ID , how easily I can do it with the shortest cod.......... Help me please....
|
|
|
|
|
in vb.6 the format(date,"dd/mm/yyyy") if working
but in vb.net the format(today,"dd/mm/yyyy") is reflecting as 06/00/2006
the "mm" part is always gives the "00" what can i do
|
|
|
|
|
"mm" is for minutes. You need to use "MM" for months.
I also recommend that you use the Date.ToString() method instead of Format() which is only there for VB6 compatibility reasons.
Dim myDate As Date = Date.Now
Dim myString As String
myString = myDate.ToString("dd/MM/yyyy")
|
|
|
|
|
I have entered data into a database table, "PersonData". It has 5 columns
PersonNo Sex Age Married Education.
Now I want to write a validation program in vb whereby it opens the "PersonData" and then checks that if person is married, then the spouse has to be of different sex. and if the pesron is married then the age has to be more than 15. There are many incosistencies that I would like my code to check, but if I can be helped with this ones I can handle the others. This I want to run for say about a thousands records.
Then I write the validation messages to a text file.
This is a sample of the code I have written:
Option Explicit
Public objConn As ADODB.Connection
Public objRst As ADODB.Recordset
Public objPwd As ADODB.Recordset
Public objCmd As ADODB.Command
Public Sub main()
Set objConn = New ADODB.Connection
Set objRst = New ADODB.Recordset
Set objCmd = New ADODB.Command
objConn.Provider = "MSDASQL.1"
objConn.ConnectionString = "Password=pwdsa;Persist Security Info=True;User ID=idsa;Data Source=TESTING;Initial Catalog=TESTING"
objConn.Open
If objConn.State = adStateOpen Then
MsgBox "Connexion with the server established", vbInformation, "prjTesting"
Else
MsgBox "Connexion Failed !", vbInformation, "prjTesting"
End If
End Sub
Private Sub cmdValidate_Click()
Open "C:\Testing\testing.txt " For Output As #1
With objRst
Do While Not .EOF
if !married = 1 and !age < 15 then write #1, "PersonID: "; !personid & " " Person must be greater 15 years in order to be married"
.MoveNext
Loop
End With
End Sub
Private Sub Form_Load()
main
Set objRst = New ADODB.Recordset
objRst.Open "tblPersondata", objConn, adOpenDynamic, adLockOptimistic
End Sub
-----------------------------
The problem with my code is that, it only checks for the first column only as with the other columns it does not.
What am I doing wrong.
Quick Help is appreciated.
Thank you
phokojoe
|
|
|
|
|
I don't see in your code where married or age are getting set to values...
Mike Lasseter
|
|
|
|
|
Actually, What i am saying is that, the data is already in the database. Now the code I am writing will look for the inconsistencies and then write the message to the .txt file that I have specified with the ID of that particular person where there is incosistancies.
In this, below
Private Sub cmdValidate_Click()
Open "C:\test\persondata.txt " For Output As #1
With objRst
Do While Not .EOF
If !married = 1 and age < 15 Then Write #1, "Person ID: "; !personid & " Too young to get married"
.MoveNext
Loop
End With
End Sub
For the married code is 1 and I am checking that if that particular person is married then, his/her age must be greater than 15 otherwise write down the personid in the persondata.txt file so that it will be corrected. Since I will be checking many persons and the same time that is why I have enclosed the statement inside the DO WHILE NOT EOF.
Please help
phokojoe
|
|
|
|
|
Please help me with the above thread.
Help is urgently needed. Actual, I am writing a code to validate my survey results whichI have used MS sql server 2000 as the backend and VB as the front end. Or can anybody help me with which is the appropriate software to use to validate the dataset.
phokojoe
|
|
|
|
|
Dear..!
i want to read data from notepad(Includes phones number)
and fill all the data in listview ...so i need
1- brows and select file which found in C: directory
2- fill all the data inside the listview items
thanx alot for you....
kilany
|
|
|
|
|
You do realise that a "notepad file" is just a plain text file?
"On two occasions, I have been asked [by members of Parliament], 'Pray, Mr. Babbage, if you put into the machine wrong figures, will the right answers come out?' I am not able to rightly apprehend the kind of confusion of ideas that could provoke such a question."
--Charles Babbage (1791-1871)
My: Website | Blog
|
|
|
|
|
is your problem solved .
if not send me message.
i can solve it.
rtytryt
|
|
|
|
|
hellow to all ..
i am generating a crystal report that have double rows that i would like to remove , let say i have
ID - NAME - ADDRESS
1 SSS SSSSS
1 EEE EEDEE
1 TER WEWEE
i would like to remove two rows , and keep one
have can i do this in crystal reports
thxx
|
|
|
|
|
Hi, I need to perform Shallow and Deep copies in my VB.NET application. Ive seen several code intensive methods to do this. Anyone know whay Microsoft has not just given a basic copy object command? Am I missing something?
In my application I have several User Controls and the user needs to cut and paste the controls to build up a screen of data that is then saved. The user often need to copy an existing instance of a user control and then modify it and save it. The amount of code I need to manually write seems intense.
Are there 3rd party extension to VB.NET that offer help in this area? As aI said b4 am I missing something?
I want to be able to do something like...
dim newObject as ucMyControl
newObject = new list.selecteditem
I know the keyword, NEW, is for new instances of classes but it would be handy if it created a new copy of a class as instanciated.
Cheers,
Kadi
|
|
|
|
|
You copy objects in .NET by "cloning" them. You can make your classes cloneable by implementing the ICloneable[^] interface.
A shallow copy is easy and can be done in 1 line. You just need to call the Object.MemberwiseClone()[^] method. All objects have this method.
Public Class Foo : Implements ICloneable
Public Function Clone() As Object Implements System.ICloneable.Clone
Return Me.MemberwiseClone
End Function
End Class
If you need to do a deep copy, then you need to explicitly create new objects within the above Clone() method and assign them to the clone's member variables.
|
|
|
|
|
Thanks for the reply. Do people manually do this for things like undo and redo? I have a control which has a defered update to a data collection class. If I want to undo the last change or x changes to the control do I manually code the undo? I had kinda hoped I could just pop it on a stack and pull it off again.
Kadi
|
|
|
|
|
I've never implemented undo/redo functionality before, but it sounds like you've got the right idea.
Before you change the state of an object, you should clone it and push it into the Undo stack. When the user does an Undo, you should pop the object out of the Undo stack and overwrite the current object with it. The only gotcha you have to worry about here is if there are any objects still referencing the Undone object. If this is the case, then you may need to hold the undo-able object in some kind of container class so that you don't have to update all of the references. In fact, the container class should probably implement the Undo functionality.
I found an article on CodeProject covering an undo/redo framework written in C#. Perhaps it might be of use to you.
http://www.codeproject.com/csharp/undoredobuffer.asp[^]
|
|
|
|
|
I want to select a picturebox control at runtime. Like in MS Word, If we insert any image, we can select it and perform operations on it (crop, rotate, resize, etc.).
I have created one user control in which I allow user to add imges (Placed in picture box of 100 X 100 size).
I could move the control at runtime by capturing Mouse related events. Now I want to resize it say by dragging the small sqares that should appear at its corners.
Can I use GDI+ to achieve this? Can anybody suggest me any code or APIs?
Thanks in advance...
Anil
|
|
|
|
|
Hi,
Im using VB 6.0.. I try to Print few words to the Zebra Label Printer..But doens't seems to print at all..
COde is :
Printer.Print "^XA"; Printer.Print "^MD10"
Printer.Print "^LH0,0^FS"
Printer.Print "^BY2,3.0^FO20,2^BCN,54,N,Y,N^FR^FDMirudhubashini^FS"
Printer.Print "^FO20,59^A0N,28,37^CI13^FR^FDWomens center^FS"
Printer.Print "^FO20,65^A0N,28,37^CI13^FR^FDCoimbatore^FS"
Printer.Print "^PQ1"
Printer.Print "^XZ"
Printer.EndDoc.
Either I see Status in Printer Queue as "Spooling".. and if i give Printer.Enddoc ..Nothing I can see in Printers Queue
All ^XA and similar words are for Label Printer ZPL Language
Pls help
-- modified at 6:01 Saturday 6th May, 2006
|
|
|
|
General 
News 
Suggestion 
Question 
Bug 
Answer 
Joke 
Praise 
Rant 
Admin 
Submit an article or tip
