Member Avatar for sam.ss

Hi all,
CAn anyone guide me how to read a .dcm(DICOM) file in vb 6.0

thanks,
sam


code:
please guide hoe to implement to a picture box control so that code works

Public Type BITMAPINFOHEADER
biSize As Long
biWidth As Long
biHeight As Long
biPlanes As Integer
biBitCount As Integer
biCompression As Long
biSizeImage As Long
biXPelsPerMeter As Long
biYPelsPerMeter As Long
biClrUsed As Long
biClrImportant As Long
End Type

Public Type RGBQUAD
rgbBlue As Byte
rgbGreen As Byte
rgbRed As Byte
rgbReserved As Byte
End Type

Public Type BITMAPINFO
bmiHeader As BITMAPINFOHEADER
bmiColors(255) As RGBQUAD
End Type

Public bmp_Info As BITMAPINFO
Public Const DIB_RGB_COLORS = 0

Code:

' Calculate No. of Bits.
bit = CInt(Val(dcm_0028.BITS_ALLOCATED) * Val(dcm_0028.SAMPLES_PER_PIXEL))

row = Val(dcm_0028.ROWS) ' Image height (or) Number of Rows
col = Val(dcm_00

  • 2 Contributors
  • 1 Reply
  • 93 Views
  • 13 Hours Discussion Span
  • Latest Post Latest Post by debasisdas
Member Avatar for debasisdas

the file contains data in which format ?

is it binary ?

Be a part of the DaniWeb community

We're a friendly, industry-focused community of developers, IT pros, digital marketers, and technology enthusiasts meeting, networking, learning, and sharing knowledge.