Im making a program that records the mouse movements and plays them back.......

Private Sub Timer1_Timer()

Dim PT As POINTAPI
GetCursorPos PT
Text1.Text = Text1.Text & "(" & PT.X & "," & PT.Y & ")"

End Sub


The text in Text1 appears like this.......

(156,150)(156,150)(156,150)(141,157)(127,157)(127,157)(127,157)(127,157)(131,147)(131,147)(131,147)( 131,147)(131,147)(131,147)(131,147)(131,147)(131,147)(131,147)

in one textbox. All this is good, but i need to somehow take every individual (156,150) / (???,???) and some how get it read as a single (???,???) so it can be read / playd back.


Any suggestions or ideas?