Displaying 1 result from an estimated 1 matches for "mybmpdata".
Did you mean:
mybigdata
2003 Sep 30
0
VB Code to convert BMP to LSS for splash screens
...te As Byte) As String
Dim tmpStr As String
tmpStr = Hex$(myByte)
If Len(tmpStr) < 2 Then tmpStr = "0" & tmpStr
PadHex = tmpStr
End Function
Sub convertBMPtoLSS()
Dim fileSystem
Dim myBmpHeader As bmpHeader
Dim myBmpPallete(256) As RGBColor4
Dim myBmpData() As Byte
Dim myLssHeader As lssHeader
Dim DebugStr As String
Dim filename As String
Dim iColor As Byte
Dim myByte As Byte
Dim nCount As Integer
Dim run As Integer
Dim erun As Byte
Dim current As Byte
Dim prev As Byte
Dim rowBuffer() As Byte...