Truco accedido 102 veces
procedure TForm1.Button1Click(Sender: TObject); begin DBGrid1.DataSource.DataSet.DisableControls; TStringGrid(DBGrid1).DefaultRowHeight:=60; DBGrid1.DataSource.DataSet.EnableControls; end;