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

Вниз

Listbox & Edit   Найти похожие ветки 

 
Bobby Digital ©   (2004-11-21 04:46) [0]

Подскажите .. как можно сделать так, чтоб при клике на элемент Listbox эта строка (по которой кликнули) появлялась,  например, в Edit


 
KilkennyCat ©   (2004-11-21 05:51) [1]

посмотреть свойства листвокса, который определяет кликнутую строку (ее индеkc) и обратится к этому индексу в списке (items)


 
InfMag ©   (2004-11-21 08:00) [2]

procedure TForm1.ListBox1Click(Sender: TObject);
var i:integer;
begin
i := ListBox1.ItemIndex;
Edit1.Text := ListBox1.Items.Strings[i];
end;


 
Кириешки ©   (2004-11-21 08:03) [3]

Edit1.Text := ListBox1.Items.Strings[ListBox1.ItemIndex];

и никакие var не нужны


 
InfMag ©   (2004-11-21 08:05) [4]

Кириешки, мне кажется, что с дополнительной переменной будет проще, поскольку может быть либо несколько ListBox"ов, либо несколько Edit"ов.


 
KilkennyCat ©   (2004-11-21 15:28) [5]


> InfMag ©   (21.11.04 08:05) [4]


Это лишь кажется. В данном случае


 
KilkennyCat ©   (2004-11-21 15:28) [6]

этого не нужно.



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

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

Наверх





Память: 0.45 MB
Время: 0.031 c
1-1101017406
Новичек
2004-11-21 09:10
2004.12.05
Одно меню PopUp для двух объектов.


3-1099584760
Rick
2004-11-04 19:12
2004.12.05
Создание СУБД


14-1099174779
Piter
2004-10-31 02:19
2004.12.05
Magic Forum 1.1 - программа-клиент этого форума


14-1099305727
Юрий Федоров
2004-11-01 13:42
2004.12.05
Вакансия в москве


1-1100853446
йцйцуун
2004-11-19 11:37
2004.12.05
Защита файла при помощи записи.





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