Chattext mit Textformatierung

[Knotti2005]

Wie kann ich einen Chat bauen der auch die Text Formatierung mit überträgt?

bisher mach ich es so

im memsend (richtext) steht der zu sendene Text...
in memrecv (richtext) steht der Empfangene Text..

Delphi-Quellcode:

-Senden-

procedure TForm1.SendenClick(Sender: TObject);
var
  I: Integer;
begin
  TcpClient1.RemoteHost := edtRemoteHost.Text;
  TcpClient1.RemotePort := edtRemotePort.Text;
    if TcpClient1.Connect then
    begin
      TcpClient1.Sendln(edtnickname.Text);
      for I := 0 to memSend.Lines.Count - 1 do
      TcpClient1.Sendln(memSend.Lines[I]);
  end;
    TcpClient1.Disconnect;
     for I := 0 to memSend.Lines.Count - 1 do
    memsend.Lines.Delete(I);
  end;


-Empfangen-


procedure TForm1.TcpServer1Accept(sender: TObject;
  ClientSocket: TCustomIpClient);
var
  s: string;
  nick: string;
  DataThread: TClientDataThread;
begin
  // create thread
  DataThread:= TClientDataThread.Create(true);
  // set the TagetList to the gui list that you
  // with to synch with.
  DataThread.TargetList := memRecv.lines;
  // Load the Threads ListBuffer
  nick := ClientSocket.Receiveln;
  s := ClientSocket.Receiveln;
  while s <> '' do
  begin
    DataThread.ListBuffer.Add( nick + '-' + TimeToStr(Time) +'@' + ClientSocket.RemoteHost + '');
    DataThread.ListBuffer.Add(s);
    s := ClientSocket.Receiveln;
  end;
  // Call Resume which will execute and synch the
  // ListBuffer with the TargetList
  DataThread.Resume;
  memrecv.Perform(EM_SCROLLCARET, 0, 0);
end;

[Luckie]

Denk dir ein Protokoll aus, welches die Formatierung mitschickt.

[Knotti2005]

Wie meinst du das?

[gengler2]

Zitat:

Zitat von Knotti2005

Wie meinst du das?

Ein Beispiel für ein solches Protokoll : Du sendest eine bestimmte Zeichenkette vor der Formatierung des Textes die in diesem Fall nicht auf memrecv hinstehen kommt. Vorstellen kannst du dir das so:

/FORMAT FONT,SIZE,COLOR,STYLE

d.h.: Jedesmal wenn ein String mit /FORMAT anfängt, muss der Empfänger wissen dass es sich um eine Textformatierung handelt, und in diesem Fall nur die Formatierung ändert.

[Khabarakh]

Warum schickst du nicht einfach den RTF-Code selbst mit? Ist zwar nicht sehr kompakt, aber wahrscheinlich etwas leichter :wink: .

[Knotti2005]

Wenn du mir erzähls wie ich das machen Kann gerne!!!

[Knotti2005]

Oder hat jemand anders ne Ahnung die Idee mit dem Übertragen der Formatierung ist garnicht so schlecht...