Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.09.19;
Скачать: 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 вся ветка

Текущий архив: 2002.09.19;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.01 c
7-61326
MSknyaz
2002-07-10 17:51
2002.09.19
Как в Проводнике открыть Панель Управления и Принтеры?


8-61218
Fredericco
2002-05-20 12:03
2002.09.19
Вопрос по распознаванию речи


3-60974
Nina
2002-08-27 15:14
2002.09.19
подскажите в чём тут ошибка?


14-61251
BigBadMutuh
2002-08-18 21:34
2002.09.19
Что за вирусятина?


3-61006
vich
2002-08-27 23:29
2002.09.19
Помогите! Хочу перенести данные из одной базы в другую