Lancer un dialogue et récupérer la liste de ses contrôles

De zBasic
Aller à : navigation, rechercher
Sub Main
GlobalScope.BasicLibraries.loadLibrary ("zBasic")

	oDlg = zDial.Charge("Dialog1")
	oRetour = zDial.Lance(oDlg)
	maListe = zDial.Liste(oRetour)	
	if oRetour.Tag = 1 then zTable.Ecrit("Feuille1", "A1", maListe)

End Sub