Текущий архив: 2007.05.27;
Скачать: CL | DM;
Вниз
Как запретить эффект Drag&Drop Найти похожие ветки
← →
DelphiLexx © (2007-03-30 17:29) [0]У меня есть два грида в которых можно перемещать элементы между собой. В некоторых случаях мне нужно, чтобы Drag&Drop не работал как это сделать.
← →
Virgo_Style © (2007-03-30 19:24) [1]
procedure TForm1.StringGrid1DragOver(Sender, Source: TObject; X, Y: Integer;
State: TDragState; var Accept: Boolean);
begin
Accept:= ( Random(2)=0 );
end;
← →
DelphiLexx © (2007-03-30 19:40) [2]
> procedure TForm1.StringGrid1DragOver(Sender, Source: TObject;
> X, Y: Integer;
> State: TDragState; var Accept: Boolean);
> begin
> Accept:= ( Random(2)=0 );
> end;
Нет мне нужно чтобы даже курсор не менялся при попытке двинуть элемент
← →
Кросспостинг! (2007-03-30 20:00) [3]Кросспостинг!
http://www.sql.ru/forum/actualthread.aspx?tid=413129
← →
Virgo_Style © (2007-03-31 10:42) [4]DelphiLexx © (30.03.07 19:40) [2]
Тогда, если мне ничего не изменяет, надо вручную вызывать BeginDrag при dmManual
Страницы: 1 вся ветка
Текущий архив: 2007.05.27;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.03 c
