Problem

0

Jak zrobić żeby prog jeśli znajdzie znaczek " : ) " w tekście wykonał jakąś procedurkę i kasował go i dalej szukał nastepnych...

Jak nie zrozumiałe to chce zoribć żeby to znajdowało tekst i zastępowało na emotki.

0

Na mój gust jest to łatwe. Przyjmuję że: findtext to string który usuwamy
a s to łańcuch z którego usuwamy:

Pozycja:=Pos(findtext, s);
while Pozycja &gt 0 do begin

Del(s, Pozycja, Length(findtext));

  • czy też
    s:=Del(s, Pozycja, Length(findtext));
  • nie pamiętam składni, sprawdź w helpie!

    Pozycja:=Pos(findtext, s)
    end

0

spox ale w moim przypadku sie to nie za bardzo sprawdza - jak mam więcej emotek (a możeźle dalej robię) :(

KTO MA ROZWIĄZANY PROBLEM Z EMOTKAMI???

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