Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.06.13;
Скачать: CL | DM;

Вниз

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

 
Yanis   (2004-06-01 08:53) [0]

Я уже долго маюсь с этой проблемой, но что то никак не выходит заветный алгоритм.
Есть массив a:array of string;. В StringGrid 16 колонок. Нужно засунуть массив a в ячейки StringGrid"а. Трудность в том, что бы переходить на следующую строчку если мы находимся в 16-й колонке.


 
Семен Сорокин ©   (2004-06-01 09:03) [1]

if Index div 16 = 0 then
RowCount := RowCount + 1


 
pasha_golub ©   (2004-06-01 10:55) [2]

Семен Сорокин ©   (01.06.04 09:03) [1]
Не то. Мы же не знаем сколько строк было до этого.

2Янис


var i:integer;
begin
...
with StringGrid1 do
 begin
  RowCount := Length(A) div 16;
  for i:=low(a) to high(a) do
   Cells[i mod 15, i div 15] := a[i];
 end;
...
end;

Если используются фиксированные ячейки, алгоритм нужно уточнить.


 
Sandman25 ©   (2004-06-01 11:14) [3]

Тут нужно 16, а не 15 ИМХО.
Cells[i mod 16, i div 16] := a[i];



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

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

Наверх




Память: 0.47 MB
Время: 0.042 c
3-1084660424
Shade_
2004-05-16 02:33
2004.06.13
Хранение дерева данных в базе


14-1085362573
Monster
2004-05-24 05:36
2004.06.13
Охринели


14-1085835393
p.0$a
2004-05-29 16:56
2004.06.13
HELP plz


1-1086013960
kombat
2004-05-31 18:32
2004.06.13
Что лучше использовать в конструкторе - Variant или array of var?


14-1085575902
oldman
2004-05-26 16:51
2004.06.13
Что-то слабо верится...