Перевод структуры CPP => DELPHI

[Alex Cones]

Разбираюсь в структуре формата bmp, мелкомягкие как всегда не заботятся о DELPHI программистах - весь код на Си. Саму структуру перевел, а одну строку не знаю, как объяснить, прошу помощи:

Вариант мелкомягких:

typedef struct tagBITMAPFILEHEADER 
{ 
  WORD    bfType; 
  DWORD   bfSize; 
  WORD    bfReserved1; 
  WORD    bfReserved2; 
  DWORD   bfOffBits; 
} BITMAPFILEHEADER, *PBITMAPFILEHEADER;

Мой вариант:

tagBITMAPFILEHEADER  = Record
 bfType      : Word;
 bfSize      : LongWord;
 bfReserved1 : Word;
 bfReserved2 : Word;
 bfOffBits   : LongWord;
End;

Вопрос таков: как перевести строку "BITMAPFILEHEADER, *PBITMAPFILEHEADER;"?
Ну и маленькое уточнение: правильно ли я привел типы данных по WORD и DWORD? В смысле они со знаком или нет? Я сделал без знака, но правильно ли это?
И еще маленькое уточнение: я тут в одной из структур узрел LONG - оно со знаком или без?

[BOBAH13]

type
 tagBITMAPFILEHEADER = packed record
   bfType: WORD;
   bfSize: DWORD;
   bfReserved1: WORD;
   bfReserved2: WORD;
   { или же просто
   bfReserved: DWORD; }
   bfOffBits: DWORD;
 end;
 BITMAPFILEHEADER = tagBITMAPFILEHEADER;
 PBITMAPFILEHEADER = ^BITMAPFILEHEADER;

Да и вроде же в windows.pas это все есть.

p.s. на дельфи уже давно не писал, так что возможно мелкие синтаксические помарочки.

[Alex Cones]

Так, а что можно сказать насчет LONG? Его нет в Windows.pas.

[BOBAH13]

Сообщение от Alex Cones

Так, а что можно сказать насчет LONG? Его нет в Windows.pas.

Причем LONG к BITMAPFILEHEADER ? Я вообще не пойму. Ну да ладно, а если такая проблема что не знаете сколько какой тип "весит" в байтах, справки и сеть уже отменили что ли ? Найти сколько "весит" определенный тип в Delphi (тем более) это дело пары минут.

Edit:
К примеру смотреть тут

[Alex Cones]

Причем LONG к BITMAPFILEHEADER ?

typedef struct tagBITMAPINFOHEADER{
  DWORD  biSize; 
  LONG   biWidth; 
  LONG   biHeight; 
  WORD   biPlanes; 
  WORD   biBitCount; 
  DWORD  biCompression; 
  DWORD  biSizeImage; 
  LONG   biXPelsPerMeter; 
  LONG   biYPelsPerMeter; 
  DWORD  biClrUsed; 
  DWORD  biClrImportant; 
} BITMAPINFOHEADER, *PBITMAPINFOHEADER;

Ну да ладно, а если такая проблема что не знаете сколько какой тип "весит" в байтах, справки и сеть уже отменили что ли ?

Я знаю, что он весит 32 бита, но это не решает проблемы - 32 бита могут быть знаковыми\беззнаковыми\дробными\цел ыми и проч.

К примеру смотреть тут

А вот за это спасибо.

[Пепел Феникса]

long в чистом С
32 бита...знаковое(ибо long и signed long это одно и тоже) = LongInt
DWORD - unsigned long(в 32-битном компиле может быть и unsigned int)
оно же LongWord в Делфи

вот ULONG(напомню что в С регистр имеет значение) это уже unsigned long