在线待待：这几句JAVA的WINSOCK代码谁能帮我改为C++或delphi！ (20分)

s = new Socket(host, port);
s.setSoTimeout(0x927c0);
out = new DataOutputStream(s.getOutputStream());
DataOutputStream out = null;
out.writeInt(1);
out.writeByte("a");
out.flush();

in = new DataInputStream(s.getinputStream());
DataInputStream in = null;
a = in.readInt();
b = in.readInt();
c = in.readInt();
d = in.readInt();

怎么会没人知道呢？？？