OK, I love the extends feature.
for eg. I am always looking for a way to add a little cross or tick
to a listbox cell.
In one project, instead of a checkbox of a picture, I call these from
the listbox.BackgroundPaint event.
Sub DrawCross(Extends g as Graphics, left as integer, top as integer,
width as integer)
g.DrawLine left, top, left + width, top + width
g.DrawLine left, top+width, left + width, top
End Sub
Sub DrawTick(Extends g as Graphics, left as integer, top as integer,
width as integer)
g.DrawLine left, top, left + width/2 -2 , top + width/2
g.DrawLine left + width/2 -2, top + width/2, left+width, top -width/2
End Sub
I know that it is trivial but maybe this will encourage others to
post some little extends snippets.
--
Cheers,
Dr Gerard Hammond
Bioinformatic Analyst
Garvan Institute of Medical Research, Sydney, Australia.
If it's worth doing, then it's worth doing with excess.
_______________________________________________
Unsubscribe or switch delivery mode:
<http://www.realsoftware.com/support/listmanager/>
Search the archives of this list here:
<http://support.realsoftware.com/listarchives/lists.html>
