Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > [ "Начинающим" ]
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 29.05.2013, 10:12
Аватар для Amilman
Amilman Amilman вне форума
Новичок
 
Регистрация: 27.03.2011
Адрес: г.Кемерово
Сообщения: 98
Версия Delphi: XE
Репутация: 10
По умолчанию Memo и combobox

Всем доброго времени суток.
Есть такой вопрос.
Имеется Memo в который заносится информация типа:
100
*****-*****
balance=0

В Combobox прописаны Items со 100 до N количества цифр. При выборе одного из Items в Combobox в Label выводится определенная информация.

Мне нужно чтобы когда в memo выводится информация, то из него брались бы данные с первой строки. в данном случае это число 100 и если такое же число есть в Combobox то оно в нем бы и выставлялось тем самым выводя информацию в Label. Как это можно реализовать?
Ответить с цитированием
  #2  
Старый 29.05.2013, 10:19
Аватар для Amilman
Amilman Amilman вне форума
Новичок
 
Регистрация: 27.03.2011
Адрес: г.Кемерово
Сообщения: 98
Версия Delphi: XE
Репутация: 10
По умолчанию

Или можно сделать проще. Если в первой строке Memo число 100
В Label бы выводилась бы забитая мной информация на данный момент есть 18 предложений по одному на каждое определенное число.
Ответить с цитированием
  #3  
Старый 29.05.2013, 10:36
Аватар для Страдалецъ
Страдалецъ Страдалецъ вне форума
Гуру
 
Регистрация: 09.03.2009
Адрес: На курорте, из окна вижу теплое Баренцево море. Бррр.
Сообщения: 4,721
Репутация: 52347
По умолчанию

Используйте поиск индекса в комбике:
Код:
 ComboBox1.ItemIndex := ComboBox1.Items.IndexOf('100')
__________________
Жизнь такова какова она есть и больше никакова.
Помогаю за спасибо.
Ответить с цитированием
  #4  
Старый 29.05.2013, 11:26
Аватар для Amilman
Amilman Amilman вне форума
Новичок
 
Регистрация: 27.03.2011
Адрес: г.Кемерово
Сообщения: 98
Версия Delphi: XE
Репутация: 10
По умолчанию

Страдалецъ , спасибо. Слегка подстроил под себя и все работает.
Ответить с цитированием
Ответ


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 06:03.


 

Сайт

Форум

FAQ

RSS лента

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2023

ВКонтакте   Facebook   Twitter