Mam tu taki kod do automatycznej(ktos napisze 'witam' ja odpowiem 'czesc' odpowiedzi w tgglite. Mam nadzieje ze wiecie o co chodzi a to kod:
procedure TForm1.ggRecvMsg(Sender: TObject; MsgBody: String;
MsgFormat: array of Variant; MsgFrom: Integer);
begin
Memo2.Lines.Add(IntToStr(msgfrom) + ' : ' + msgbody);
if MsgBody = 'witam' then
begin MsgFormat2 := VarArrayCreate([0,1], varVariant);
MsgFormat2[0]:=0;
MsgFormat2[1]:='<n>';
gg.GGSendMessage(true,StrToInt(Edit3.Text),'czesc',MsgFormat2);
odpowiedzi przychodza mi na memo2