TCPServer change with SQL filereader

DatabseInit useless IF it works