• Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 194
  • Last Modified:

Server Conversations

Hi...

have been a time, Hi All ...


well, this time i have a kind of a server
running on port XXX

i want to make a program that will check
if the server is running on 127.0.0.1
on port XXX, if so, make EDIT1 enabled
as for me to send commands to this server.

Well, i am missing one thing in all this thing,
i think it is the hardest thing at all, sending
the text commands to the server, that accept text
commands only, i mean, how can i send the server
a certain command i wrote in EDIT1, and see the
result in MEMO1 !!


Any Ideas ??
0
neostudio
Asked:
neostudio
  • 3
  • 2
1 Solution
 
edeyCommented:
This snippet assumes a form, with an edit, a memo, a button & two INDY controls (http://www.nevrona.com/indy) - a TIDUDPClient & TIDUDPServer:


procedure TForm1.Button1Click(Sender: TObject);
begin
     idUDPClient1.Send(edit1.text);
end;

procedure TForm1.IdUDPServer1UDPRead(Sender: TObject; AData: TStream;
  ABinding: TIdSocketHandle);
var
   str : string;
begin
     memo1.Lines.LoadFromStream(AData);
end;


The idUDPClient host should be 127.0.0.1 & the port numbers for both indy clients should math.  When you hit the buttone the contents of the memo are replaced with the contents of the edit.

GL
Mike
0
 
neostudioAuthor Commented:
Dear Mike..

let me be frank, i am trying to send commands
to a Half-Live server on my LAN, i have seen tools
that are able to do so, is correct password is provided .



Any Ideas...
0
 
edeyCommented:
With That, I'm afraid, I can't help you. perhaps if we knew what networking & authentication protocols the server uses, & if I had the time to sniff out some of the commands it might be posibel, but I don't.  Sorry.

GL
Mike
0
 
neostudioAuthor Commented:
;-)

What if i give you a complete working program that does it ?? it is also written in Delphi 5.0 but to communicate with Linux servers, it is not able to communicate with Win32 based servers !!

will that help ???
0
 
edeyCommented:
Perhaps.

GL
Mike
0

Featured Post

Concerto's Cloud Advisory Services

Want to avoid the missteps to gaining all the benefits of the cloud? Learn more about the different assessment options from our Cloud Advisory team.

  • 3
  • 2
Tackle projects and never again get stuck behind a technical roadblock.
Join Now