Creare un ComboBox in una tabella e passare i suoi valori selezionati al codice Gambas

Da Gambas-it.org - Wikipedia.

Il caso in questione è quello in cui si intende inserire un ComboBox all'interno di una cella di una tabella, entrambi ovviamente generati con il codice HTML. Inoltre, si intende passare il valore di un elemento selezionato del ComboBox al codice Gambas.

Si farà uso dell'oggetto WebView, di cui si potrà disporre attivando anche il Componente gb.qt5.webview.

Riguardo al secondo obiettivo posto, poiché né protocollo HTML, né quello JavaScript consentono di salvare un contenuto in un file si procederà con uno stratagemma a scrivere il valore selezionato del ComboBox nell'oggetto WebView. Questa operazione, però, comporterà la scomparsa sia della tabella che del ComboBox precedentemente creati. Si dovrà dunque fare sì nel codice Gambas che sia la tabella che il ComboBox vengano nuovamente generati.

In un file html a parte verrà posto il seguente codice "HTML/Javascript": [nota 1] 

<html>

<head>

 <script language="javascript" type="text/javascript">

  function combo(lista) {
    var idx = lista.selectedIndex;
    var contenuto = lista.options[idx].innerHTML;

    document.write(contenuto);

  }
 </script>

</head>

<body>

 <TABLE border=1>
 <TR><TD>
  <select name="lista" onChange="combo(this)">
          <option>Selezionare</option>
     <option>alfa</option>
     <option>beta</option>
     <option>gamma</option>
     <option>delta</option>
   </select>
<TD>cella</td></tr>
<TR><TD>cella</td><TD>cella</td></tr>
</table>

</body>

</html>

Il codice Gambas usando un Componente basato sulla libreria grafica "QT"

Se è stato attivato un Componente basato sulla libreria grafica "QT", allora il codice Gambas avrà il consueto riferimento all'Oggetto WebView ed in particolare alla sua proprietà ".HTML", alla quale dovrà essere assegnato il codice, sopra descritto, contenuto nel file html e il cui risultato sarà mostrato nell'Oggetto WebView: 

Public Sub Form_Open()

  Me.Show

  codiceHtml()

End


Public Procedure codiceHtml()

' Viene raccolto il contenuto dell'elemento selezionato del "ComboBox":
 Print "Valore selezionato: "; Scan(WebView1.GetHtml(), "*body>*<*")[1]

' Carica il codice contenuto dal file html:
 WebView1.SetHtml((File.Load("/percorso/del/file.html"))

End


Public Sub Button1_Click()

' Si ripristina la tabella ed il "ComboBox" incorporato:
 codiceHtml()

End


Note

[1] Il codice HTML, volendo, potrà anche essere questo: 

<html>

<head>

 <script language="javascript" type="text/javascript">

  function combo() {
   
    var selectedCombobox = (comboForm.prova.value);

    document.write(selectedCombobox);

  }

</script>

</head>

<body>

 <TABLE border=1>
 <TR><TD>
   <select name="lista" <select id="prova" onChange="combo()">
     <option>Selezionare</option>
     <option>alfa</option>
     <option>beta</option>
     <option>gamma</option>
     <option>delta</option>
   </select>
<TD>cella</td></tr>
<TR><TD>cella</td><TD>cella</td></tr>
</table>

</body>

</html>
Estratto da "https://www.gambas-it.org/wiki/index.php?title=Creare_un_ComboBox_in_una_tabella_e_passare_i_suoi_valori_selezionati_al_codice_Gambas&oldid=36393"