Field 1,2,3셋중 RoomID란 필드가 Text형이 아닌듯하네요...

아마도 숫자형인듯한데... StrToInt같은 함수를 이용해서 숫자로 바꾸심 될듯하군요...

아님 Field[x].Text대신에 Field[x].AsString을 써보시던가요...

덤프 님이 쓰신 글 :
: procedure TForm1.doMake(AThread: TIdPeerThread; Strings: TStringList);
: var
:   Client : TClientInfo;
:   List : TList;
:   Loop : Integer;
:   stTemp : String;
: begin
:   Table1.Next;
:   Table1.Edit;
:   Table1.Fields.Fields[1].Text := Strings.Strings[1];       ///////////////////////
:   Table1.Fields.Fields[2].Text := Strings.Strings[2];     ///////////////////////
:   Table1.Fields.Fields[3].Text := Strings.Strings[3];    ///////////////////////
:   Table1.Post;
:   stTemp:= StringReplace(Strings.Text, #13, ';', [rfReplaceAll]);
:
:   List:= IdTCPServer1.Threads.LockList;
:    Try
:     For Loop:= 0 to List.Count-1 do Begin
:       TIdPeerThread(List.Items[Loop]).Connection.WriteLn(stTemp);
:     End;
:   Finally
:     IdTCPServer1.Threads.UnlockList;
:   End;
:
: end;
:
:
:
: 첨부그림처럼 에러가 뜨는데 어디가 문제가 되는건지 잘 모르겠습니다...
:
:
: ///////////////////////// 부분이 문제인거 같은데... 서버에 있는 sql 디비의 데이터 타입을 Text로 했는데
:
: 아마 제 생각에 Text가 아닌 다른 형식으로 지정해야할거 같은데... 멀로 바꿔야할지 잘 모르겟습니다.
:
: 지적바랍니다.