khorsandreza
پنج شنبه 01 بهمن 1388, 17:26 عصر
سلام
من با استفاده از دستور زیر ارتفاع سلول DBGrid را عوض می کنم و تصاویر مطابق شکل اول نمایش داده میشود اگر بخواهم عرض یکی از سلول ها را تغییر بدهم ارتفاع به هم می ریزد و مشابه شکل دوم مبشود
procedure TForm1.DBGrid1TitleClick(Column: TColumn);
begin
DBGrid1.DataSource.DataSet.DisableControls;
TStringGrid(DBGrid1).DefaultRowHeight :=100;
DBGrid1.DataSource.DataSet.EnableControls;
end;
من با استفاده از دستور زیر ارتفاع سلول DBGrid را عوض می کنم و تصاویر مطابق شکل اول نمایش داده میشود اگر بخواهم عرض یکی از سلول ها را تغییر بدهم ارتفاع به هم می ریزد و مشابه شکل دوم مبشود
procedure TForm1.DBGrid1TitleClick(Column: TColumn);
begin
DBGrid1.DataSource.DataSet.DisableControls;
TStringGrid(DBGrid1).DefaultRowHeight :=100;
DBGrid1.DataSource.DataSet.EnableControls;
end;