в целом странно, что чел не решил эту задачу сам, введя соответствующий запрос в поисковик и прогуглив соответствующие операторы и конструкции (информация несекретная
)
|
Сообщение от deep4565
|
на delphi я писал код примерно такой (посимвольная проверка введенных чисел):
s:string;
if (s[1]=s[2]) and (s[2]=s[3]);
then showmessage ('ошибка ввода');
else showmessage ('нет ошибки');
|
хотя возможно не странно, так как в целом не понятно, что делает этот код, приведи полный пример
предположим, есть строка '12345', то что ты проверяешь? что '1' == '2' и '2' == '3'?
а если проверка чисел, то зачем делать сравнение посимвольно, а не использовать, скажем,
StrToInt?
хотя, в целом, ты сделал одну правильную вещь - предпринял уход с delphi
