RappyFood

Why not just create your own variable that tracks the name of the currently executing subroutine? Private Sub BuildContextMenus() _executingSub = "BuildContextMenus" ... End Sub RappyFood

LOL. The posts were removed in the time it took me to complain about it. Kudos. I'm sorry that I doubted you. RappyFood

I thought this was a moderated forum. Normally an easygoing guy, spam turns me into a psycho killer. We need an easy way to blacklist users. That way, if they cannot be kept out of the forum, I will not have to look at messages that begin with For Sale... Best Regards, RappyFood

If I understand your question, it looks as though you would be better off using a listview control with the View property set to Details. RappyFood

If you handle the toolbar's MouseDoubleClick event, it will pass you e as MouseEventArgs. You still need to determine if you have hit the gripper, but at least you have the mouse position. RappyFood

I wanted to open an attachment to a post in order to understand the question that the author was posing. I didn't open it because I am unsure of the safety of opening zip files like that. Although my AV definitions are current, I do not keep up with the latest exploits. Any comments? RappyFood

Once more, with syntax highlighting. RappyFood [vbnet] Private Sub MergeTifsWorker( _ ByVal SourceTifs As Collection, _ ByVal SaveName As String, _ ByVal AsyncOp As AsyncOperation) Dim masterbm As Bitmap Dim bm As Bitmap Dim exc As Exception = Nothing Try masterbm = _ CType(Bitmap.FromFile(SourceTifs.Item(1).ToString), Bitmap) Dim enc As Encoder = Encoder.SaveFlag Dim info As ImageCodecInfo = GetEncoderInfo("image/tiff") Dim ep As New EncoderParameters(1) ep.Param(0) = _ New EncoderParameter(enc, CLng(EncoderValue.MultiFrame)) masterbm.Save(SaveName, info, ep) ep.Param(0) = _ New EncoderParameter( _ enc, CLng(EncoderValue.FrameDimensionPage)) For i As Integer = 2 To fileCount bm = CType(Bitmap.FromFile(SourceTifs.Item(i).ToString), Bitmap) masterbm.SaveAdd(bm, ep) Next ep.Param(0) = _ New EncoderParameter(enc, CLng(EncoderValue.Flush)) masterbm.SaveAdd(ep) Catch ex As Exception exc = ex End Try 'Irrelevant code removed End Sub [/vbnet]

I have written a simple app to take a collection of single-frame tiff images from file and combine them to a single multi-frame tiff. It works fine. Unfortunately, the multi-frame tiff is saved with LZW compression. This app is meant to support an older process which can only read files with CCITT 4 compression. My source code follows. Irrelevant code is removed for clarity. It saves a multi-frame tiff with LZW compression. Does anybody know how I can save a multi-frame tif with CCITT 4 compression? I am using Visual Studio 2005 with .NET Framework 2.0 Private Sub MergeTifsWorker( _ ByVal SourceTifs As Collection, _ ByVal SaveName As String, _ ByVal AsyncOp As AsyncOperation) Dim masterbm As Bitmap Dim bm As Bitmap Dim exc As Exception = Nothing Try masterbm = _ CType(Bitmap.FromFile(SourceTifs.Item(1).ToString), Bitmap) Dim enc As Encoder = Encoder.SaveFlag Dim info As ImageCodecInfo = GetEncoderInfo("image/tiff") Dim ep As New EncoderParameters(1) ep.Param(0) = _ New EncoderParameter(enc, CLng(EncoderValue.MultiFrame)) masterbm.Save(SaveName, info, ep) ep.Param(0) = _ New EncoderParameter( _ enc, CLng(EncoderValue.FrameDimensionPage)) For i As Integer = 2 To fileCount bm = CType(Bitmap.FromFile(SourceTifs.Item(i).ToString), Bitmap) masterbm.SaveAdd(bm, ep) Next ep.Param(0) = _ New EncoderParameter(enc, CLng(EncoderValue.Flush)) masterbm.SaveAdd(ep) Catch ex As Exception exc = ex End Try .... Irrelevant code removed End Sub Regards, RappyFood

My humble guess follows: CType(DataGrid1.Items.Cells[6].Controls(0), Button).Enabled = False Chuck

There is a good article that covers this topic in the MSDN library at http://msdn.microsoft.com/library/en-us/dnadonet/html/manidcrisis.asp?frame=true