Differenze tra le versioni di "Inserire dati con un InputBox mediante codice HTML"

Da Gambas-it.org - Wikipedia.
Riga 1: Riga 1:
−
E' possibile ottenere l'apertura della finestra di un ''Prompt'' (ossia di ''InputBox''), assegnando alla Proprietà ".HTML" dell'Oggetto ''WebView'' il codice di un file ".html" avente il seguente tenore:
+
E' possibile ottenere l'apertura della finestra di un ''Prompt'' (ossia di ''InputBox''), assegnando alla Proprietà ".HTML" dell'Oggetto ''WebView'' un codice ''html'' avente il seguente tenore:
 
  <HTML>
 
  <HTML>
−
+
   <BODY>
−
   <HEAD>
 
 
   
 
   
 
   <SCRIPT>
 
   <SCRIPT>
Riga 12: Riga 11:
 
   </script>
 
   </script>
 
   
 
   
−
   </head>
+
   </body>
−
 
 
  </html>
 
  </html>
  
 
====Il codice Gambas usando un Componente basato sulla libreria grafica "QT"====
 
====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'':
+
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 html sopra descritto.
−
WebView1.HTML = File.Load("<FONT color=gray>''/percorso/del/file.html''</font>")
+
 
−
Non è necessario che l'oggetto ''WebView'' sia visibile, o sia comunque effettivamente presente sul ''Form'', è sufficiente che sia inizializzato e che sia impostata la sua proprietà ''.HTML'' con l'indirizzo del file ''.html''.
+
Mostriamo un esempio:
−
<BR>Pertanto nel codice Gambas si potrà anche impostare l'oggetto ''WebView'' anche solo  così:
+
  Private WebView1 As WebView
−
  Private vw As WebView
 
 
   
 
   
 
   
 
   
 
  '''Public''' Sub Form_Open()
 
  '''Public''' Sub Form_Open()
 
   
 
   
−
   Dim s As String
+
   WebView1 = New WebView(Me)
 +
 +
'''End'''
 +
 +
'''Public''' Sub Button1_Click()
 
   
 
   
−
   With vw = New WebView(Me)
+
   WebView1.HTML = "<HTML><BODY>" &
−
    .HTML = File.Load("<FONT color=gray>''/percorso/del/file.html''</font>")
+
                  "&lt;SCRIPT>" &
 +
                  "var p = prompt('Inserisci il dato:');" &
 +
                  "document.write(p);" &
 +
                  "</script>" &
 +
                  "</body></html>"
 +
 +
<FONT Color=gray>' ''Raccoglie il dato immesso nel "Prompt" e lo assegna ad esempio a una "TextLabel":''</font>
 +
  TextLabel1.Text = WebView1.Text
 +
 +
'''End'''
 +
Come sopra mostrato, non è necessario che l'oggetto ''WebView'' sia visibile, o sia comunque effettivamente presente sul ''Form'', è sufficiente che sia inizializzato e che sia impostata la sua proprietà ''.HTML'', alla quale assegnare il predetto codice ''html''.
 +
 
 +
====Il codice Gambas usando un Componente basato sulla libreria grafica "GTK"====
 +
Se è stato attivato un Componente basato sulla libreria grafica "GTK", allora nel codice Gambas si utilizzerà il Metodo ".SetHtml()" della Classe ''WebView'', al quale andrà passato, come argomento, il codice ''html'':
 +
Private WebView1 As WebView
 +
 +
 +
'''Public''' Sub Form_Open()
 +
 +
<FONT Color=gray>' ''Con la risorsa grafica "GTK" è necessario attribuire al "WebView" una sufficiente dimensione:''</font>
 +
  With WebView1 = New WebView(Me)
 +
    .X = 0
 +
    .Y = 0
 +
    .W = Me.W * 0.5
 +
    .H = Me.H
 
   End With
 
   End With
−
 
−
<FONT color=gray>' ''Dopo aver cliccato sul tasto "OK" della finestra del "Prompt" (ossia dell'<I>InputBox</i>), creato con "JavaScript", il codice Gambas proseguirà a svolgersi... ad esempio:''</font>
 
−
  Print "Questa è una prova."
 
 
   
 
   
 
  '''End'''
 
  '''End'''
Riga 39: Riga 61:
 
  '''Public''' Sub Button1_Click()
 
  '''Public''' Sub Button1_Click()
 
   
 
   
−
<FONT color=gray>' ''Nella "TextLabel" sarà mostrato il valore inserito nel ''prompt'':</font>
+
  WebView1.SetHtml("<HTML><BODY>" &
−
    TextLabel1.Text = vw.Text
+
                  "&lt;SCRIPT>" &
 +
                  "var p = prompt('Inserisci il dato:');" &
 +
                  "document.write(p);" &
 +
                  "</script>" &
 +
                  "</body></html>")
 
   
 
   
 
  '''End'''
 
  '''End'''
−
 
−
====Il codice Gambas usando un Componente basato sulla libreria grafica "GTK"====
 
−
Se è stato attivato un Componente basato sulla libreria grafica "GTK", allora nel codice Gambas si utilizzerà il Metodo ".SetHtml()" della Classe ''WebView'', al quale andrà passato, come argomento, il codice contenuto nel file html:
 
−
WebView1.SetHtml(File.Load("<FONT color=gray>''/percorso/del/file.html''</font>"))
 

Versione delle 11:59, 31 dic 2021

E' possibile ottenere l'apertura della finestra di un Prompt (ossia di InputBox), assegnando alla Proprietà ".HTML" dell'Oggetto WebView un codice html avente il seguente tenore: 

<HTML>
 <BODY>

  <SCRIPT>

    var p = prompt('Inserisci il dato:');
// Scrive il dato nella WebView:
    document.write(p);

  </script>

 </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 html sopra descritto.

Mostriamo un esempio: 

Private WebView1 As WebView


Public Sub Form_Open()

 WebView1 = New WebView(Me)

End

Public Sub Button1_Click()

 WebView1.HTML = "<HTML><BODY>" &
                 "<SCRIPT>" &
                 "var p = prompt('Inserisci il dato:');" & 
                 "document.write(p);" &
                 "</script>" &
                 "</body></html>"

' Raccoglie il dato immesso nel "Prompt" e lo assegna ad esempio a una "TextLabel":
 TextLabel1.Text = WebView1.Text

End

Come sopra mostrato, non è necessario che l'oggetto WebView sia visibile, o sia comunque effettivamente presente sul Form, è sufficiente che sia inizializzato e che sia impostata la sua proprietà .HTML, alla quale assegnare il predetto codice html.

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

Se è stato attivato un Componente basato sulla libreria grafica "GTK", allora nel codice Gambas si utilizzerà il Metodo ".SetHtml()" della Classe WebView, al quale andrà passato, come argomento, il codice html: 

Private WebView1 As WebView


Public Sub Form_Open()

' Con la risorsa grafica "GTK" è necessario attribuire al "WebView" una sufficiente dimensione:
 With WebView1 = New WebView(Me)
   .X = 0
   .Y = 0
   .W = Me.W * 0.5
   .H = Me.H
 End With

End

Public Sub Button1_Click()

 WebView1.SetHtml("<HTML><BODY>" &
                 "<SCRIPT>" &
                 "var p = prompt('Inserisci il dato:');" & 
                 "document.write(p);" &
                 "</script>" &
                 "</body></html>")

End
Estratto da "https://www.gambas-it.org/wiki/index.php?title=Inserire_dati_con_un_InputBox_mediante_codice_HTML&oldid=30115"