 |
Delphi Tips & Tricks | softsale > Delphi Tips & Tricks |
| < poprzednia rada | następna rada > |
Blokada przestawiania kolumn w gridzie z możliwością zmiany ich szerokości
Łatwo jest zablokować użytkownikowi możliwość przestawiania kolumn w gridzie poprzez ustawienie Options.dgColumnResize na FALSE . Pociąga to jednak za sobą również zablokowanie możliwości zmiany szerokości poszczególnych kolumn, którą to możliwość chcielibyśmy pozostawić użytkownikowi. Można to zrobić pozostawiając własność Options.dGColumnResize na TRUE a dodatkowo obsługując zdarzenie OnColumnMoved dla grida.
...
implementation
{$R *.DFM}
procedure TForm1.DBGrid1ColumnMoved(Sender: TObject; FromIndex,
ToIndex: Integer);
begin
With (Sender as TDbGrid).Columns do
Items[ToIndex].index:=Items[FromIndex].index;
end;
|
|
SOFTSALE - Oprogramowanie i Szkolenia softsale@softsale.com.pl 03-565 Warszawa , ul. Borzymowska 43 lok. 301C tel/fax:4084840,GSM:0607612428 |