Hex Viewer / Editor

[WizBang]

For the scroller i need to be able to Convert the scrollers Integer to a Long, unless theres a sroller with Long variables.. it's the only method i can think of.. (PS. i checked my Dos Hex editor (Norton's DE) and they use a multiplier in much the same way as i proposed..)

Like I posted earlier, you can just use a Long variable. No mystery involved.

Here's the way I edited the code when I was in Debug:

Private Sub Next_Block()
If File_Change Then Write_Data (File_Pos)
File_Pos = File_Pos + Tot_Count
If File_Pos > (CLng(Scroll_Pos.Max) * 16) Then
    File_Pos = (CLng(Scroll_Pos.Max) * 16)
End If
Read_Data File_Pos
End Sub

However, it would be more efficiant to use a Long. Either declare one form-wide, or in the subs that need it, like this:

Private Sub Next_Block()
If File_Change Then Write_Data (File_Pos)
Dim I As Long
I = Scroll_Pos.Max
File_Pos = File_Pos + Tot_Count
If File_Pos > I * 16 Then
    File_Pos = I * 16
End If
Read_Data File_Pos
End Sub

That's all there is to it, though the Next_Search_Block sub needs the fix too.