21 de mai de 2011

Desenvolvimento de Software 1, aula 6


Aula 6
19/8/2003

  1. comando inkey() [aguarda uma tecla ser pressionada pelo tempo estipulado]
? “teste”
inkey(5)
clear


  1. o “programa” CL.BAT
CLIPPER : gera o arquivo .obj
RTLINK : gera o arquivo .exe


  1. bordas na tela
clear
@ 0,0 to 24,79
inkey(0)
clear

  1. cores
setcolor(“n/w”)

n”: cor da letra. N = preto
w”: cor do fundo. W = branco

Altera as cores dos comandos que vierem em seguida.

Exemplo:

clear
setcolor(“b+/n”)
@ 0,0 to 24,79 double
setcolor(“g+/n”)
@ 10,30 say date()
inkey(0)
clear

  1. Set
set date british: data em formato britânico: dd/mm/aa
set century on: ano aparece com quatro dígitos

em conjunto, geram dd/mm/aaaa

  1. comentários
A linha deve iniciar com * (asterisco)


  1. pict
Máscara de dados na tela

  1. read
Comando obrigatório após o get, para efetuar a leitura de dados.

Altura = 0
comprimento = 0
@ 10,05 say “Altura:” get altura pict “999.99”
@ 12,05 say “Comprimento: “ get comprimento pict “999.99”
read
*linha comentada
area = altura * comprimento
@ 14,05 say “A área é”
@ 14,15 say area

  1. chr()
Inserção de caracteres especiais. Uso: chr(código do caracter).

@ 0, 0 to 24,79 double
@ 2, 0 to 2,79 double
@ 1, 3 say “Indústria e Comércio ETEVAV S/A”
@ 2, 0 say chr(204)
@ 2,79 say chr(155)

  1. set scoreboard off
Remove “falha” no desenho da tela (causada pela presença do status da tecla )

Exercício
  • criar uma tela de entrada para uma determinada empresa

Nenhum comentário: