hgffh

    %Installateur=$new(wizard)
    %Installateur->$setIcon(290)
    %Installateur->$setCaption("ToolZboX     - Installation -")
    %Installateur->$setGeometry(250,200,250,240)

    
    %accueilward=$new(widget,%Installateur)
    %serveurward=$new(widget,%Installateur)
    %autojoin=$new(widget,%Installateur)

    
    %layoutaccueilward=$new(layout,%accueilward)
    %accueilward->$setBackgroundImage($file.localdir(toolzbox/pics/FondScreen2.jpg))

    %labelaccueilboutonward=$new(button,%accueilward)
    %labelaccueilboutonward->$settext(Site d'aide et de présentation)
    %layoutaccueilward->$addwidget(%labelaccueilboutonward,2,0)
    %labelaccueilboutonward->$setImage($file.localdir(toolzbox/pics/Bouton2.jpg))
    privateimpl(%labelaccueilboutonward, mousePressEvent) {
        openurl http://kvirc-fr.info/wikiz/index.php?title=ToolZboX
    }
    %Installateur->$addpage(%accueilward,Bienvenue)
    %Installateur->$setHelpEnabled(%accueilward,0)
    
    
    %layoutserveurward=$new(layout,%serveurward)
    %labelpseudoward=$new(label,%serveurward)
    %labelpseudoward->$settext("Pseudonyme")
    %layoutserveurward->$addMultiCellWidget(%labelpseudoward,0,0,0,0)

    %Labelpseudoeditward=$new(lineedit,%serveurward)
    %Labelpseudoeditward->$settext("")
    %layoutserveurward->$addMultiCellWidget(%Labelpseudoeditward,0,0,2,2)    
 
    %labelcleward=$new(label,%serveurward)
    %labelcleward->$settext("Clé Irc")
    %layoutserveurward->$addMultiCellWidget(%labelcleward,1,1,0,0)
 
    %Labelcleeditward=$new(lineedit,%serveurward)
    %Labelcleeditward->$settext("")
    %Labelcleeditward->$setEchoMode(password)
    %layoutserveurward->$addMultiCellWidget(%Labelcleeditward,1,1,2,2)    

    %labelespaceward=$new(label,%serveurward)
    %labelespaceward->$settext("                ")
    %layoutserveurward->$addMultiCellWidget(%labelespaceward,1,1,0,0)   
    %layoutserveurward->$addMultiCellWidget(%labelespaceward,1,1,1,1)    
    %layoutserveurward->$addMultiCellWidget(%labelespaceward,1,1,3,3)    
  
    %labelcomboward=$new(label,%serveurward)
    %labelcomboward->$settext("Fonction")
    %layoutserveurward->$addMultiCellWidget(%labelcomboward,2,2,0,0)
 
     %Combofonctionward=$new(combobox,%serveurward)
     %Combofonctionward->$insertItem("Utilisateur")
     %Combofonctionward->$insertItem("Opérateur")
     %Combofonctionward->$insertItem("Chanmaster")
     %layoutserveurward->$addMultiCellWidget(%Combofonctionward,2,2,2,2)
   
             
    privateimpl(%Labelpseudoeditward, textChangedEvent){
    %c = $config.open("toolzbox.kvc", "w")
    config.write %c mypseudo %Labelpseudoeditward->$text()
    config.close %c
}

    privateimpl(%Labelcleeditward, textChangedEvent){
    %c = $config.open("toolzbox.kvc", "rw")
    config.write %c myirckey %Labelcleeditward->$text()
    config.close %c
}

    privateimpl(%Combofonctionward, activatedEvent){
    %c = $config.open("toolzbox.kvc", "rw")
    config.write %c ircfonction %Combofonctionward->$current()
    config.close %c
}

    %Installateur->$addpage(%serveurward,Configuration de l'utilisateur)
    %Installateur->$setHelpEnabled(%serveurward,0)
 

    %layoutautojoin=$new(layout,%autojoin)

    %listageautojoin=$new(listview,%autojoin)
    %listageautojoin->$addColumn(Salons,201)
    %layoutautojoin->$addMultiCellWidget(%listageautojoin,0,1,0,0)
    %Editageautojoin=$new(lineedit,%autojoin)
    %layoutautojoin->$addMultiCellWidget(%Editageautojoin,2,2,0,0)
    %boutonajout=$new(button,%autojoin)
    %boutonajout->$setText(Ajouter)
    %boutonajout->$setImage(257)
    %layoutautojoin->$addMultiCellWidget(%boutonajout,2,2,1,1)
    %boutondel=$new(button,%autojoin)
    %boutondel->$setText(Supprimer)
    %boutondel->$setImage(258)
    %layoutautojoin->$addMultiCellWidget(%boutondel,1,1,1,1)

    privateimpl(%boutonajout, clickEvent){
    %c = $config.open("toolzbox.kvc", "rw")
    %autojoin = autojoin
    config.write %c %autojoin++ %Editageautojoin->$text()
    config.close %c
}

    %Installateur->$addpage(%autojoin,Salons à joindre automatiquement)
 
     privateimpl(%Installateur, acceptEvent) {
       # location du fichier installeur.kvs 
    }
   
    %Installateur->$setHelpEnabled(%autojoin,0)
    %Installateur->$setFinishEnabled(%autojoin,1)
  
    %Installateur->$setFinishBtnText(Installer)
        
    %Installateur->$show()