[[cHackAll]]

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
begin
 Memo1.CaretPos := Point(6, 6);
end;