Скачать: CL | DM;

посчитать максимольное количество строк для разбивки ячейки   Найти похожие ветки 

← →
Daria   (2006-02-16 11:52) [0]

в таблице word есть объединенные строки. как посчитать для ...split(?,1) на сколько максимально строк можно разбить столбец

---

← →
umbra ©   (2006-02-16 12:46) [1]

function TrySplit(cell: Variant; rows: Integer): boolean;
begin
 Result := true;
 try
   cell.Split(NumRows:=rows);
 except
   Result := False;
 end;
end;

{используем эту функцию где-то в коде}

var
 rows: integer;
 cell: variant;
{.........................................}
 rows := 2;
 while not TrySplit(cell, rows) do
   Inc(rows);
{..............................................}


---

← →
Daria   (2006-02-16 13:01) [2]

спасибо большое. вот только есть проблема. если число четное, то все делится, если нечетное (например, можно разбить только на 3 строки, то выводится ошибка "Число д.б. кратно 3"

---

← →
umbra ©   (2006-02-16 13:04) [3]

сообщение выводится при запуске проекта из ИДЕ?

---

← →
Daria   (2006-02-16 13:05) [4]

откуда???

---

← →
Daria   (2006-02-16 13:07) [5]

да

---

← →
umbra ©   (2006-02-16 13:08) [6]

> откуда???
>

из среды разработки делфи.

попробуйте запустить программу саму по себе.

---

← →
Daria   (2006-02-16 13:08) [7]

ой, как странно. а если просто запустить , то работает :)

---

← →
umbra ©   (2006-02-16 13:12) [8]

> ой, как странно. а если просто запустить , то работает

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

---

← →
Daria   (2006-02-16 13:18) [9]

огромное спасибо!!!!

---

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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.038 c