Q&A

  • 미치겠네요 델파이6 스트럭처 구성할때 틀린점이 있나요
제가 델파이5 하고 델파이6를 같이 사용하고 있습니다.



델파이6를 신빙하지 못해서요..



델파이5에서 잘되던 프로그램(빈폼하나에 스트럭쳐만 있는 유니트)을



델파이6에서 컴파일 하면 스트럭쳐가 있는 유니트에서 에러나요.



에러가 나면 보통 틀린데를 위치하잖아요.



그런데 이게 틀린데를 위치하지 않고 두문불출 전혀 엉뚱한 곳에



위치하고 에러라고 뿌리네요.



아래 소스는 전체중에서 특정부문만 뽑아서 추린것인데 이것도



컴파일하면 에러가 나오네요.



unit Unit2;

interface



const

Max_User = 8;

Max_Slot = 8;

///////////////////////////////////////////////////////////

// 제어 Message Assign

///////////////////////////////////////////////////////////





Type

Clap_Header = packed record

todtime : longword;

tick : longword;

msc_id : byte;

test_id : byte;

Src_id : int64;

end;



clap_table_Log_tbl = packed record

use_flag : byte;

bts_id : byte;

msc_id : byte;

test_id : byte;

imsi_s2p : word;

imsi_sip : longword;

log_opt : longword;

duration : byte;

end;

clap_body_T_table_Information = packed record

bsc_id : byte;

logtab : array[0..max_slot-1] of clap_table_Log_tbl;

end;

clap_T_table_Information = packed record //Data ID : 0x42

header : clap_Header;

body : clap_body_T_table_Information;

tail : byte;

end;



implementation



end.





