[Delphi] funkcja "Pos" - czy jest coś więcej ?

0

Witam jestem tu po raz pierwszy - bądźcie wyrozumiali.

Próbuje napisać grę "wisielec".
Program losuje jakiś wyraz, liczę znaki w tym wyrazie,
i teraz klikająć np. klawisz "A" program powinien sprawdzić
czy w danym wyrazie znajduje się litera "A" - i tu mam problem.
Korzystam z funkcji Pos i jeżeli litera "A" występuje raz to OK, ale
jeżeli występuje kilka razy to ......... no właśnie jak to zrobić.
Pozdrawiam.

0

W Delphi 7 nowoscia jest pojawienie sie funkcji PosEx(). Szukaj opisu w encyklopedii.

0

Pochwalony!
Hmmm... kilka razy miałem ten sam problem co ty, więc postaram się w miarę możliwości pomóc. Jeżeli sprawdzanie liter robisz w tej samej procedurze/funkcji to możesz spróbować odejmować jakieś literki. Chodzi mi o to, iż masz np. jakąś procedurkę, w zmiennej masz jakiś tekst, a szukasz literki, to jeżeli jakąś znajdziesz w tekście to usuń kawałek tekstu do tego miejsca :P.
zmienna m wartość = 'jakiś tekst'
Po pierwszym sprawdzaniu zmienna wynik przyjmuje numer literki, np 2
Następnie usuń tekst do tej literki, włącznie, czyli zmienna m wartość = 'kiś tekst';
Ponów tą czynność tyle razy ile jest liter, bądź do czasu kiedy Pos('hjakiś tekst', m) > 0
Żadnej procedurki przykładowej niestety nie podam, ponieważ nie wiem, o jaką by Ci chodziło, jaki wynik zwracającą :).

0

For i:=0 to length(Edit1.text) do
if Edit1.Text[i] then jest na pozycji i

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