Проблема с комбобоксами - Общие вопросы Delphi

anghela · 04.09.2013, 20:56

Нужно выполнить условие: если в комбобоксе1 выбрано "автокредит" и в комбобоксе2 выбрано "3", то едит1 присвоить значение "13,5"

Пишу такой код:
begin
if (CB_vid_kred.Items[CB_vid_kred.ItemIndex]='автокредит')
and (CB_srok_kr.Items[CB_srok_kr.ItemIndex]='3')
then
Edit1.Text:='13,5';
end;

Ошибку не выдает, но и результат не выводит, по ходу просто игнорирует условия, либо они не выполняются. Помогите, пожалуйста

grominfo · 04.09.2013, 21:09

Попробуй так:

Код:

begin
 if (CB_vid_kred.text='автокредит') and (CB_srok_kr.text='3') then
 Edit1.Text:='13,5';
end;

Имей ввиду, что сравнение идёт с учётом регистра. Также убедись, что в значениях нет пробелов

Человек_Борща · 04.09.2013, 21:09

Помнится, точно такую же тему, вы, уже создавали. Зачем вторая? За дублирование тут быстро карают.
Ставьте бряк на начале функции и под отладчиком смотрите как работает код и через что проходит.

grominfo · 04.09.2013, 21:14

Цитата:

Помнится, точно такую же тему, вы, уже создавали. Зачем вторая? За дублирование тут быстро карают.
Ставьте бряк на начале функции и под отладчиком смотрите как работает код и через что проходит.

Человек_Борща, позвольте офтоп. А почему тут не карают за оскорбление и хамское поведение участников?

anghela · 04.09.2013, 21:40

так не работает(((

grominfo · 04.09.2013, 21:44

Цитата:

Сообщение от anghela

так не работает(((

Такого просто не может быть.

anghela · 04.09.2013, 21:51

file:///C:/Documents%20and%20Settings/Admin/%D0%9C%D0%BE%D0%B8%20%D0%B4%D0%BE%D 0%BA%D1%83%D0%BC%D0%B5%D0%BD%D1%82% D1%8B/%D0%9C%D0%BE%D0%B8%20%D1%80%D0%B8%D 1%81%D1%83%D0%BD%D0%BA%D0%B8/%D0%91%D0%B5%D0%B7%D1%8B%D0%BC%D1%8 F%D0%BD%D0%BD%D1%8B%D0%B9.JPG

grominfo · 04.09.2013, 21:54

Отличная ссылка. А ты знаешь куда она ведёт?

anghela · 04.09.2013, 21:58

http://vk.com/foto_votkinsk?z=photo-...38341_00%2Frev
Вот такое сделано и не выводит он 13,5

grominfo · 04.09.2013, 22:00

Ты весь исходник покажи, чё ты всё частями да картинками...

04.09.2013, 20:56	#1
anghela Пользователь Регистрация: 21.05.2013 Сообщений: 42	Проблема с комбобоксами Нужно выполнить условие: если в комбобоксе1 выбрано "автокредит" и в комбобоксе2 выбрано "3", то едит1 присвоить значение "13,5" Пишу такой код: begin if (CB_vid_kred.Items[CB_vid_kred.ItemIndex]='автокредит') and (CB_srok_kr.Items[CB_srok_kr.ItemIndex]='3') then Edit1.Text:='13,5'; end; Ошибку не выдает, но и результат не выводит, по ходу просто игнорирует условия, либо они не выполняются. Помогите, пожалуйста

04.09.2013, 21:09	#2
grominfo Форумчанин Регистрация: 30.05.2011 Сообщений: 651	Попробуй так: Код: `begin if (CB_vid_kred.text='автокредит') and (CB_srok_kr.text='3') then Edit1.Text:='13,5'; end;` Имей ввиду, что сравнение идёт с учётом регистра. Также убедись, что в значениях нет пробелов Создание, программирование и сопровождение сайтов любой сложности. Изготовление программ на заказ. Список услуг и портфолио на сайте www.andreygrom.ru

04.09.2013, 21:54	#8
grominfo Форумчанин Регистрация: 30.05.2011 Сообщений: 651	Отличная ссылка. А ты знаешь куда она ведёт? Создание, программирование и сопровождение сайтов любой сложности. Изготовление программ на заказ. Список услуг и портфолио на сайте www.andreygrom.ru

04.09.2013, 22:00	#10
grominfo Форумчанин Регистрация: 30.05.2011 Сообщений: 651	Ты весь исходник покажи, чё ты всё частями да картинками... Создание, программирование и сопровождение сайтов любой сложности. Изготовление программ на заказ. Список услуг и портфолио на сайте www.andreygrom.ru

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Неблокирующий сокет Си проблема с закрытием, проблема с закрытием сокетов в цикле	mnx_vol	C/C++ Сетевое программирование	0	06.11.2012 13:57
Заполнить ячейки таблицы комбобоксами	Zodiac	Microsoft Office Word	4	03.02.2011 01:48
Проблема с рамами/Проблема с ЖД	DRAGGER	Компьютерное железо	6	04.01.2009 23:37
Как сделать с двумя комбобоксами вывод на мемо	NeG	Общие вопросы Delphi	5	20.12.2007 04:19

04.09.2013, 21:09	#3
Человек_Борща Старожил Регистрация: 30.12.2009 Сообщений: 11,434	Помнится, точно такую же тему, вы, уже создавали. Зачем вторая? За дублирование тут быстро карают. Ставьте бряк на начале функции и под отладчиком смотрите как работает код и через что проходит.

04.09.2013, 21:40	#5
anghela Пользователь Регистрация: 21.05.2013 Сообщений: 42	так не работает(((

04.09.2013, 21:51	#7
anghela Пользователь Регистрация: 21.05.2013 Сообщений: 42	file:///C:/Documents%20and%20Settings/Admin/%D0%9C%D0%BE%D0%B8%20%D0%B4%D0%BE%D 0%BA%D1%83%D0%BC%D0%B5%D0%BD%D1%82% D1%8B/%D0%9C%D0%BE%D0%B8%20%D1%80%D0%B8%D 1%81%D1%83%D0%BD%D0%BA%D0%B8/%D0%91%D0%B5%D0%B7%D1%8B%D0%BC%D1%8 F%D0%BD%D0%BD%D1%8B%D0%B9.JPG

04.09.2013, 21:58	#9
anghela Пользователь Регистрация: 21.05.2013 Сообщений: 42	http://vk.com/foto_votkinsk?z=photo-...38341_00%2Frev Вот такое сделано и не выводит он 13,5