[zloy]

Не могу придумать логическую операцию,чтобы она не соответствовыва этому виду

if Edit1.Text=('12345')
then ShowMessage('YES')
else ShowMessage('NO');

все время сводиться в if и then и подобным такие как whileи.т.д

[Aristarh Dark]

Что-то вопрос не очень понятен

[Holy]

Отвечаю, как понял:

Код:

1 2	function AnsiSameStr(const S1: string; const S2: string): Boolean; function AnsiSameText(const S1: string; const S2: string): Boolean;

[Navi1982]

Тоже не совсем понял вопрос... но есть еще такой оператор как:

Код:

1 2 3 4 5 6 7 8 9 10 11

... Var ch:char; ... Case ch of 'a' : Edit1.Text:='alex'; 'g' : Edit1.Text:='gosha'; 'z' : Edit1.Text:='zoom'; else Edit1.Text:='nobody'; end; ...

Но, предупреждаю - работает тока с численными переменными до 4 байт или 1-байтовым типом сhar ! С массивами (включая String) не фурыжет. Хотя в Делфи 6 еще не пробывал. Помница по паскалю.