소켓을 이용한 간단한 프로그램밍을 마쳤는데요..

소켓이 놓인 폼에서 이것저것 계산하고 그랬더니 클래스로 나눠서 하라고 하시네요~

제가 C언어를 자주 접해와서 클래스로 나누는게 잘안돼네요...

지금 제가 만든 프로그램에서 서버가 생성시에 파일을 읽어서 콜렉션에 담고...

그걸 다시 리스트에 담아놓고 비교하고 하는등의 일을 하거든요..한 유닛 안에서..

그걸 클래스로 나누려면 다른 유닛을 만들어서 클래스로 나누나요??

자세히 갈켜주세용..^^ 밑에 제가 Read부분에 있는 인증부분^^;; 인데 저거를 클래스로 만들려면 어떻게 해

야 하나요?? 너무 막연해서 올렸습니다...꼭 갈켜주십시요...

생략...

//=================================================================
  AssignFile(F1, 'user.txt');    //사용자 인증하는 부분( 그냥 파일에서 읽어서 비교하는것 뿐임..^^)
  Reset(F1);
  suc := 0;
  if iSerial = 100 then
  begin
    while not EOF(F1) do
    begin
      ReadLn(F1, stLine);
      if stLine = stLogin then
      begin
        suc := 1;
        break;
      end
      else
      begin
        suc := 0;
      end;
    end;  //while

    aUser := TUserSession.Create;
    if suc = 1 then
      aUser.Success := 1  //클라이언트에 False 보내줌
    else
      aUser.Success := 0;
    ip := 0;
    ConvertLong(FSendBuf, ip, aUser.Success);
    ServerSocket1.Socket.Connections[0].SendBuf(FSendBuf, Length(FSendBuf));
  end;
  CloseFile(F1);

//==============================================

생략..