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
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 > 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???