3  COMMENTS
  • Profile
    쩌비 2001.10.27 19:50
    밑의 스트럭쳐 컴파일 에러의 원인...





    Unit Unit2;

    interface



    const

    Max_User = 8;

    Max_Slot = 8;

    ///////////////////////////////////////////////////////////

    // 제어 Message Assign

    ///////////////////////////////////////////////////////////





    Type

    Clap_Header = packed record

    todtime : longword;

    tick : longword;

    msc_id : byte;

    test_id : byte;

    Src_id : int64;

    end;



    clap_table_Log_tbl = packed record

    use_flag : byte;

    bts_id : byte;

    msc_id : byte;

    test_id : byte;

    imsi_s2p : word;

    imsi_sip : longword;

    log_opt : longword;

    duration : byte;

    end;

    clap_body_T_table_Information = packed record

    bsc_id : byte;

    logtab : array[0..max_slot-1] of clap_table_Log_tbl;

    end;

    clap_T_table_Information = packed record //Data ID : 0x42

    header : clap_Header;

    body : clap_body_T_table_Information;

    tail : byte;

    end;



    implementation



    end.

  • Profile
    쩌비 2001.10.27 20:30
    밑에것 컴파일하면 에러나고

    위에것 컴파일하면 에러 없어요.

    틀린점 찾아보세요.

    엄청 황당하네..



    (1)=============================================================

    unit Unit2;

    interface



    const

    Max_User = 8;

    Max_Slot = 8;

    ///////////////////////////////////////////////////////////

    // 제어 Message Assign

    ///////////////////////////////////////////////////////////





    Type

    Clap_Header = packed record

    todtime : longword;

    tick : longword;

    msc_id : byte;

    test_id : byte;

    Src_id : int64;

    end;



    clap_table_Log_tbl = packed record

    use_flag : byte;

    bts_id : byte;

    msc_id : byte;

    test_id : byte;

    imsi_s2p : word;

    imsi_sip : longword;

    log_opt : longword;

    duration : byte;

    end;

    clap_body_T_table_Information = packed record

    bsc_id : byte;

    logtab : array[0..max_slot-1] of clap_table_Log_tbl;

    end;

    clap_T_table_Information = packed record

    header : clap_Header;

    body : clap_body_T_table_Information;

    tail : byte;

    end;

    implementation



    end.



    (2)==================================================

    > Unit Unit2;

    > interface

    >

    > const

    > Max_User = 8;

    > Max_Slot = 8;

    > ///////////////////////////////////////////////////////////

    > // 제어 Message Assign

    > ///////////////////////////////////////////////////////////

    >

    >

    > Type

    > Clap_Header = packed record

    > todtime : longword;

    > tick : longword;

    > msc_id : byte;

    > test_id : byte;

    > Src_id : int64;

    > end;

    >

    > clap_table_Log_tbl = packed record

    > use_flag : byte;

    > bts_id : byte;

    > msc_id : byte;

    > test_id : byte;

    > imsi_s2p : word;

    > imsi_sip : longword;

    > log_opt : longword;

    > duration : byte;

    > end;

    > clap_body_T_table_Information = packed record

    > bsc_id : byte;

    > logtab : array[0..max_slot-1] of clap_table_Log_tbl;

    > end;

    > clap_T_table_Information = packed record //Data ID : 0x42

    > header : clap_Header;

    > body : clap_body_T_table_Information;

    > tail : byte;

    > end;

    >

    > implementation

    >

    > end.

  • Profile
    쩌비 2001.10.27 20:39
    쩌비 wrote:

    > 밑에것 컴파일하면 에러나고

    > 위에것 컴파일하면 에러 없어요.

    > 틀린점 찾아보세요.

    > 엄청 황당하네..

    >

    > (1)=============================================================

    > unit Unit2;

    > interface

    >

    > const

    > Max_User = 8;

    > Max_Slot = 8;

    > ///////////////////////////////////////////////////////////

    > // 제어 Message Assign

    > ///////////////////////////////////////////////////////////

    >

    >

    > Type

    > Clap_Header = packed record

    > todtime : longword;

    > tick : longword;

    > msc_id : byte;

    > test_id : byte;

    > Src_id : int64;

    > end;

    >

    > clap_table_Log_tbl = packed record

    > use_flag : byte;

    > bts_id : byte;

    > msc_id : byte;

    > test_id : byte;

    > imsi_s2p : word;

    > imsi_sip : longword;

    > log_opt : longword;

    > duration : byte;

    > end;

    > clap_body_T_table_Information = packed record

    > bsc_id : byte;

    > logtab : array[0..max_slot-1] of clap_table_Log_tbl;

    > end;

    > clap_T_table_Information = packed record

    > header : clap_Header;

    > body : clap_body_T_table_Information;

    > tail : byte;

    > end;

    > implementation

    >

    > end.

    >

    > (2)==================================================

    > > Unit Unit2;

    > > interface

    > >

    > > const

    > > Max_User = 8;

    > > Max_Slot = 8;

    > > ///////////////////////////////////////////////////////////

    > > // 제어 Message Assign

    > > ///////////////////////////////////////////////////////////

    > >

    > >

    > > Type

    > > Clap_Header = packed record

    > > todtime : longword;

    > > tick : longword;

    > > msc_id : byte;

    > > test_id : byte;

    > > Src_id : int64;

    > > end;

    > >

    > > clap_table_Log_tbl = packed record

    > > use_flag : byte;

    > > bts_id : byte;

    > > msc_id : byte;

    > > test_id : byte;

    > > imsi_s2p : word;

    > > imsi_sip : longword;

    > > log_opt : longword;

    > > duration : byte;

    > > end;

    > > clap_body_T_table_Information = packed record

    > > bsc_id : byte;

    > > logtab : array[0..max_slot-1] of clap_table_Log_tbl;

    > > end;

    > > clap_T_table_Information = packed record //Data ID : 0x42

    > > header : clap_Header;

    > > body : clap_body_T_table_Information;

    > > tail : byte;

    > > end;

    > >

    > > implementation

    > >

    > > end.