Delphi HGG Formatowanie Tekstu

[Reptile ReX]

Jak zrobić, aby HGG wysyłało wiadomość pogrubioną/Krzywą/Podkreśloną.

I jak zrobić, aby przejść z tekstem do następnej linijki.

Na przykład:

Ala ma Kota
Kot Ma Alę[/b]

 

[nitr0]

#13#10 następna linia.
a co do formartowania to

hgg1.SendMessage(9321363,'abcdefgijklmnopr ' + #13#10 + 'nico',[0,'[b]',16,'<n><black>']);

sformatuje to w ten sposób że ciąg znaków na początku będzie pogrubiony, koniec wiersza, i niesformatowany łańcuch

procedure THGG.SendMessage(Recipient: Integer; MessageContent: string; MessageFormat: array of const);
Wysyła wiadomość (parametr MessageContent) pod żądany numer GG (Recipient). Wiadomość nie powinna być dłuższa niż 1989 znaków. Ostatni parametr pozwala na formatowanie wiadomości. Należy podać parzystą ilość elementów w postaci: [Pozycja, 'Formatowanie', Pozycja, 'Formatowanie', Pozycja, 'Formatowanie'] itd. Pozycja decyduje od którego znaku rozpoczyna się formatowanie - aż do końca wiadomości. Formatowanie składa się z dowolnej ilości tagów: - pogrubienie, - pochylenie, <u> - podkreślenie, <n> - brak formatowania. Możliwe są także kolory: <black>, <blue>, <red>, <green>, <purple>, <navy>, <gray>, <gold>, <lightblue>, <lemon>, <silver>, <orange>, <maroon>, <pistachio>, <lightpurple>, <lightpink>, <pink>, <aqua>.


Na przykład aby wysłać tekst: "Ala ma kota" pod numer 123456 należy:
SendMessage(123456, 'Ala ma kota', [4, '<red>', 6, '<n><black>']);

Jeżeli nie chcemy aby tekst był formatowany - jako trzeci parametr podajemy pustą tablicę [].