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

Вниз

Переместить название одного узла (подузла) TTreeView в Edit или ComboBox   Найти похожие ветки 

 
чайничек   (2002-01-27 09:50) [0]

Ну нет ума! Не могу разобраться, а надо: выйти на узел в TTreeView и скопировать его название в Edit (а лучше ComboBox).
Кто может помогите!


 
Набережных С.   (2002-01-27 15:25) [1]

Edit1.Text:=TreeView1.Selected.Text;
ComboBox1.Items.Add(TreeView1.Items[0].Text);


 
чайничек   (2002-01-27 16:12) [2]

Спасибо Вам большое. Буду пробовать. С уважением.


 
чайничек   (2002-01-27 16:40) [3]

Увы. . . Не получается. Может быть я что-то не дотумкиваю. Вы уж простите, но я совсем не программист (пока). Один к одному ввел вашу строку ComboBox1.Items.Add(TreeView1.Items[0].Text); - не реагирует никак. (Ну разве что у меня не ComboBox1 а ComboBoxEx1).



 
Набережных С.   (2002-01-27 18:34) [4]

К сожалению, мне неизвестен TComboBoxEx. Если он потомок TComboBox, то проверь:
1).Есть ли у TreeView item"ы.
2).Есть ли у Items[0] какой-нибудь текст.
3).Свойство Items у ComboBoxEx1 должно быть типа TStrings.

Попробуй вместо TComboBoxEx вставлять в TComboBox.


 
чайничек   (2002-01-27 19:22) [5]

В любом случае спасибо за оперативное участие. Все это есть. Что означает [0]? Почему не 15, например?


 
чайничек   (2002-01-27 19:35) [6]

С Edit сработало как огонь! Спасибо Вам большое! Если найдете время и поможете с ComboBox ( У меня "левый" Delphi6),то . . . В любом случае- я снимаю перед Вами шляпу и являясь специалистом в области юриспруденции, готов оказать помощь консультацией ( стем же участием, которое Вы проявили в отношении меня) по любому вопросу. Тусуюсь чаще на сайте Zakon.kuban.ru (естественно под другим Ником). Еще раз Вам огроиное спасибо.


 
Набережных С.   (2002-01-27 19:56) [7]

Ну, с благодарностью и шляпой вы явно переборщили, оно того не стоит. Что до предмета, то скиньте мне по почте свою прогу плюс исходник TComboBoxEx для более конкретного разговора.


 
чайничек   (2002-01-27 20:18) [8]

У меня еще проблемы с почтой так что скинуть к сожалению не смогу. Но я уже нашел ComboBox, поставил и разобрался он пишет именно то, что заключено в [...]. [0]он и пишет корневой, [15] -соответственно, но ... мне надо текущую. А благодарен я Вам вполне искренне; я 2 дня "мудохался". А все потому, наверное (ну кроме отстутствия ума), что книжки толковой нет по ObjectPaskal. Что порекомендуете?


 
Набережных С.   (2002-01-27 21:13) [9]

Мне трудно что-то посоветовать как пособие начального уровня - он меня интересовал еще при историческом материализме. В принципе, наверное, любая книга для начинающих в Delphi будет не хуже остальных.
По теме: Текущий, он же выбранный, он же выделенный, итем(объект TTreeNode) содержится в свойстве Selected. Свойство Items дает доступ к любому из итемов по его индексу. Если в данный момент
выделен элемент с индексом 5, то конструкции TreeView.Selected и TreeView.Items[5] абсолютно равнозначны. А 0 я использовал просто для примера. Так что можно написать и так:

Edit1.Text:=TreeView1.Items[0].Text;
ComboBox1.Items.Add(TreeView1.Selected.Text);

если конечно элемент с индексом 0 существует.
До кучи: написав
TreeView.Selected := TreeView.Items[5];
мы программно выделим элемент с индексом 5.
P.S. Все-же жаль, что у Вас проблемы с почтой, форум - не слишком подходящее место для такого обсуждения. Если Вы решите вопрос с почтой, то будет гораздо удобней.


 
чайничек   (2002-01-28 16:50) [10]

Вчера закочилось Internet время. Все прочитал. Работаю. Еще раз Спасибо.



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

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

Наверх





Память: 0.47 MB
Время: 0.004 c
1-32291
serjant
2002-01-28 11:11
2002.02.11
Сохранение QReport


1-32225
Zuvom
2002-01-24 15:07
2002.02.11
Запись в файл


14-32319
Stexen
2001-11-27 21:12
2002.02.11
Графика


1-32186
AlexanderV
2002-01-29 10:45
2002.02.11
Регистрация пользовательского шрифта на время выполнения программы


3-32168
Yu
2002-01-15 09:30
2002.02.11
Как проверить корректность вводимых данных?





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский