Picture

Tratamento de figuras.

Sintaxe

Picture [ DISPLAY | ERASE | REMOVE | UPDATE | EXTRACT ]
[ LINE linha ]
[ COLUMN coluna ]
[ WIDTH colunas
[ HEIGHT linhas ]
[ [ IMAGE bitmap ] | [ FILE lb-arquivo RECORD arquivo-chave ] STATUS;file-status ]

Argumentos

DISPLAY

Exibe a figura na janela.

ERASE

Remove da janela a figura encontrada na posição especificada.

REMOVE

Exclui a figura do arquivo.

UPDATE

Armazena ou atualiza a figura no arquivo.

EXTRACT

Extrai a figura do arquivo de volta para um bitmap.

linha

Linha de posicionamento da figura na janela.

coluna

Coluna de posicionamento da figura na janela

colunas

Largura da areá para exibição da figura em colunas

linhas

Altura da areá para exibição da figura da figura em linhas.

bitmap


Nome do arquivo de imagem no formato BMP (Até 50 bytes). Se omitido na opção DISPLAY será exibida a figura armazenada em arquivo(chave), se omitido na opção UPDATE um nome de bitmap será solicitado ao usuário.

lb-arquivo

Nome do arquivo base de armazenagem de bitmaps (Até 50 bytes).

arquivo-chave

Identificação do bitmap no arquivo de armazenagem (Até 50 bytes). Caso não seja especificado na opção DISPLAY, será exibido diretamente o bitmap.istro

file-status

Código de retorno de 2 bytes que recebe o eventual erro de acesso ao arquivo de armazenamento.

Observações

Em modo texto as opções DISPLAY e ERASE são sem efeito.

Exemplos

Codificação COBOL

EXEC COBOLware Picture UPDATE
           FILE
lb-filename
           RECORD filename-chave
END-EXEC

Efeito



Codificação COBOL

EXEC COBOLware Picture DISPLAY
           LINE 02
           COLUMN 02
           WIDTH 08 
           HEIGHT 04
           FILE lb-filename
           RECORD filename-chave
END-EXEC

Efeito



Veja também

Object PUSH-BUTON