Builder 2009에서 TIBEvents가 Unicode 처리 버그가 있어서
C:\Program Files\CodeGear\RAD Studio\6.0\include\vcl\IBEvents.pas
를
  function EBP(Index: Integer): PByte;
  var
    Event : AnsiString;
  begin
    Inc(Index, (EventGroup * IB_MAX_EVENT_BLOCK));
    if (Index > Parent.FEvents.Count) then
      Result := nil
    else
    begin
      Event := AnsiString(Parent.FEvents[Index - 1]);
      Result := PByte(Event);
    end;
  end;
수정 했습니다.
하지만 이것을 컴파일하는 방법을 모르겠습니다.
어제부터 이것 때문에 잠을 못자고 있습니다.