哪位高手能够帮忙翻译下这段delphi代码

谁能够帮忙翻译下这段delphi代码TClientHandleThreadclass(TThread)privateCommandStr:StringprocedureH

谁能够帮忙翻译下这段delphi代码
TClientHandleThread   =   class(TThread)
                                                  private
                                                      CommandStr:String;
                                                      procedure   HandleInput;
                                                  protected
                                                      procedure   Execute;   override;
                                                  Public
                                                      constructor   Create;
                                                      destructor   Destroy;   override;
                                                end;

TClientOnlineThread   =   class(TThread)
                                                  private
                                                      SysThread:TIdTCPClient;
                                                  protected
                                                      procedure   Execute;   override;
                                                  Public
                                                      constructor   Create;
                                                      destructor   Destroy;   override;
                                                end;



[解决办法]
class TClientHandleThread :public TThread
private:
String CommandStr;
void HandleInput();
protected:
void __fastcall Execute();
public:
__fastcall TClientHandleThread();
__fastcall ~TClientHandleThread();
};
class TClientOnlineThread: public TThread
{
private:
TIdTCPClient SysThread;
protected:
void __fastcall Execute();
public:
__fastcall TClientOnlineThread();
__fastcall ~TClientOnlineThread();
};
[解决办法]
写上__fastcall,是根据BCB里的函数调用方式约定的。。
当然
不要也没问题