facendo un'interfaccia wizard in delphi 7

Question

Sto usando delphi 7 e sto provando a fare un'interfaccia wizard. Non so se c'è un modo più semplice per creare un wizard, quindi stavo pensando di creare moduli separati per ogni fase della procedura guidata e quando l'utente fa clic su "Avanti", il modulo attivo si chiude e viene aperto quello successivo.

Ecco uno screen-shot di due forme successive:

Ho fatto una procedura che prende 2 forme come parametri: la forma che verrà chiuso e la prossima forma di procedura guidata

class Procedure Tspad.nextForm(showForm, closeForm: TForm); 
begin 
    closeForm.Close; 
    showForm.Showmodal; 
end; 

quando clicco sul pulsante "Avanti" viene eseguito il codice folowing:

Tspad.nextForm(echipContractForm, clientContractForm); 

quando ho eseguito il programma, e si preme il pulsante "Avanti", il prossimo modulo apeare ma il curente non si chiude.

Come posso fare questo lavoro, o c'è un altro modo più efficace per creare un mago?

Answer 1

Un modo molto comune per fare una procedura guidata è quello di utilizzare un controllo pagina. Ogni pagina distinta della procedura guidata è una pagina diversa/un foglio di calcolo nel controllo della pagina. Credo che questo sia effettivamente il modo in cui Windows implementa le procedure guidate.

Ovviamente si desidera nascondere tutte le schede. A tale scopo, impostare TabVisible su False per ogni foglio di calcolo. Quando desideri spostarti avanti e indietro attraverso il wizard, ad es. quando l'utente fa clic sui pulsanti successivo o precedente, effettua questa operazione impostando ActivePage o ActivePageIndex in base alle tue preferenze.

Answer 2

Una buona pratica per la divisione del contenuto visualizzato su un unico modulo è l'uso di Telai.

Un Telaio è un po 'come una forma, tranne che non ha una finestra propria, ma piuttosto si trova all'interno di un modulo ospite.

, se utilizzati insieme (come David Heffernan ha suggerito) un TPageControl o anche un TNotebook (che è pretty-più o meno esattamente la stessa di TPageControl, solo che non ha schede per cominciare), si finisce con un Wizard facilmente gestibile.

Answer 3

è possibile testare alcuni componenti che possono aiutare in questo compito (internamente utilizzando tPageControl o TNotebook). Vedi this link.

Saluti.

Answer 4

JVCL ha un buon controllo per effettuare una procedura guidata in modo molto semplice ed efficace (TJvWizard). Vedi http://jvcl.delphi-jedi.org/

Answer 5

È possibile dare una prova di questi:

• Balmsoft Wizard rilasciato sotto licenza LGPL.
• Delphi Wizard Framework dal membro SO Steven R. Kamradt.

Answer 6

Si può anche considerare TMS TAdvSmoothStepControl (non gratuito!). Un'altra soluzione, ma solo "esterna" al programma, è utilizzare Inno Setup per creare una procedura guidata, anche per scopi di "installazione non di installazione".

Infatti con Inno Setup è possibile fare molti pensieri (modificare il file .ini e il registro, avviare/fermare programmi ...) che può essere utile per una procedura guidata senza "installare" un programma.