4D Doc Center : WR SET CURSOR POSITION

4D Write v14

WR SET CURSOR POSITION


WR SET CURSOR POSITION ( area ; pagina ; coluna ; linha \| nivel ; posiçao )

Parâmetro	Tipo	Descrição
area	Inteiro longo	Área 4D Write
pagina	Inteiro longo	Número da página onde está o cursor
coluna	Inteiro longo	Número de coluna
linha \| nivel	Inteiro longo	Número de linha
posiçao	Inteiro longo	Posição horizontal do cursor na linha

Descrição

O comando WR SET CURSOR POSITION move o ponto de inserção a uma nova posição em função dos parâmetros pagina, coluna, linha e posiçao.

pagina: o valor de pagina deve estar entre o primeiro e o último número de página do documento. O número de página deve ter em conta a numeração de páginas, definida no diálogo de preferências.
coluna: o valor de coluna deve estar entre 1 e o número total de colunas
linha: o valor de linha deve estar entre 1 e o número total de linhas da coluna (ou página, se há somente uma coluna).
posiçao: este valor deve estar entre 1 e o número total de caracteres na linha. Para mover o ponto de inserção a primeira posição na linha, passe 1 em posiçao.

Se deseja colocar o cursor em uma área que não seja o corpo, é necessário utilizar o comando WR SET FRAME antes de utilizar o comando WR SET CURSOR POSITION.

Exemplo

Você quer localizar o ponto de inserção ao início da décima linha da quarta página:

  `Verifica que estamos no corpo do documento

 If(WR Get frame(Area)#0)

  `Caso contrário, passamos ao corpo

    WR SET FRAME(Area;wr text frame)

 End if

  `Mover o cursor

 WR SET CURSOR POSITION(Area;10;1;10;1)

  `Área de deslocamento para mostrar o punto de inserção

 WR SCROLL TO SELECTION(Area)