Вниз
Скачать: CL | DM;

Помогите разобраться   Найти похожие ветки 

← →
Александр ©   (2002-09-08 09:07) [0]

У меня есть ListView1. Там есть два столбца. Например,пользователь выделил некоторые строки, нажал кнопку, открылась форма с Edit1. Там он вводит текст и жмет ОК, при этом у всех выделенных строк ListView1 содержание второго столбика должно содержать текст введеные в Edit1. Это вообще реально сделать? Спасибо.


← →
Poirot ©   (2002-09-08 09:15) [1]

ДА?!?!!


← →
Poirot ©   (2002-09-08 09:19) [2]

ну грубо говоря!!!
for I:=0 to TreeView1.SelCount-1 do
if TreeView1.Items[I].Selected then TreeView1.Items[I].Caption:=Form2.Edit1.Text;

Ну что-то такое!!!
Не идеально, но помоему работает... Делфей нет под рукой..


← →
Александр ©   (2002-09-08 10:03) [3]

Это совсем не то. Одно дело компонент TreeView и ListView. Даже если заменить TrewView на ListView, то он исправляет текст в первой коолонке, а как сделать тожесамое с SubItem?
Я пробовал так: ListView1.Items[i].SubItems.Text:=Edit1.Text но не получается. Спасибо.


← →
Poirot ©   (2002-09-08 11:32) [4]

Сорри очепятка!!!

> SubItems

Помоему TStrings... Таки надо указать индекс!!!! для первого 0


← →
Александр ©   (2002-09-08 14:34) [5]

Непонял. А если строки выделены в разнобой?


← →
Степан   (2002-09-09 07:36) [6]

var
t: TListItem;
begin
with ListView1 do begin
t := Selected;
while t <> nil do begin
t.SubItems[0] := Edit1.Text;
t := GetNextItem(t, sdAll, [isSelected]);
end;
end;
end;


← →
Александр ©   (2002-09-09 15:46) [7]

Спасибо большое. На всякий случай, может у кого-то возникет подобная проблема, при использовании данного кода не забудьте добавить в uses comctrls.
Еще раз спасибо.



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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.009 c
14-61305
easy
2002-08-24 17:36
2002.09.19
логическая задача...


1-61082
SeregaS
2002-09-07 01:33
2002.09.19
Доступ к файлу - read access only


1-61190
Студент
2002-09-08 08:27
2002.09.19
Работа с компонентом без помещения его на форму


3-60970
Коля
2002-08-29 05:11
2002.09.19
Order by


14-61280
Ev_genus
2002-08-21 19:26
2002.09.19
6th Day Soundtrack




   Наверх