Как сделать проверку строк в memo - Общие вопросы Delphi

Neset · 26.02.2009, 11:58

И еще есть вопрос, =) Мне в memo1 нужно найти данные которые записаны в edit1. и если данные есть в memo1 выдать showmessage вы успешно зарегистрированы, а если нет то showmessage вы ввели неверные данные.
Вот. Пытался сделать так if (memo1.Lines.IndexOf('поддерживает автоматической')>0) then showmessage ('Вы успешно залогинились') else showmessage('Имя или пароль введены не верно'); Но че то не может определить правильно =(..

VVM · 26.02.2009, 12:15

Попробуйте использовать функцию Pos:

Код:

  if pos(Edit1.text, Memo1.text) <> 0 then
    //успешно залогинились

Neset · 26.02.2009, 12:25

VVM

Спасибо огроменное, все работает =)

26.02.2009, 11:58	#1
Neset Пользователь Регистрация: 26.02.2009 Сообщений: 12	Как сделать проверку строк в memo И еще есть вопрос, =) Мне в memo1 нужно найти данные которые записаны в edit1. и если данные есть в memo1 выдать showmessage вы успешно зарегистрированы, а если нет то showmessage вы ввели неверные данные. Вот. Пытался сделать так if (memo1.Lines.IndexOf('поддерживает автоматической')>0) then showmessage ('Вы успешно залогинились') else showmessage('Имя или пароль введены не верно'); Но че то не может определить правильно =(..

26.02.2009, 12:15	#2
VVM Форумчанин Регистрация: 06.06.2007 Сообщений: 282	Попробуйте использовать функцию Pos: Код: `if pos(Edit1.text, Memo1.text) <> 0 then //успешно залогинились` Не важно, как часто вы падаете. Важно, как часто вы поднимаетесь. Винс Ломбарди.

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Как сделать посточное считывание с Memo	Sanek777	Общие вопросы Delphi	19	25.09.2008 23:43
Помогите проверку ввода сделать	Panda	Помощь студентам	3	01.07.2008 20:50
как сделать Memo прозрачным	1234	Общие вопросы Delphi	1	21.02.2008 16:38
В Memo сделать так, чтобы текст был разного цвета, разноцветный memo	Artem	Компоненты Delphi	3	07.09.2007 13:40
как сделать в memo строку не 256 символов, а 1024 например.	Alar	Компоненты Delphi	0	29.10.2006 18:46

26.02.2009, 12:25	#3
Neset Пользователь Регистрация: 26.02.2009 Сообщений: 12	VVM Спасибо огроменное, все работает =)