Главная страница
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.025 c
1-1086119585
Lvs
2004-06-01 23:53
2004.06.13
Время


14-1085657216
Mad Dancer
2004-05-27 15:26
2004.06.13
Читы для DX Ball 1


14-1085421821
Piter
2004-05-24 22:03
2004.06.13
Доступ в FIDO


9-1076316483
MRB
2004-02-09 11:48
2004.06.13
ОpenGl и туман


14-1085475891
TUser
2004-05-25 13:04
2004.06.13
Мешают ли потоки ловить сообщения