... := { |r,c,f,o| save_dragbegin(oBrw,aDatiDisp,aData,@nRecord),; SetDropInfo( o:SelectedCol():Value ,; o:SelectedCol():Value:= "") } :bDropOver := { |u,r,c,f| oBrw:SetPos( r, c, .t. ), save_dropover(nRecord,oBrw,aDatiDisp),; oBrw:SelectedCol():VarPut( u ) } :CreateFromCode() END //---------------------------------------------------------------------------------------// ...