Форум: "Основная";
Текущий архив: 2004.07.25;
Скачать: [xml.tar.bz2];
ВнизПрорисовка таблицы (StringGrid) Найти похожие ветки
← →
ksa2002 © (2004-07-09 06:25) [0]StringGrid1DrawCell (Sender: TObject; ACol, ARow: Integer; Rect: TRect; State: TGridDrawState);
Хочу запустить прорисовку вручную , но не все параметры могу задать , подскажите как задать параметр Rect ?
← →
gek © (2004-07-09 07:48) [1]Интересно, а разве он не задан?
← →
KADAN © (2004-07-09 07:49) [2]Rect за тебя уже задали :)
if (acol=2) and (arow=1) then begin
StringGrid1.Canvas.Brush.Color:=clred;
StringGrid1.Canvas.Rectangle(Rect);
StringGrid1.Canvas.TextOut(rect.Left+2,rect.Top+2,":)");
end;
← →
ksa2002 © (2004-07-09 08:01) [3]Не непоняли я хочу так...
if (length(trim(DBGrid2.Columns[0].Field.AsString)))>0 then
begin
Stringgrid1.Cells[5,ib7c]:=(DBGrid2.Columns[0].Field.AsString);
red_sg_1:=ib7c;
end;
StringGrid1DrawCell (StringGrid1,1,red_sg_1,RECT,0);
end;
Как задать Rect
← →
KADAN © (2004-07-09 08:28) [4]Rect можно задать, пробежавшись циклом по RowHeights и ColWidths, при этом не забыв учесть GridLineWidth.
Но неужели это обязательно, прорисовка сама вызовется когда ей надо, с заданным Rect"ом. Или, если уж это обязательно, просто вызвать Refresh или Repaint.
← →
ЮЮ © (2004-07-09 08:35) [5]ksa2002 © (09.07.04 08:01) [3]
>Не непоняли я хочу так...
>StringGrid1DrawCell (StringGrid1,1,red_sg_1,RECT,0);
А вот этого уже не надо. StringGrid сам перерисует все что нужно после изменения его Cells.
Максимум, что стоит сделать StringGrid1.Repaint или подобное
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2004.07.25;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.037 c