Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2004.09.26;
Скачать: [xml.tar.bz2];

Вниз

Stringgrid   Найти похожие ветки 

 
Чайник   (2004-09-13 13:56) [0]

Люди, а можно как- нибудь поменять местами строки в таблице?... чтоб не поячеечно...


 
TUser ©   (2004-09-13 13:57) [1]

s:=Cells[0,0];
Cells[0,0]:=Cells[1,1];
Cells[1,1]:=s;


 
TUser ©   (2004-09-13 13:58) [2]

Извини, не прияитал про непоячеечно.
А чем поячеечно не нравится?


 
Чайник   (2004-09-13 13:58) [3]

это как раз таки по ячейке, а речь идет чтоб поменять местами всю строку сразу...


 
Чайник   (2004-09-13 13:59) [4]

да не, можно канешна и так, с так собсна и делаю.. прост мне казалось, что должен быть способ по строкам, так ведь проще по иде..


 
TUser ©   (2004-09-13 14:00) [5]

Не очень сложно и всю строку сразу пробежать
for i:=0 to ColCount-1 do begin
...
end;


 
Чайник   (2004-09-13 14:01) [6]

да ет понятно, именно так и делаю.. но нельзя ли поменять их местами, не пробегаясь по  ячейкам?


 
Rem   (2004-09-13 14:12) [7]

procedure SwapRows(a_Row1, a_Row2: TStrings);
var
 TmpRow: TStrings;
begin
 TmpRow := TStringList.Create;
 try
   TmpRow.Assign(a_Row1);
   a_Row1.Assign(a_Row2);
   a_Row2.Assign(TmpRow);
 finally
   TmpRow.Free;
 end;
end;

...

SwapRows(StringGrid.Rows[1], StringGrid.Rows[2]);


 
Чайник   (2004-09-13 14:13) [8]

Благодарю, именно это и искал



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

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

Наверх




Память: 0.45 MB
Время: 0.03 c
1-1095089837
Charly22
2004-09-13 19:37
2004.09.26
Что мешает удалению каталога?


1-1094813834
Antonmm
2004-09-10 14:57
2004.09.26
Свой курсор


14-1094779221
Soft
2004-09-10 05:20
2004.09.26
У американцев снова нашествие НЛО.


14-1094235388
gn
2004-09-03 22:16
2004.09.26
меня сегодня пытались ограбить чуть сосмеху не помер


9-1086243362
Kair
2004-06-03 10:16
2004.09.26
Примеры к книге М.Краснова





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский