Вниз
Скачать: CL | DM;

Запрет перетаскивания столбца в гриде?   Найти похожие ветки 

 
Cranium ©   (2003-08-14 16:01) [0]

Как осуществить запрет перетаскивания столбца в гриде?


 
Vlad   (2003-08-14 16:05) [1]

dgColumnResize поставить false


 
Desdechado ©   (2003-08-14 16:09) [2]

побочный эффект - изменять ширину столбцов нельзя


 
Cranium ©   (2003-08-14 16:11) [3]

Так так то оно так, но мне в идеале мне нужно, чтоб определенный столбец был зафиксирован в крайне левой позиции, не мог менять размер, а со всеми остальными пусть что хотят то и делают, хоть размер меняют, хоть местами.


 
NAlexey ©   (2003-08-14 16:13) [4]

>побочный эффект - изменять ширину столбцов нельзя
Но перетаскивать все еще можно...


 
DenK_vrtz ©   (2003-08-14 16:18) [5]

Cranium © (14.08.03 16:11), положи два грида "срощенных" вместе и работающих с одним набором данных
У первого [1]+наложить второй на полосу прокрутки, у второго ничего не делать (только индикатор отключить)


 
Desdechado ©   (2003-08-14 16:22) [6]

2 NAlexey
может, в семерке и можно, а в пятерке - нельзя!


 
Cranium ©   (2003-08-14 16:23) [7]

> DenK_vrtz ©


А что други способом зафиксировать столбец нельзя? Твой вариант не подходит по ряду обстоятельств!


 
gsvserg ©   (2003-08-14 16:24) [8]

procedure TForm_licenz.VolgaDBGrid2ColumnMoved(Sender: TObject; FromIndex,
ToIndex: Integer);
begin
if fromindex=0 then
begin
VolgaDBGrid2.Columns.Items[toindex].Index:=fromindex;
end;
end;


 
gsvserg ©   (2003-08-14 16:26) [9]

Для DBGrid тоже работает, только нужно еще проверять чтобы другие столбцы не перемещали на первое место.


 
NAlexey ©   (2003-08-14 16:27) [10]

Если не ресайзить то пробуй так:

type
C = class(TCustomGrid);

procedure TForm1.StringGrid1MouseMove(Sender: TObject; Shift: TShiftState;
X, Y: Integer);
begin
if C(StringGrid1).FGridState = gsColSizing then
begin
C(StringGrid1).FGridState := gsNormal;
InvalidateRect(StringGrid1.Handle, nil, false);
end;
end;


 
Johnmen ©   (2003-08-14 17:01) [11]

Взять нормальный DBGrid и не париться.....:)


 
Vlad   (2003-08-14 17:32) [12]

На событие OnColumnMoved:
ShowMessage("А ну поставь на место!");



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.47 MB
Время: 0.021 c
14-10923
Романов Р.В.
2003-08-16 22:27
2003.09.04
Есть собаководы среди программистов?


3-10605
Morfeuse
2003-08-13 11:52
2003.09.04
изменить цвета фона в QuantumGrid


11-10663
Filat
2002-12-19 16:19
2003.09.04
Хочу начать работать с KOL, скачал файлы, а как поставить?


3-10571
PsoFT
2003-08-14 13:42
2003.09.04
excel


3-10589
Sevish
2003-08-14 13:13
2003.09.04
Корретная работа с транзакциями, ХЕЛП!!!




   Наверх