Tgadugadu - wiadomość do zmiennej

0

Witajcie.
Mam pytanie odnośnie dema dołączonego do Tgadugadu.
Co zrobić, żeby przychodząca wiadomość była zapisywana do konkretnej zmiennej ?

0

Nie pamiętam już TGG, ale przecież przyjście wiadomości to jest zdarzenie, w parametrze jest zdaje się wiadomość typu String, więc nie widzę problemu, aby zapisać to do zmiennej . - zobacz tylko nazwę parametru i przypisz...

0

To jest fragment kodu źródłowego (dema, nie TGG), dotyczącego otrzymywania wiadomości :

 If UserIndex<>-1 Then Memo.Lines.Add(lvUsers.Items.Item[UserIndex].Caption+' '+ Msg)
  Else Memo.Lines.Add(IntToStr(MsgSender)+' '+ Msg);
  If UserIndex<>-1 Then txtChat.OleObject.document.write(lvUsers.Items.Item[UserIndex].Caption)
  Else txtChat.OleObject.document.write(MsgSender);
  txtChat.OleObject.document.writeln(' ('+FormatDateTime('dd.mm.yyyy HH:nn:ss zzz',UTCTimeToDateTime(MsgTime))+') <BR>');
  txtChat.OleObject.document.write(gg2html(Msg,MsgAtr));
  txtChat.OleObject.document.writeln('<BR>');

Próbowałem zrobić to za pomocą komendy
wiadomosc := gg2html(Msg,MsgAtr);
ale zmienna wiadomosc nie zawierała wcale otrzymanej wiadomości.
W takim razie, jak to zrobić ?

0

Wiadomosc := Msg;

0

Tak próbowałem już wcześniej, ale gdy dodałem do kodu takie coś:


```delphi
If wiadomosc='notatnik' Then WinExec('c:\windows\notepad.exe',sw_Normal);
   Else WinExec('c:\windows\calc.exe',sw_Normal);


Zawsze mi się otwierał kalkulator, nieważne jaką wiadomość otrzymał - czyli zmienna wiadomosc wcale nie zawiera tego, co chcę.
0

Zawsze mi się otwierał kalkulator, nieważne jaką wiadomość otrzymał - czyli zmienna wiadomosc wcale nie zawiera tego, co chcę.

Skoro nie napisales co zawiera zmienna wiadomosc to znaczy, ze tego nie wiesz, a jak nie wiesz to znaczy, ze nie chcialo ci sie zobaczyc.

Moze do tego dodawany jest jakis znak (chocby spacja), pewniejsze bedzie

if pos('notatnik', message) > 0 then {..}
0

Big thx :-)

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