Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2007.07.15;
Скачать: [xml.tar.bz2];

Вниз

работа с компонентами runtime   Найти похожие ветки 

 
IntruderLab ©   (2007-06-16 02:35) [0]

Для работы с формой создаю компонент Combo и заполняю его данными с таблицы, далее в коде программы нахожу данный комбик, но как программно мне вытащить какие данные сейчас выделены в Combo.Text


 
Германн ©   (2007-06-16 02:41) [1]


> IntruderLab ©   (16.06.07 02:35)
>
> Для работы с формой создаю компонент Combo и заполняю его
> данными с таблицы, далее в коде программы нахожу данный
> комбик, но как программно мне вытащить какие данные сейчас
> выделены в Combo.Text
>

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


 
{RASkov} ©   (2007-06-16 02:42) [2]

Что-то не совсем понятно....
Покажи хоть как создаешь его(Комбик) и как пытаешься вытащить....

А вообще прямо так и вытаскивай S:=Combo.Text; или так S:=Combo.Items[Combo.ItemIndex];


 
Плохиш ©   (2007-06-16 02:45) [3]


> но как программно мне вытащить какие данные сейчас выделены
> в Combo.Text

TComboBox(Точтонашёлвкоде).Text


 
IntruderLab ©   (2007-06-16 02:49) [4]

Реально 3 сутки в запаре :) спасибо надоумили, а неразбериха в мозЬге от недосыпа: TComboBox(Controls[i]).Text


 
{RASkov} ©   (2007-06-16 02:52) [5]

> [4] IntruderLab ©   (16.06.07 02:49)

if (Controls[i] is TComboBox) then TComboBox(Controls[i]).Text/(Controls[i] as TComboBox).Text....


 
IntruderLab ©   (2007-06-16 02:59) [6]

Спасибо всем! :)


 
Плохиш ©   (2007-06-16 03:03) [7]


> if (Controls[i] is TComboBox) then TComboBox(Controls[i]).Text

Это правильно

> (Controls[i] as TComboBox).Text

В 99,999% случаев будет исключение при первом же шаге цикла ;-)


 
Германн ©   (2007-06-16 03:04) [8]


> {RASkov} ©   (16.06.07 02:52) [5]

После такого

> if (Controls[i] is TComboBox) then TComboBox(Controls[i]).
> Text/(Controls[i] as TComboBox).Text....
>

Пора спать, имхо.
:)


 
{RASkov} ©   (2007-06-16 03:13) [9]

> Пора спать

Вот это верно :)
Всё ... ушел )


 
Плохиш ©   (2007-06-16 03:13) [10]


> Германн ©   (16.06.07 03:04) [8]

Это не операция деления, я надеюсь :-))


 
{RASkov} ©   (2007-06-16 03:15) [11]

> [10] Плохиш ©   (16.06.07 03:13)
> Это не операция деления, я надеюсь :-))

У меня это было как два варианта ;)
(Слешь надо было в другую сторону поставить) :о)


 
Германн ©   (2007-06-16 03:24) [12]

> {RASkov} ©   (16.06.07 03:15) [11]
>
> > [10] Плохиш ©   (16.06.07 03:13)
> > Это не операция деления, я надеюсь :-))
>
> У меня это было как два варианта ;)
> (Слешь надо было в другую сторону поставить) :о)
> <Цитата>
>
>  

Ну тогда всё понятно!
:-)
Спать, спать, спать...спать.
:)


 
Anatoly Podgoretsky ©   (2007-06-16 11:06) [13]

> {RASkov}  (16.06.2007 02:42:02)  [2]

> S:=Combo.Items[Combo.ItemIndex];

Вероятность получения исключения больше 0


 
{RASkov} ©   (2007-06-16 12:46) [14]

> [13] Anatoly Podgoretsky ©   (16.06.07 11:06)

На ровном месте споткнуться тоже не проблема :)

> [7] Плохиш ©   (16.06.07 03:03)

Кстати.... ошибки-то в моем примере нет.
Только нет смысла делать as после is..... )


 
Плохиш ©   (2007-06-18 16:57) [15]


> {RASkov} ©   (16.06.07 12:46) [14]
> > [7] Плохиш ©   (16.06.07 03:03)
>
> Кстати.... ошибки-то в моем примере нет.
> Только нет смысла делать as после is..... )

Смысла нет, это факт.
И код (Controls[i] as TComboBox).Text вызовет исключение при первом же контроле, не являющимся TComboBox-ом - это тоже факт. А теперь посчитай вероятность того, что контрол со случайным i будет TComboBox или наследник ;-)


 
{RASkov} ©   (2007-06-19 03:48) [16]

> [15] Плохиш ©   (18.06.07 16:57)
> И код (Controls[i] as TComboBox).Text вызовет исключение
> при первом же контроле, не являющимся TComboBox-ом - это
> тоже факт.

Как же он вызовет, если до этого дело не дойдет после проверки is
[5]
> if (Controls[i] is TComboBox) then TComboBox(Controls[i]).Text/(Controls[i] as TComboBox).Text....

нужно читать так:

if (Controls[i] is TComboBox) then TComboBox(Controls[i]).Text...
или
if (Controls[i] is TComboBox) then (Controls[i] as TComboBox).Text....
:) Зря я наверное понадеялся, что слешь, и текст после него, воспримут как второй вариант после then ;)


 
Плохиш ©   (2007-06-19 10:52) [17]


> if (Controls[i] is TComboBox) then (Controls[i] as TComboBox).Text....

Хм, ах вон оно что :-) ну тогда - "Масло масляное", какой смысл выполнять две проверки...



Страницы: 1 вся ветка

Форум: "Начинающим";
Текущий архив: 2007.07.15;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.49 MB
Время: 0.033 c
2-1182105782
Bullfrog
2007-06-17 22:43
2007.07.15
TWebBrowser


15-1181925222
Predfer
2007-06-15 20:33
2007.07.15
Bluetooch-окружение


2-1182437480
Delon
2007-06-21 18:51
2007.07.15
Добрый вечер уважаемые мастера! Прошу помочь разобраться.


1-1179221654
i2e
2007-05-15 13:34
2007.07.15
MainMenu, в котором строки выделяются рамкой


15-1182117601
Kostafey
2007-06-18 02:00
2007.07.15
С днем рождения ! 17 июня





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский