GOTO XY

4D v15.4

GOTO XY


GOTO XY ( x ; y )

Parâmetro	Tipo	Descrição
x	Inteiro longo	posição x (horizontal) do cursor
y	Inteiro longo	posição y (vertical) do cursor

Descrição

O comando GOTO XY se utiliza conjuntamente com o comando MESSAGE quando mostra mensagens em uma janela aberta pelo comando Open window.

GOTO XY determina a posição do cursor de inserção de caracteres (um cursor invisível) para definir a localização da seguinte mensagem na janela.

A esquina superior esquerda representa as coordenadas 0,0. O cursor é localizado automaticamente em 0,0 quando uma janela se abre e depois é executada ERASE WINDOW.

Depois de que GOTO XY defina a posição do cursor, pode utilizar MESSAGE para mostrar os caracteres na janela.

 Open window(50;50;300;300;5;"Esta é só um teste")

 For($vlFila;0;9)

    GOTO XY($vlFila;0)

    MESSAGE(String($vlFila))

 End for

 For($vlLinea;0;9)

    GOTO XY(0;$vlLinea)

    MESSAGE(String($vlLinea))

 End for

 $vhHoraInicio:=Current time

 Repeat

 Until((Current time-$vhHoraInicio)>†00:00:30†)

Mostra a janela a seguir (em Macintosh) por 30 segundos:

Ver também

MESSAGE

4D v15.4

GOTO XY

GOTO XY

Descrição

Exemplo 1

Exemplo 2

Exemplo 3