Mengatur Posisi Cursor

//Mengatur Posisi Cursor ...

// Buat 2 buah edit dan 1 buah button ...
//dan masukkan kode di button seperti dibawah ini


Var x,y : integer ;
Begin
x := strtoint(edit1.text) ;
y := strtoint(edit2.text) ;

SetCursorPos(x,y) ;
end;