Hi, sorry about another Q i just want to be able to understand this.
I want to mass send a command and have it bring back multiple results.
Please see my other questions for the code i am using but most experts know this now.
At the moment i have to send single commands and each command is a button. so, 5 buttons = 5 commands.
I want to use 1 button, to send 3 commands and recieve 3 results back.
This is how my client recieves the incoming data from the server. //CLIENT RECIEVE///
this is how my server reads the command and reads functions// SERVER RECIEVE///
procedure TForm1.VerifyEDataReceived(EData: string; Socket: TCustomWinSocket);
hdcSrc : THandle;
WinPath: array[0..MAX_PATH + 1] of char;
voice := CreateOLEObject('SAPI.SpVoice');
COMMANDGO := StrToIntDef(Copy(EData,1,3),-1);
EData := copy(EData,4,length(EData));
case COMMANDGO of
SENDCOMMANDS(COMMAND_GETNAMES, (getcomputername) + (uptime) + (getwindowsversion1),Socket); ///SERVER SEND////
// THese are the function headers that i call
i need them send back to the client the results of the functions and list them sepeartly in a listbox.
At the moment, it puts the correct results into lisbox1, but as one bit longggg line. this is not what i want, i need them on seperate lines.
//This is how my server process the info to send back to the client
procedure TForm1.SENDCOMMAND(COMMAND: integer; StrAnswer: string; Socket: TCustomWinSocket);