这个C++头文件怎么用ObjectPascal来描述？(50分)

#ifndef _TM2KPLUS_H_2001_11_10
#define _TM2KPLUS_H_2001_11_10

#define __DLLEXPORT extern"C" __declspec(dllexport)

typedef enum
{
VideoSource_Composite = 1,
VideoSource_SVideo = 2
} VideoSource;

typedef struct tagMPEGPARAM
{
RateControl RateControl;//位率的控制模式(CBR,VBR)
FrameSize FrameSize; //视频尺寸(SIF,QSIF)
RecordMode RecordMode
//Live-Audio-Video-Encoder or Live-Video-Encoder (LAVE,LVE)
DWORD Quality; //视频质量：5-31 (5为最高质量，31为最低质量)
DWORD SystemRate
//单位为 400bits/s，取值范围：SIF(0x03C0-0x2C00)、QSIF(0x0140-0x1800)
DWORD VideoRate; //单位为 400bits/s，取值范围：SIF(0x0280-0x2800)、QSIF(0x00A0-0x1400)
DWORD AudioRate
//值限为0x1-0xe (32-384)Kbps
DWORD FramePattern
//定义帧的结构
//bit[31-9]:resvrce
//bit[8]:1-repeat B-frame, 0-actual B-frame
//bit[7-2]:n/m
//bit[1-0]:m+1, number of B-frame between two anchor frames
DWORD Resvrce[8]
//保留，必须为0
} MPEGPARAM;

#endif //#ifndef _TM2KPLUS_H_2001_11_10

TVideoSource = (VideoSource_Nothung, VideoSource_Composite,VideoSource_SVideo );
TMPEGPARAM = record
RateControl: RateControl;
FrameSize: FrameSize;
RecordMode: RecordMode;//以上三个不知何物
Quality,SystemRate,VideoRate,AudioRate,FramePattern: DWORD;
Resvrce: array[0..7]of DWORD;
end;

定义记录类型，如下：
type
Date = record
Year: Integer;
Month: Byte;
Day: Byte;
end;

var
BirthDay: Date;

begin
BirthDay.Year := 1997;
BirthDay.Month := 2;
BirthDay.Day := 14;应该可以表达的。

#ifndef _TM2KPLUS_H_2001_11_10
#define _TM2KPLUS_H_2001_11_10
#endif

我连这个怎么用Object Pascal表示都不知道，说看？

这个编译器开关,
{$Define _TM2KPLUS_H_2001_11_10}
就行了,

多人接受答案了。