Trabalhando com Frames - Exemplo Tabuada 2

Discussão em 'Comandos Básicos' iniciado por fdantas, Janeiro 31, 2009.

  1. fdantas

    fdantas Administrator Moderador

    Frame com Dialog-box

    Código:
    
Def Var i-num   As Int  No-undo.
Def Var i-cont  As Int  No-undo.

Update i-num Label 'Informe um número'
       With Frame f-a Row 3 Side-label.

Do i-cont = 1 To 10 :

    Disp i-cont ' X ' i-num ' = ' i-cont * i-num
         With Frame f-b Centered No-labels 10 Down
         Width 80 Title 'Tabuada' Bgcolor 3 View-as Dialog-box.

    Down With Frame f-b.

    Pause.

End.

Clear Frame f-a All.
Hide Frame f-a.
    fdantas, Janeiro 31, 2009
    #1

Compartilhe esta Página