안녕하세요.
C++ 소스를 Delphi로 변환 하고 있습니다.
아래와 같이 되어 있는 C++ 소스를 Delphi로 변환 했는데 에러가 발생하네요.
(프로그램이 죽습니다. ㅠㅠ)
어디가 잘못 된 건지 감이 오지 않아
여러분들의 도움을 구합니다.

[C++]
typedef struct {
  unsigned char event;
  unsigned char reserved1;
  unsigned short tnaEvent;
  time_t eventTime;
  unsigned userID;
  unsigned reserved2;
} *BSLogRecord;

[Delphi]
type
  TBSLogRecord = record
    event: ShortString;
    reserved1: ShortString;
    tnaEvent: Smallint;
    eventTime: Ttime;
    userID: Longword;
    reserved2: Longword;
  end;
  PBSLogRecord := ^TBSLogRecord;