pomoc przy Tgglite

0

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

0

Jakieś pytanie? Problem? Może też jaśniej i bardziej po polsku (czego automatycznej? sekretarki? )

1 użytkowników online, w tym zalogowanych: 0, gości: 1