Warunek "Jeśli istnieje znak"

0

jak to zrobić ??
Mam np. pole edit i chcę żeby po wpisaniu do niego jakiegoś ciągu zawierającego odpowiednie słowa (np. wymagane słowo klucz, a wpisany ciąg to klucz dwa i jest ok)
został wykonany cały warunek.

aha i te słowa mają być na POCZĄTKU ciągu :)

proszę o prostą odpowiedź bo ne jestem zbyt zaawansowanym programistą ;)

0

pos() + F1

0
if Pos('nyhaha', Edit1.Text)<>0 then Showmessage('Wykonaj instrukcje');
0

Witam czy ja moge sie <ort>doloczyc </ort>z pytaniem, czy tez moglbym wykorzystac te funkcje warunku w taki sposob : if POS('1', SpeedButton1.caption)<>0 then procedure TForm1.Edit13Change(Sender: TObject);
begin
Edit26.Text:=1;
edit13.enabled:=false;
edit26.enabled:=false;
end;
chodzi mi o sprawdzanie warunku dla gry we kosci o ktorej juz tu pisalem Z góry tenx :):)

0

hehe, tak napisac nie mozesz ;)

if POS('1', SpeedButton1.caption)>0 // mniejszy od zera byc nie moze ;)
Edit13Change(nil) // badz jesli uzywasz Sendera w procedurze to mozesz go tam podac
ewentualnie jesli wykonujesz to z procedury z innej klasy, badz nie klasowej ( czy jak to sie nazywa :P ) to Form1.Edit13Change(nil)

0

Witam To w takim razie mam pytanie jakiego warunku muszę użyć, aby sprawdzić jaki numerek (1..6) został wylosowanny na kościi od tego co jest wylosowane uzależnić pola wpisu wyników. Z góry tenx :):):)

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