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




Вниз

TListItems 


Virtualik   (2001-12-17 16:09) [0]

Как обменять элементы в списке сабж?

Дело в том, что тривиальный вариант:
I := I1;
I1 := I2;
I2 := I
Не проходит.



Digitman   (2001-12-17 16:11) [1]

В каком списке-то ? Список списку рознь. Или ты считаешь (судя по вопросу), что твой список - всем спискам список ?))))))



Fellomena   (2001-12-17 17:13) [2]

Для ListBox1:

...
var
s: string;
...
begin
...
s:=ListBox1.Items[0];
ListBox1.Items[0]:=ListBox1.Items[1];
ListBox1.Items[1]:=s;
...
end;

Так устроит ?



Virtualik   (2001-12-17 17:35) [3]

Повторяю: я про элементы из TListItems, те что используются в компоненте TListView, а не в TListBox.

Проблема в обмене объектов.



MBo   (2001-12-17 17:57) [4]

проблема видимо, в соэдании промежуточного элемента.
штатный путь - Items.Add
так вроде работает
var l:tlistitem;
begin
l:=lv1.items.add;
l.Assign(lv1.items[0]);
lv1.items[0].assign(lv1.Items[1]);
lv1.items[1].assign(l);
lv1.Items.delete(lv1.items.count-1);





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




Наверх





Память: 0.72 MB
Время: 0.024 c
3-21910           Wladimir              2001-12-04 08:01  2002.01.08  
Количество записей в таблице?


1-22100           Avol                  2001-12-15 18:29  2002.01.08  
Как в Delphi сделать таблицу рекордов для игры?


3-21974           Dup                   2001-12-06 10:30  2002.01.08  
TQRExpr


1-22184           Alligator             2001-12-21 09:44  2002.01.08  
может кто знает?


4-22462           Winnie!               2001-11-01 19:50  2002.01.08  
использоание BitBlt и CreateBitmap