[firebase-br] [OFF] - IB_Grid

eder paz eder.firebird em gmail.com
Sáb Mar 25 15:39:01 -03 2006


Magno


As propriedades da grid procure usar PreventEdit:=False
                                                      PreventInsert:=False;

Onde false libera a edição e true bloqueia ...

/*---------------------------------------------------------------------------------------------------
procedure TForm1.IB_Grid1GetCellProps(Sender: TObject; ACol, ARow: Integer;
  AState: TGridDrawState; var AColor: TColor; AFont: TFont);
begin
  with ds.DataSet do
   begin
    BufferRowNum := IB_Grid1.DataRow[ ARow ];
     if BufferRowNum > 0 then
      begin
       if ib_query1.BufferFieldByName('VENCIMENTO').AsDate < date
        then begin
              AFont.Color := clBlue;
              AFont.Style := [fsBold];
             end;
       end;
    end;
end;
-------------------------------------------------------------------------------*/

Eder Paz
[]'s  espero ter ajudado



Mais detalhes sobre a lista de discussão lista