Como Habiltar e Desabilitar Scroll de um DBGrid

Delphi

23/02/2003

Gostaria que não mostra-se a barra de scroll no dbgrid quando ele não utrapassar a quantidade de linhas maior que o tamanho do grid...


Anonymous

Anonymous

Curtidas 0

Respostas

Adilsond

Adilsond

23/02/2003

Unit Windows;


procedure TForm1.Table1AfterOpen(DataSet: TDataSet);
begin
ShowScrollBar(DBGrid1.Handle,SB_HORZ,Table1.RecordCount > 8);
end;


GOSTEI 0
POSTAR