| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
ListView [D6, D7, WinXP]
Ivolg © (2004-11-20 19:31:00)Драсти всем!! Как можно выделив Item, ListView'a Получить Caption и Text выделенного имени!!!ПЛИЗЗ ХЕЛП!!!!!! СПАСИБО!!!!!!
ssk (2004-11-23 11:19:00) [1]http://www.ucad.pisem.net/delphi_components/ssklistview.zip
Ivolg (2004-11-23 11:13:00) [2]СПАСИБО!!!!!!!!!!БОЛЬШОЕ !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
А ка сохранить содержимое ListView потом загрузить это содержимое!!
Kair (2004-11-21 18:05:00) [3]
procedure TForm1.ListView1Click(Sender: TObject);
begin
if ListView1.ItemIndex <> -1 then
begin
Edit1.Text := ListView1.Items[ListView1.ItemIndex].Caption;
Edit2.Text := ListView1.Items[ListView1.ItemIndex].SubItems[0];
Edit3.Text := ListView1.Items[ListView1.ItemIndex].SubItems[1];
end;
end;
begin...end (2004-11-21 13:16:00) [4]
> [12] Ivolg (21.11.04 12:37)
> [13] Ivolg (21.11.04 12:39)
SubItems[1], SubItems[2] и т.д.
Ivolg (2004-11-21 12:39:00) [5]А если колонок ListView 3 Или больше, то как Текст и Caption Каждого Итема и колонки выводить??
Ivolg (2004-11-21 12:37:00) [6]Вот в ListView Item'ов ведь несколько добавленно, а у тебя в примере, Получаю только Caption, и Text 0 Item'a!!
begin...end (2004-11-20 22:14:00) [7]
> Ivolg
карочи не могу больше терпетъ спать хочу пошёл баиньки
дэнги будут - заходи
begin...end (2004-11-20 22:07:00) [8]
> [9] Ivolg (20.11.04 22:03)
слушай ну опять ты мне сначала скажи на каком ты языке гаваришь патом я вазьму словарь так уж и быть постараюсь перевести
Ivolg (2004-11-20 22:03:00) [9]Спасибо!!!!БОЛЬШОЕ!!! а ка сделать чтобы не только текст 0 тема показывал!!!
begin...end (2004-11-20 21:49:00) [10]
> [7] Ivolg (20.11.04 21:35)
По нажатию кнопки "Добавить":
begin
with ListView.Items.Add do
begin
Caption := Edit1.Text;
SubItems[0] := Edit2.Text
end
end.
В обработчик TListView.OnClick:
begin
with ListView do
begin
if Assigned(Selected) then
begin
Edit1.Text := Selected.Caption;
Edit2.Text := Selected.SubItems[0];
Items[ItemIndex].Delete
end
end
end.
Ivolg (2004-11-20 21:35:00) [11]Имеется 2 Edit'a! В первом находится IP дресс "172.17.1.58", а во втором ник "Neo", когда я нажымаю кнопку "Добавить" то эта запись добавляется в ListView! А надо чтобы по нажатию на ListView, добавлялся выделенный Item в едиты (Обратно)!!!
begin...end (2004-11-20 21:28:00) [12]
> [5] Ivolg (20.11.04 21:24)
> Просто я с компонентам этим вообщедела не имел!!!
Да я вижу паря не расстраивайся у всех ето бывает в первый раз
> var
> it:TListItem;
> begin
> if lv.Selected.Index>0 then begin
> it:=lv.Items.Add;
> edit1.text:=it.Caption;
> edit2.text:=it.SubItems.Text;
> end;
Брателло ну во-первых тут опять ошибка и не скомпилируется а во-вторых так я и не понял чего ты хочишь сделать и зачем тебе ваще Text чегой-то не пойму поподробнее давай чего надо то
Ivolg (2004-11-20 21:24:00) [13]Просто я с компонентам этим вообщедела не имел!!! Прям тут написал!! Вото нормальный код:
var
it:TListItem;
begin
if lv.Selected.Index>0 then begin
it:=lv.Items.Add;
edit1.text:=it.Caption;
edit2.text:=it.SubItems.Text;
end;
begin...end (2004-11-20 21:21:00) [14]
> [3] Ivolg (20.11.04 21:15)
> Вот я так пишу:
>
> if lv.Seleced then
Не можыт быть ты чо-то путаешь еси так напысать то ваще даже не скампилируется
Поподробнее задачу давай как пишешь куда пишешь зачем пишешь ну и т.д. а то так не смогу помочь
Ivolg (2004-11-20 21:15:00) [15]begin...end
ПРИВЕТ!!!
Вот я так пишу:
if lv.Seleced then
edit1.text:=lv.Items.SubItem.caption;
edit2.text:=lv.Items.SubItem.text
И когда я нажимаю не на Item То происходит ошибка!!!
КАК БЫТЬ???
begin...end (2004-11-20 20:12:00) [16]Здарова!!!
Зацени ListView.Selected.Caption !
Усё буит пучком!
Бывай!
Ivolg (2004-11-20 19:32:00) [17]Драсти всем!! Как можно выделив Item, ListView'a Получить Caption и Text выделенного итема!!!ПЛИЗЗ ХЕЛП!!!!!! СПАСИБО!!!!!!
| |
