Type
  TReadWriteSystemCard = Class           
  Private
    Procedure TShowErrorInfo(i_Error: Integer);
    Procedure TGetErrorInfo(i_Error: Integer; Var str_Error: String);
    Function GetCommID(str_Comm: String): Integer;
  Public
    Constructor Create();
    Function TGetCardName(Var str_Name: String): Boolean;
    Function TJudgeCardType():Boolean;
    Function TMadeSystemCard(ApplyArea: PApplyArea): Boolean;
    Function TReadSystemCard(ApplyArea: PApplyArea; ReturnArea: PReturnArea): Boolean;
    Function TRecyclingSystemCard(): Boolean;
    Function TRecyclingNotSystemCard(str_Pin: String): Boolean;
  End;


Var
  Rwsys: TReadWriteSystemCard;
  CommHandle: THandle;


 uses UApplicationFunctions,USetupSystemParam,UFrmToolsCard01;

Constructor TReadWriteSystemCard.Create;
Begin
  CommHandle := 0;
End;


Initialization
  Rwsys := TReadWriteSystemCard.Create;
Finalization
  Rwsys.Free;
End.

谁能给我解释一下rwsys这个变量什么意思啊  尤其是Rwsys := TReadWriteSystemCard.Create;
和 Rwsys.Free;这两句是什么意思 啊