마음의 안정을 찾기 위하여 - Bitmap (BMP) File 정보 읽어오기
1948851
165
348
관리자새글쓰기
태그위치로그방명록
별일없다의 생각
dawnsea's me2day/2010
색상(RGB)코드 추출기(Color...
Connection Generator/2010
최승호PD, '4대강 거짓말 검...
Green Monkey**/2010
Syng의 생각
syng's me2DAY/2010
천재 작곡가 윤일상이 기획,...
엘븐킹's Digital Factory/2010
Bitmap (BMP) File 정보 읽어오기
Delphi/Image Processing | 2009/05/11 12:48

델파이 Windows.Pas에 선언된 Bitmap File 구조체

 tagBITMAPFILEHEADER = packed record
    bfType: Word; { $4d42 (i.e. 'BM') }
    bfSize: DWORD; { Size of file }
    bfReserved1: Word; { Reserved }
    bfReserved2: Word; { Reserved }
    bfOffBits: DWORD; { Byte location in the file which is first byte of image }
  end;

tagBITMAPINFOHEADER = packed record
    biSize: DWORD; { Size of tagBITMAPINFOHEADER }
    biWidth: Longint; { width of bitmap }
    biHeight: Longint; { height of bitmap }
    biPlanes: Word; { 1 }
    biBitCount: Word; { 1 (mono) or 4 (16 colors ) or 8 (256 colors) or 24 (16 Mil colors)  }
    biCompression: DWORD; { RLE COMPRESSION }
    biSizeImage: DWORD; { Width x height }
    biXPelsPerMeter: Longint;
    biYPelsPerMeter: Longint;
    biClrUsed: DWORD; { Number of palettes used (if less than standard) }
    biClrImportant: DWORD; { Number of important color}
  end;

var
  BitmapFileHeader: TBitmapFileHeader;
  BitmapInfoHeader: TBitmapInfoHeader;
  FileStream      : TFileStream;
Begin
  ...
  // The file stream to the file. You should change the file path :-)
  FileStream := TFileStream.Create('C:WindowsBubbles.bmp', fmOpenRead);
  try
    FileStream.Read(BitmapFileHeader, SizeOf(BitmapFileHeader));
    FileStream.Read(BitmapInfoHeader, SizeOf(BitmapInfoHeader));
  finally
    FileStream.Free;
  end;
  ...
end;

2009/05/11 12:48 2009/05/11 12:48
Article tag list Go to top
View Comment 2
Trackback URL :: 이 글에는 트랙백을 보낼 수 없습니다
From. 구차니 2009/05/11 13:42
답글달기삭제
헉 전 C에서 밖에 못해봤는데 델파이는 웬지 겁나요 ㅠ.ㅠ
From. 그리움 2009/05/11 15:25
삭제
전 C를 안쓰다 보니 점점 까먹어 가고 있어요 ㅠㅠ
PREV : [1] : NEXT
 
 
 
 
: [1] ... [355][356][357][358][359][360][361][362][363] ... [855] :
«   2021/10   »
          1 2
3 4 5 6 7 8 9
10 11 12 13 14 15 16
17 18 19 20 21 22 23
24 25 26 27 28 29 30
31            
전체 (855)
출판 준비 (0)
My-Pro... (41)
사는 ... (492)
블로그... (22)
My Lib... (32)
게임 ... (23)
개발관... (3)
Smart ... (1)
Delphi (75)
C Builder (0)
Object... (0)
VC, MF... (9)
Window... (1)
Open API (3)
Visual... (0)
Java, JSP (2)
ASP.NET (0)
PHP (4)
Database (12)
리눅스 (28)
Windows (23)
Device... (1)
Embedded (1)
게임 ... (0)
Web Se... (2)
Web, S... (19)
잡다한... (5)
프로젝트 (0)
Personal (0)
대통령... (9)
Link (2)