and why is that?Originally Posted by WILL
wait forgot what my point was.. :?Code:Self.ActiveLanguage:= Delphi; If Sender is TPerson then If TPerson(Sender).ActiveLanguage <> Self.ActiveLanguage then If TPerson(Sender).ActiveLanguage in Self. LanguageSet then Self.ActiveLanguage:= TPerson(Sender).ActiveLanguage Else Rise Exception('unknown protocol'); With Sender as TPerson do Begin While ActiveChat do Self.Earbuffer.Add(DataPending); Self.Invalidate; .... End; End;
Bookmarks