Postscriptum
Full Member | Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
xokc
Спасибо. Просто у меня help-a нет.
Добавлено:
Еще вопрос по Девкам - в DbGridEh есть свойство DrawColumnCell. У меня там такя штука:
procedure TForm1.GridDrawColumnCell(Sender: TObject; const Rect: TRect;
DataCol: Integer; Column: TColumnEh; State: TGridDrawState);
var
OldC: TColor;
begin
if not (gdFocused in State) then
begin
{$B+}
if T1.Active then
begin
if T1.AdsIsRecordDeleted(T1.AdsGetRecordNum) then
begin
OldC := Grid.Canvas.Brush.Color;
Grid.Canvas.Brush.Color := {cl3DLight} {clInfoBk} {clAqua} clRed;
Grid.Canvas.FillRect(Rect);
Grid.DefaultDrawColumnCell(Rect, DataCol, Column, State);
Grid.Canvas.Brush.Color := OldC;
end;
if T1.IsEmpty then
begin
Grid.DefaultDrawColumnCell(Rect, DataCol, Column, State);
end;
end;
end;
end;
т.е. выделяются красным цветом удаленные записи. Не пойму, как такую вещь сделать в Девках. подскажите, плиз. |
