求人帮写一个delphi socket的程序。

服务器端能识别客户端是否为登陆用户，不是则拒绝登陆，并发送提示，能接受客户端发送的对于sql sever表的查询，修改，插入等命令，并把结果返回给客户端。客户端能根据用户名密码登陆，并发送请求查询，修改，插入sql sever表。