PDA

View Full Version : ADVSmoothDock



پوریا_م
دوشنبه 02 مرداد 1391, 08:25 صبح
با سلام خدمت دوستان
کسانی که با کامپوننت فوق از مجموعه TMS کار کرده باشند میدونن که آیتمهایی که روی داک قرار میگیرن حین اجرای برنامه میتونن درگ بشن و جاشون تغییر کنه. من میخام از این آیتمها بعنوان دکمه استفاده کنم ولی وقتی درگ میشن و جاشون تغییر میکنه پس کد متناظر با ایندکس اونها اجرا میشه و مشکل پیش میاد.
آیا امکان این هست که جای آیتمها رو ثابت کرد و کاربر نتونه اونها رو جابجا کنه ؟ لطفا راهنمایی بفرمایید.
با تشکر

hossein_h62
دوشنبه 02 مرداد 1391, 08:31 صبح
با سلام
به سادگی :
procedure TForm1.AdvSmoothDock1ItemStartDrag(Sender: TObject;
DragItem: TAdvSmoothDockItem; var Allow: Boolean);
begin
Allow := false;
end;