在类中定义线程:
type
  TMyw_r = class(TThread)
   private
      send_buf:array [0..511] of byte;
      m_buf : array [0..511] of byte;
       hExit:boolean;
      ss:string;
  protected
      procedure Execute;
      procedure send_data(ss_str:string);
  end;
编译时提示
Udeclared indentifier:'TThread'

解决方案 »

  1.   

    要在开头的uses处多引用一个Classes,因为TThread是在Classes中定义的。
      

  2.   


    uses
       Classes,Windows, ExtCtrls, Pcomm, MxTool, CRC;
    出现了很多警告:
    [Warning] comport.pas(19): Method 'Execute' hides virtual method of base type 'TThread'
    [Warning] Unit 'CRC' implicitly imported into package 'dclusr'
    [Warning] Unit 'MxTool' implicitly imported into package 'dclusr'
    [Warning] Unit 'PComm' implicitly imported into package 'dclusr'
    是怎么会事?
      

  3.   

    procedure Execute;改为:
    procedure Execute;override;   //覆盖祖先类的方法;
    至于其它的估计是你引用了第三方控件的问题。没有多大关系就是了!
      

  4.   

    编译时出现:[Warning] Unit 'CRC' implicitly imported into package 'dclusr'
    [Warning] Unit 'MxTool' implicitly imported into package 'dclusr'
    [Warning] Unit 'PComm' implicitly imported into package 'dclusr'
    我是用Commponent下的Install装载,并编译的;
    调用时出现:
    [Pascal Error] Unit1.pas(1): Unable to invoke Code Completion due to errors in source code
    不能调用。
      

  5.   

    把生成的.dcu文件拷到import文件夹下
      

  6.   

    但是没有生成DCU文件呀,调用时出现找不到DCU文件的警告