Casa
Top.Mail.Ru Yandeks.Metrika
Fórum: "Principal";
Arquivo atual: 2002.01.08;
Download: [xml.tar.bz2];

Para baixo

TListItems Encontre agências semelhantes


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;
começar
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);





Страницы: 1 filial inteira

Fórum: "Principal";
Arquivo atual: 2002.01.08;
Download: [xml.tar.bz2];

em cima















Memória: 0.82 MB
Hora: 0.099 c
1-22210
Homem vermelho
2001-12-15 20:12
2002.01.08
Como namut tais que ............................


1-22104
Derzky
2001-12-18 19:54
2002.01.08
Como comparar datas.


14-22383
Vadim
2001-11-08 11:01
2002.01.08
Форумы программистов


6-22309
Denso
2001-10-10 19:02
2002.01.08
Há um cartão de rede sem passaporte, selado!


1-22236
T2
2001-12-16 07:10
2002.01.08
serial.vxd





afrikaans albanês Arabic armênio azerbaijano basco belarusian Bulgarian catalão Chinês simplificado) Chinês tradicional) croata checo dinamarquês Dutch Inglês estoniano filipino Finnish French
Galego georgiano German grego crioulo haitiano hebraico hindi húngaro islandês Indonesian irlandês Italian Japanese Korean letão lituano macedónio Malay maltês Norwegian
persa polonês Portuguese romeno Russian sérvio Slovak esloveno espanhol swahili sueco tailandês turco ucraniano urdu vietnamita galês ídiche bengali bósnio
cebuano esperanto gujarati hausa hmong igbo javanês kannada khmer lao latino maori marata mongol Nepali punjabi somali tâmil telugu yoruba
zulu
Английский francês Alemão Italiano Португальский russo Espanhol