' Rapid-Q by William Yu (c)1999-2000                                             .
' ================================================================================
' Upload_il_tuo_script_su_Rapidq.it

' Come_creo_una_Form_

Il FORM è la parte visiva della applicazione basata sulla Windows GUI. I Forms
possono contenere altri oggetti quali pulsanti, caselle di testo, etichette che
creano l'aspetto dell'interfaccia utente. In Rapid-Q, tutte le chiamate alla
Windows API che trattano di creare, gestire e chiudere i forms sono raggruppate
nell'oggetto QForm.
Creare un componente form da usare Per usare l'oggetto QForm dobbiamo creare una
forma utilizzabile di esso, come quando creiamo una variabile di un certo tipo di
dati. Il modo più semplice di fare questo è usare DIM :
DIM MyForm AS QFORM
Ora abbiamo a disposizione un componente utilizzabile per la nostra applicazione
chiamato MyForm che è caricato con le impostazioni di default e può essere usato
subito.
Un modo alternativo di rendere utilizzabile un componente form è usare il
costrutto CREATE...END CREATE:
CREATE MyForm AS QFORM
END CREATE
Sebbene sia perfettamente un metodo valido per creare un componente utilizzabile,
normalmente utilizzeremo tale costrutto per aggiungere linee di codice tra CREATE
ed END CREATE per cambiare le impostazioni default del nuovo componente form.
Mostrare il componente FormUn modo di mostrare il componente Form è usare il
metodo dell'oggetto QForm ShowModal. Mostrare un Form come 'modal' determina che
esso arresta il programma fino a quando il form non viene chiuso dall'utente.
Quindi è stato usato 'modal' per mantenere la finestra aperta senza altro
ulteriore codice, il metodo Show invece mostrerebbe la finestra e poi la chiude
immediatamente.
DIM MyForm AS QFORM
MyForm.SHOWMODAL
 [default empty form object]
Come vedi il componente MyForm viene mostrato sullo schermo. Non succede altro
fino a che chiudiamo il form.
Cambiare il titolo della finestra/FormCome puoi notare nell'immagine di sopra del
form, il titolo di default è una stringa vuota. Il titolo è una delle proprietà 
del form ed è cambiato assegnandoli un nuovo valore.
DIM MyForm AS QFORM
MyForm.CAPTION = 'My form!'
MyForm.SHOWMODAL
 [caption set on form object]
Qualunque stringa venga assegnata alla proprietà caption (titolo) essa apparirà 
sulla barra della finestra dell'applicazione.
Impostare lo stile del bordo (Border Style) di un Form La proprietà Border Style
di un componente form permette al programmatore di controllare le impostazioni che
agiscono sul modo con cui il bordo e la barra della finestra dell'applicazione
sono mostrati all'utente.
I valori assegnati costanti nell'esempio sottostante sono presi direttamente dal
file Rapid-Q .INC.
'-- Border Styles
CONST bsNone = 0              '-- No visible border line, Not resizeable
CONST bsSingle = 1            '-- Single-line border, Not resizeable
CONST bsSizeable = 2          '-- Standard resizeable border
CONST bsDialog = 3            '-- Dialog, not resizeable
CONST bsToolWindow = 4        '-- like bsSingle but with a smaller caption
CONST bsSizeToolWin = 5       '-- like bsSizeable with a smaller caption

DIM MyForm AS QFORM
MyForm.BORDERSTYLE = bsSizeable
MyForm.SHOWMODAL
Il valore considerato default è bsSizeable per il componente form. Il valore
bsSizable e bsSizeToolWin permettono entrambi all'utente di modificare le
dimensioni della finestra puntando con il moude sul bordo dell'applicazione. Se
tale caratteristica di cambiamento delle dimensioni viene usata, poi deve essere
supportato mediante codice scritto la disposizione dei componenti contenuti nel
form per ben apparire sulla finestra di dimensioni cambiate. Lo stile bsSingle non
permette all'utente di modificare le dimensioni della finestra dell'applicazione,
ma permette all'utente di rendere la finestra a tutto schermo o a icona sulla
barra delle applicazioni.
Ecco come appaiono i differenti BorderStyle sullo schermo:
 [bsNone BorderStyle][bsSingle BorderStyle] [bsSizeable BorderStyle][bsDialog
BorderStyle] [bsToolWindow BorderStyle][bsSizeToolWin BorderStyle]
Cambiare le icone dei bordi disponibili di un Form Le iconde dei bordi (Border
Icons) di un form sono la serie di immagini di una barra della finestra sopra una
finestra di un form. Esse appaiono nel form nei seguenti layouts:
 [Border Icons with Help]
A. Icona del menu di sistema B. Icona per minimizzare (ridurre a icona sulla barra
delle applicazioni) C. Icona per massimizzare (rendere a tutto schermo la
finestra) D.Icona chiudi (chiude l'applicazione/finestra) E. Icona Guida (Help).
Ci sono due metodi del componente form per permettere all'utente di decidere quale
icona dei bordi deve apparire sulla barra della finestra. Questi due metodi sono
AddBorderIcons e DelBorderIcons. Un metodo oggetto è lo stesso come per le
procedure BASIC (subroutine o function). Per cambiare sia mediante AddBorderIcons
sia mediante DelBorderIcons,deve essere passato un parametro a tali metodi per
fornire l'informazione giusta.
Prego notare nell'esempio suesposto che le icone Minimize e Maximize devono essere
rimosse prima che possa essere aggiunta la icona Help alla barra della finestra
della applicazione.
I valori costante assegnati nel seguente esempio sorgente sono presi direttamente
dal file di inclusione di Rapid-Q.
'-- Border Icons
CONST biSystemMenu = 0
CONST biMinimize = 1
CONST biMaximize = 2
CONST biHelp = 3

DIM MyForm AS QFORM
MyForm.DELBORDERICONS (biMaximize)
MyForm.SHOWMODAL
Il codice mostrato qui sopra produce i seguenti cambiamenti nella barra della
finestra dell'applicazione:
 [DelBorderIcon (biMaximize)]
Combinare i cambiamenti determinati da Border Style with changes con i cambiamenti
determinati da the Border Icons può ulteriormente potenziare il controllo che il
programmatore ha sul layout della applicazione in windows.
'-- Border Styles
CONST bsNone = 0              '-- No visible border line, Not resizeable
CONST bsSingle = 1            '-- Single-line border, Not resizeable
CONST bsSizeable = 2          '-- Standard resizeable border
CONST bsDialog = 3            '-- Dialog, not resizeable
CONST bsToolWindow = 4        '-- like bsSingle but with a smaller caption
CONST bsSizeToolWin = 5       '-- like bsSizeable with a smaller caption
'-- Border Icons
CONST biSystemMenu = 0
CONST biMinimize = 1
CONST biMaximize = 2
CONST biHelp = 3

DIM MyForm AS QFORM
MyForm.BORDERSTYLE = bsSingle
MyForm.DELBORDERICONS (biMaximize)
MyForm.SHOWMODAL
Il codice mostrato qui sopra produrrà una finestra dell'applicazione che non può
essere ridimensionata dall'utente in nessun altro modo eccetto l'essere
minimizzata a icona sulla barra applicazioni.



' ===============================================================================
'                      2003 Holyguard.net - 2007_Abruzzoweb