code:
1
2
3
4
| msg := 'MIME-Version: 1.0'+#13#10;
msg := msg+'Content-Type: text/x-msmsgscontrol'+#13#10;
msg := msg+'TypingUser: '+form1.username+#13#10;
msg := 'MSG '+inttostr(nr)+ ' U '+inttostr(length(msg))+#13#10+msg; |
en daarna stuurt hij de var msg naar de server.
en hij komt uiteindelijk aan bij client:
code:
1
2
3
4
| Server: MSG delphi@nfshome.com delphi@nfshome.com 87
MIME-Version: 1.0
Content-Type: text/x-msmsgscontrol
TypingUser: delphi@nfshome.com |
maar de client reageert er niet op (de echt msn5 client)
en normaal doet hij dat wel, gaat er iets fout ofzo?
[ Voor 6% gewijzigd door Martink op 08-12-2002 00:16 ]