Подскажите как быстро очистить F1Book1

← →
Оля (2002-10-22 16:15) [0]

Так как у меня не очень рационально, очень много времени занимает

// очистка с 1-ой по 10000 строку в 4-ех столбцах
for srtoka:=1 To 10000 do
begin
F1Book4.TextRc[srtoka,1]:=" ";
F1Book4.TextRc[srtoka,2]:=" ";
F1Book4.TextRc[srtoka,3]:=" ";
F1Book4.TextRc[srtoka,4]:=" ";
end;

← →
Владимир Т (2002-10-23 06:27) [1]

Есть такая хорошая процедура
f1book1.ClearRange(a1,b1,a2,b2,int);
где a1,b1 - координаты ячейки с которой нужно начать очистку
a2, b2 - координаты ячейки, в которой закончить,
int - просто целое число (зачем нужно - я не понял)
пример - f1book1.ClearRange(1,1,2,4,1) очищает 4 столбца в первой и во второй строке (начиная с первой колонки). Для твоего примера наверное будет f1book1.ClearRange(1,1,10000,4,1) - проверь, должно работать (учти, что если ячейка в фокусе - она не очищается!!)

Владимир tvv@krfd.khv.ru

Подскажите как быстро очистить F1Book1 Найти похожие ветки