Nick w komunikatorze

0

Witam
chciałbym dodać do komunikatora nick osoby. Myslałem o polu edit i lpobieraniu wartosci tego pola, Jak to najprosciej zrobic
Dodam ze jestem kompletnie zielony w tej materii wiec sorki
Program pisze wykorzystujac sockety

0

Dodaj komponent TEdit do formy. Przy starcie programu wyczyść komponent poleceniem:
Edit1.clear;
dalej w kodzie programu możesz podstawić wartość z pola TEdit wykorzystując składnie:
Edit1.Text

np.: podstawiając do zmiennej nick:
var
nick : string;
begin
nick := Edit1.Text;
end;
:)

0

dzieki
a poźniej zeby w richedit pokazywal nick od konkretnej osoby to mam dodac to zdarzenie w ktorym miejscu? tak zeby po Enterze wysylal tekst z pola Edit gdzie wpisuje wiadomosc plus nick mojej osoby.
oto czesc o ktora mi chodzi:

procedure TMainForm.EditKeyPress(Sender: TObject; var Key: Char);
begin
  if Key = #13 then
    begin
      Klient.Socket.SendText(Edit.Text);
      RichEdit.SelAttributes.Color := clRed;
      RichEdit.SelAttributes.Style := [fsBold];
      RichEdit.SelText :=  'Ja ';
      RichEdit.SelAttributes.Style := [];
      RichEdit.SelAttributes.Color := clGreen;
      RichEdit.SelText := '(' + TimeToStr(Now) + ')';
      RichEdit.SelAttributes.Color := clBlack;
      RichEdit.Lines.Add('');
      RichEdit.Lines.Add(Edit.Text);
      RichEdit.SelStart := Length( RichEdit.Text);
      RichEdit.Perform(EM_SCROLLCARET, 0,0);
      Edit.Text := '';
0

rk7771
cos mi to nie działa :( pisze ze ni moge uzyc stringa i TEdit

poradziłem sobie w ten sposob ze wyswietla mi wybrany nick w oknie rozmowy ale tylko jak ja cos pisze, natomiast jak zrobic zeby pobieral od nick klienta tzn. ten który wpisal u siebie w polu edit?
dzieki za wszelka pomoc i sorki za spam

0

musisz przeslac tego nicka, chyba ze masz je zapisane w jakiejs tablicy u kazdego klienta to pobierasz dana pozycje

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