Drag and Drop without using cordinate system

Question

i am currently trying to Drag an object in a Cell from one DevXtraGridcontrol to another cell on another cell in DevXtraGridcontrol. how i can implement it in Vbscript please help

Alternatively how can we find the Cordinates of a particular cell of a DevXtraGridcontro ?

tanyayatskovska · Accepted Answer

Hi Saurabh, &nbsp; The code below identifies the coordinates of the cell and drags it. You can try creating you own Drag function based on it. &nbsp;  'VBScript Sub Test &nbsp; Set grid = Sys.Process("GridMainDemo").WinFormsObject("frmMain").WinFormsObject("panelControl1").WinFormsObject("gcContainer")._ &nbsp; &nbsp; &nbsp;WinFormsObject("TableView").WinFormsObject("gridControl1") &nbsp; Sys.Process("GridMainDemo").WinFormsObject("frmMain").Activate &nbsp; Call DragNDropCell(grid, 2, 3, 5, 2) End Sub &nbsp; Sub DragNDropCell(grid, sourceRow, sourceCol, destRow, destCol) &nbsp; Set source = grid.MainView.ViewInfo.GetGridCellInfo_2(sourceRow, sourceCol)&nbsp; &nbsp; Set dest = grid.MainView.ViewInfo.GetGridCellInfo_2(destRow, destCol)&nbsp; &nbsp; x = source.Bounds.Left + source.Bounds.Width / 2 &nbsp; y = source.Bounds.Top + source.Bounds.height / 2 &nbsp; dX = dest.Bounds.Left - source.Bounds.Left + dest.Bounds.Width / 2 &nbsp; dY = dest.Bounds.Top - source.Bounds.Top + dest.Bounds.Height / 2 &nbsp; &nbsp; Call grid.Drag(x, y, dX, dY) End Sub

Forum Discussion

Drag and Drop without using cordinate system

Recent Discussions

Process "crashed" and test fails when closing the application in test

Name mapping gone

TestComplete: Connect to Azure Cosmos DB

Related Content

Control Click using cordinates

File System Testing

TestComplete Recovery System