Differenze tra le versioni di "Utilizzare il Geoportale del Servizio Geologico d'Italia dell'I.S.P.R.A."

Da Gambas-it.org - Wikipedia.
 
(8 versioni intermedie di uno stesso utente non sono mostrate)
Riga 7: Riga 7:
 
Accedere al sito dell'<I>Istituto Superiore per la Protezione e la Ricerca Ambientale</i> (I.S.P.R.A.): http://www.isprambiente.gov.it/it
 
Accedere al sito dell'<I>Istituto Superiore per la Protezione e la Ricerca Ambientale</i> (I.S.P.R.A.): http://www.isprambiente.gov.it/it
  
Nel menu presente sulla pagina cliccare sulla voce "''Servizi''".
+
- Cercare poco in basso a destra la sezione "TAG" . Quindi nell'elenco sottostante cliccare sul collegamento "''Portale Servizio Geologico''".
  
Nella nuova pagina "''Elenco Servizi''", che si apre, cliccare sul collegamento "''Servizi per l'Ambiente''".
+
- Nella nuova pagina che si apre, appartenente al ''Geoportale del Servizio Geologico d'Italia'' cliccare sul collegamento "''Geomapviewer''".
  
Nella nuova pagina "''Servizi per l'Ambiente''", che si apre, cliccare sul collegamento "''Servizio Geologico d'Italia''". <SUP>&#91;[[#Note|Nota 1]]&#93;</sup>
+
- Nella finestra a cascata, che si apre, cliccare sul collegamento del visualizzatore desiderato: "''VIEWER 2D''" oppure "''VIEWER 3D''".
  
Nella nuova pagina "''Servizio Geologico d'Italia''", che si apre, cliccare sul collegamento "''Portale del Servizio Geologico d'Italia''".
 
  
Nella nuova pagina che si apre, appartenente al ''Geoportale del Servizio Geologico d'Italia'' cliccare sul collegamento "''Geomapviewer''".
+
Un altro percorso - meno breve del precedente - è il seguente:
 +
<BR>Dopo aver effettuato l'accesso alla pagina principale del sito dell'I.S.P.R.A., nel menu lì presente cliccare sulla voce "''Servizi''".
  
Nella finestra a cascata, che si apre, cliccare sul collegamento del visualizzatore desiderato: "''VIEWER 2D''" oppure "''VIEWER 3D''".
+
- Nella nuova pagina "''Elenco Servizi''", che si apre, cliccare sul collegamento "''Servizi per l'Ambiente''".
  
Poniamo il caso che si sia cliccato su visualizzatore "''VIEWER 2D''".
+
- Nella nuova pagina, che si apre, cliccare sul collegamento "''Servizio Geologico d'Italia''". <SUP>&#91;[[#Note|Nota 1]]&#93;</sup>
 +
 
 +
- Nella nuova pagina, che si apre, cliccare sul collegamento "''Il Portale del Servizio Geologico d'Italia''".
 +
 
 +
- Nella nuova pagina che si apre, appartenente al ''Geoportale del Servizio Geologico d'Italia'' cliccare sul collegamento "''Geomapviewer''".
 +
 
 +
- Nella finestra a cascata, che si apre, cliccare sul collegamento del visualizzatore desiderato: "''VIEWER 2D''" oppure "''VIEWER 3D''".
 +
 
 +
===Aggiungere layer===
 +
Poniamo il caso che si sia cliccato su visualizzatore "''VIEWER 2D''". Per aggiungere uno o più layer alla mappa di base fare come segue:
  
====Aggiungere layer====
 
 
Nel riquadro a sinistra della nuova pagina cliccare su "''Catalogo'' ".
 
Nel riquadro a sinistra della nuova pagina cliccare su "''Catalogo'' ".
  
Riga 81: Riga 89:
  
 
====Utilizzare il codice Gambas====
 
====Utilizzare il codice Gambas====
L'immagine della mappa regionale IGM 1:25000 (anche in questo caso in bianco e nero 1 bit) potrà essere visualizzata con Gambas, richiamando la URL del Server.
+
L'immagine della mappa regionale IGM 1:25000 (anche in questo caso in bianco e nero 1 bit) potrà essere visualizzata con Gambas, richiamando la URL del Server utilizzando l'Oggetto ''WebView''.
  
Si potrà anche evitare di utilizzare l'oggetto ''WebView'', usando invece un oggetto ''ImageView'' con i Componenti ''gb.net'' e ''gb.net.curl''.
+
Si potrà anche evitare di utilizzare il Controllo ''WebView'', usando invece un Controllo ''ImageView'' con i Componenti ''gb.net'' e ''gb.net.curl'', come mostrato nel seguente esempio:
<BR>Ad esempio:
+
Private Const COPYR As String = "Mappa fornita da: © I.S.P.R.A. - Portale del Servizio Geologico d'Italia"
 
  Private Const INDIRIZZO As String = "http&#058;//sgi2.isprambiente.it/arcgis/rest/services/raster/igm25k_<FONT Color=#B22222>''lazio''</font>_wgs/ImageServer/exportImage?"
 
  Private Const INDIRIZZO As String = "http&#058;//sgi2.isprambiente.it/arcgis/rest/services/raster/igm25k_<FONT Color=#B22222>''lazio''</font>_wgs/ImageServer/exportImage?"
  Private Const COPYR As String = "Mappa fornita da: © I.S.P.R.A. - Portale del Servizio Geologico d'Italia"
+
  Private Const DPI As String = "96" <FONT Color=Gray>' ''La risoluzione nella quale l'immagine sarà mostrata''</font>
  Private f1 As Float = 1441150.00 <FONT Color=Gray>' ''La coordinata minima (massima a Ovest) di Longitudine del quadrilatero d'area considerato''</font>
+
<FONT Color=green>' ''I seguenti valori sono riferiti al sistema di coordinate <B>EPGS:3857 WGS 84/Pseudo-Mercator</b>:''</font>  <SUP>&#091;[[#Note|nota 1]]&#093;</sup>
  Private f2 As Float = 4994500.00 <FONT Color=Gray>' ''La coordinata minima (massima a Sud) di Latitudine del quadrilatero d'area considerato''</font>
+
  Private Const MAXOVEST As String = "1441150.00" <FONT Color=Gray>' ''La coordinata minima (massima a Ovest) di Longitudine del quadrilatero d'area considerato''</font>
  Private f3 As Float = 1446150.00 <FONT Color=Gray>' ''La coordinata massima a Est di Longitudine del quadrilatero d'area considerato''</font>
+
  Private Const MAXSUD As String = "4994500.00" <FONT Color=Gray>' ''La coordinata minima (massima a Sud) di Latitudine del quadrilatero d'area considerato''</font>
  Private f4 As Float = 5000000.00 <FONT Color=Gray>' ''La coordinata massima a Nord di Latitudine del quadrilatero d'area considerato''</font>
+
  Private Const MAXEST As String = "1446150.00" <FONT Color=Gray>' ''La coordinata massima a Est di Longitudine del quadrilatero d'area considerato''</font>
  Private mdf As Single = 1.5       <FONT Color=Gray>' ''Fattore d'ingrandimento della mappa visualizzata del quadrilatero d'area considerato''</font>
+
  Private Const MAXNORD As String = "5000000.00" <FONT Color=Gray>' ''La coordinata massima a Nord di Latitudine del quadrilatero d'area considerato''</font>
 +
  Private mdf As Single = 1.5         <FONT Color=Gray>' ''Fattore d'ingrandimento della mappa visualizzata del quadrilatero d'area considerato''</font>
 
  Private imageview1 As ImageView
 
  Private imageview1 As ImageView
 
   
 
   
 
   
 
   
  '''Public''' Sub Form_Open()
+
  Public Sub Form_Open()
 
    
 
    
 
   With Me
 
   With Me
Riga 111: Riga 120:
 
   Carica()
 
   Carica()
 
    
 
    
  '''End'''
+
  End
 
    
 
    
 
    
 
    
  '''Private''' Procedure Carica()
+
  Private Procedure Carica()
 
    
 
    
 
   Dim ind, s As String
 
   Dim ind, s As String
 
   Dim tp As New HttpClient
 
   Dim tp As New HttpClient
  Dim im As Image
 
 
    
 
    
   Me.Caption = "ATTENDERE IL CARICAMENTO !"
+
   Me.Title = "ATTENDERE IL CARICAMENTO !"
 
    
 
    
 
   Wait 0.3
 
   Wait 0.3
 
    
 
    
 
   ind = INDIRIZZO &
 
   ind = INDIRIZZO &
         "f=image&bbox=" & CStr(f1) & "%2C" & CStr(f2) & "%2C" & CStr(f3) & "%2C" & CStr(f4) &
+
         "dpi=" & DPI & "&f=image&bbox=" & MAXOVEST & "%2C" & MAXSUD & "%2C" & MAXEST & "%2C" & MAXNORD &
         "&imageSR=102100&bboxSR=102100&size=" &  
+
         "&imageSR=102100&bboxSR=102100&size=" &
 
         CStr(Screen.AvailableWidth * mdf) & "%2C" & CStr(Screen.AvailableHeight * mdf)
 
         CStr(Screen.AvailableWidth * mdf) & "%2C" & CStr(Screen.AvailableHeight * mdf)
 
          
 
          
Riga 133: Riga 141:
 
    
 
    
 
   tp.Close
 
   tp.Close
 
 
  im = Image.FromString(s)
 
 
    
 
    
 
   With imageview1
 
   With imageview1
 
  <FONT Color=Gray>' ''Modifica il valore del colore dello sfondo dell'immagine caricata:''</font>
 
  <FONT Color=Gray>' ''Modifica il valore del colore dello sfondo dell'immagine caricata:''</font>
     .Image = im.Replace(&FFFFFFFF&, &FFFFDF)
+
     .Image = Image.FromString(s)
 
  <FONT Color=Gray>' ''Salva l'immagine caricata della mappa in un file formato .png:''</font>
 
  <FONT Color=Gray>' ''Salva l'immagine caricata della mappa in un file formato .png:''</font>
 
     .Image.Save("/tmp/IGM.png", 100)
 
     .Image.Save("/tmp/IGM.png", 100)
 
   End With
 
   End With
 
      
 
      
   Me.Caption = COPYR & String(Me.Font.TextWidth(COPYR), Chr(32))
+
   Me.Title = COPYR & String(Me.Font.TextWidth(COPYR), Chr(32))
 
    
 
    
  '''End'''
+
  End
  
  
Riga 153: Riga 159:
 
<BR> - Nella nuova pagina "''Servizi per l'Ambiente''", che si apre, cliccare sul collegamento "''Cartografia''".
 
<BR> - Nella nuova pagina "''Servizi per l'Ambiente''", che si apre, cliccare sul collegamento "''Cartografia''".
 
<BR> - Nella nuova pagina "''Cartografia''", che si apre, cliccare sul collegamento "''Portale del Servizio Geologico d'Italia''".
 
<BR> - Nella nuova pagina "''Cartografia''", che si apre, cliccare sul collegamento "''Portale del Servizio Geologico d'Italia''".
<BR>Più agevolmente: nella pagina principale del sito dell'I.S.P.R.A. cercare poco in basso a destra la sezione "TAG" . Quindi nell'elenco sottostante cliccare sul collegamento "''Portale Servizio Geologico''".
 

Versione attuale delle 18:18, 4 gen 2024

Il Geoportale del Servizio Geologico d'Italia dell'I.S.P.R.A. è possibile consultare tutti i servizi relativi alle banche dati del Servizio Geologico d'Italia insieme ad altri strati informativi di base.


Esempio pratico dell'uso

(Questa è semplicemente una spiegazione su come usare il Geoportale del Servizio Geologico d'Italia dell'I.S.P.R.A. dal suo sito web)

Accedere al sito dell'Istituto Superiore per la Protezione e la Ricerca Ambientale (I.S.P.R.A.): http://www.isprambiente.gov.it/it

- Cercare poco in basso a destra la sezione "TAG" . Quindi nell'elenco sottostante cliccare sul collegamento "Portale Servizio Geologico".

- Nella nuova pagina che si apre, appartenente al Geoportale del Servizio Geologico d'Italia cliccare sul collegamento "Geomapviewer".

- Nella finestra a cascata, che si apre, cliccare sul collegamento del visualizzatore desiderato: "VIEWER 2D" oppure "VIEWER 3D".


Un altro percorso - meno breve del precedente - è il seguente:
Dopo aver effettuato l'accesso alla pagina principale del sito dell'I.S.P.R.A., nel menu lì presente cliccare sulla voce "Servizi".

- Nella nuova pagina "Elenco Servizi", che si apre, cliccare sul collegamento "Servizi per l'Ambiente".

- Nella nuova pagina, che si apre, cliccare sul collegamento "Servizio Geologico d'Italia". [Nota 1]

- Nella nuova pagina, che si apre, cliccare sul collegamento "Il Portale del Servizio Geologico d'Italia".

- Nella nuova pagina che si apre, appartenente al Geoportale del Servizio Geologico d'Italia cliccare sul collegamento "Geomapviewer".

- Nella finestra a cascata, che si apre, cliccare sul collegamento del visualizzatore desiderato: "VIEWER 2D" oppure "VIEWER 3D".

Aggiungere layer

Poniamo il caso che si sia cliccato su visualizzatore "VIEWER 2D". Per aggiungere uno o più layer alla mappa di base fare come segue:

Nel riquadro a sinistra della nuova pagina cliccare su "Catalogo ".

Nella finestra di dialogo, che si apre, cliccare su "Raster Data ".

Nella lista delle opzioni, che si estende, cliccare ad esempio su "Raster Topografia IGM 1:25000 ", per poter visualizzare anche la cartografia topografica IGM 1:25000.

Nella sub-lista, che si estende, cliccare sulla Regione italiana desiderata;

Nel riquadro che si mostra a destra cliccare in alto sul rettangolo ove c'è scritto "Aggiungi a mappa ".

La mappa topografica IGM 1:25000 sarà aggiunta e mostrata nella mappa del visualizzatore.

Modificare lo zoom per vedere correttamente la carta topografica IGM 1:25000 sovrapposta alla mappa di base mostrata dal visualizzatore.

Per cambiare mappa di base, cliccare sull'icona degli strumenti posta in alto a destra e denominata "Galleria mappe di base ".

Altro modo per aggiungere layer

E' possibile aggiungere altri layer cliccando sul tasto virtuale "Aggiungi ", posto nel riquadro di sinistra.
Nella finestra, che si mostra, attivare la scheda a sinistra "ArcGIS Online", attivare lo switch "All'interno della mappa " (deve essere verde), nel ComboBox, chiamato "Tipo ", attivare solo l'opzione "WMS ", introdurre nel campo testuale a destra la parola "igm" e avviare la ricerca cliccando sul classico simbolo della lente di ingrandimento a destra.

Quindi premere "AGGIUNGI" nel riquadro apparso e avente la didascalia: "Cartografia di base - IGM 25.000".

La mappa sarà aggiunta ai layer e visibile nel riquadro posto a sinistra della pagina.

Inserire un layer usando la URL del WMS Server

Per inserire un layer usando la URL del WMS Server, cliccare al centro sulla scheda "URL"" e nel ComboBox, posto sotto la voce "Tipo", scegliere l'opzione "Un servizio WEB OGC WMS".
Inserire quindi nell'apposito spazio "URL" la URL del WMS Server dalla mappa IGM 1:25.000, che interessa, e cliccare sul tasto vistuale "AGGIUNGI" posto a destra.


Altra modalità di visualizzazione a due layer

Un'altra modalità può essere utilizzata come segue:

quando ci si trova nella finestra di dialogo "Catalogo", contenente la lista delle Regioni, individuare la Regione desiderata e cliccare a destra sull'icona, ove sono rappresentati due ingranaggi e che ha come tooltip la descrizione "End point del servizio".

Nella nuova pagina, che si apre, sulla riga della voce "View In:" cliccare sul collegamento "ArcGIS.com Map".


Visualizzare soltanto la mappa IGM 1:25000

Per visualizzare soltanto la mappa IGM 1:25000 (quindi senza altra mappa di base), quando ci si trova nella finestra di dialogo "Catalogo", contenente la lista delle Regioni, individuare la Regione desiderata e cliccare a destra sull'icona, ove sono rappresentati due ingranaggi e che ha come tooltip la descrizione "End point del servizio".

Nella nuova pagina, che si apre, sulla riga della voce "View In:" cliccare sul collegamento "ArcGIS JavaScript".

Nella nuova pagina, che si apre, l'immagine mostrata della mappa IGM 1:25000 della Regione prescelta può essere ingrandita, nonché spostata con il mouse.

L'immagine della mappa è in bianco e nero 1 bit.


Una modalità rapida, evitando tutti i passaggi sopra descritti, è copiare e lanciare direttamente il seguente indirizzo web nel proprio browser

http://sgi2.isprambiente.it/arcgis/rest/services/raster/igm25k_regione_wgs/ImageServer?f=jsapi

avendo cura di sostituire la parola "regione", qui scritta in rosso, con la regione prescelta in lettere tutte minuscole.

Accedere direttamente alla pagina ImageServer del portale

Per utilizzare i predetti servizi web "ArcGIS.com Map" e "ArcGIS JavaScript", è possibile accedere velocemente alla pagina ImageServer relativa alla Regione desiderata, lanciando nel proprio browser il seguente indirizzo:

http://sgi2.isprambiente.it/arcgis/rest/services/raster/igm25k_regione_wgs/ImageServer

avendo cura di sostituire la parola "regione", qui scritta in rosso, con la regione prescelta in lettere tutte minuscole.

L'immagine della mappa è in bianco e nero 1 bit.

Utilizzare il codice Gambas

L'immagine della mappa regionale IGM 1:25000 (anche in questo caso in bianco e nero 1 bit) potrà essere visualizzata con Gambas, richiamando la URL del Server utilizzando l'Oggetto WebView.

Si potrà anche evitare di utilizzare il Controllo WebView, usando invece un Controllo ImageView con i Componenti gb.net e gb.net.curl, come mostrato nel seguente esempio:

Private Const COPYR As String = "Mappa fornita da: © I.S.P.R.A. - Portale del Servizio Geologico d'Italia"
Private Const INDIRIZZO As String = "http://sgi2.isprambiente.it/arcgis/rest/services/raster/igm25k_lazio_wgs/ImageServer/exportImage?"
Private Const DPI As String = "96" ' La risoluzione nella quale l'immagine sarà mostrata
' I seguenti valori sono riferiti al sistema di coordinate EPGS:3857 WGS 84/Pseudo-Mercator:  [nota 1]
Private  Const MAXOVEST As String = "1441150.00" ' La coordinata minima (massima a Ovest) di Longitudine del quadrilatero d'area considerato
Private Const MAXSUD As String = "4994500.00" ' La coordinata minima (massima a Sud) di Latitudine del quadrilatero d'area considerato
Private Const MAXEST As String = "1446150.00" ' La coordinata massima a Est di Longitudine del quadrilatero d'area considerato
Private Const MAXNORD As String = "5000000.00" ' La coordinata massima a Nord di Latitudine del quadrilatero d'area considerato
Private mdf As Single = 1.5         ' Fattore d'ingrandimento della mappa visualizzata del quadrilatero d'area considerato
Private imageview1 As ImageView


Public Sub Form_Open()
 
 With Me
   .W = Screen.AvailableWidth
   .H = Screen.AvailableHeight
   .Arrangement = Arrange.Fill
   .Show
 End With
 
 With imageview1 = New ImageView(Me)
   .X = 0
   .Y = 0
 End With
 
 Carica()
 
End
 
 
Private Procedure Carica()
 
 Dim ind, s As String
 Dim tp As New HttpClient
  
 Me.Title = "ATTENDERE IL CARICAMENTO !"
 
 Wait 0.3
 
 ind = INDIRIZZO &
       "dpi=" & DPI & "&f=image&bbox=" & MAXOVEST & "%2C" & MAXSUD & "%2C" & MAXEST & "%2C" & MAXNORD &
       "&imageSR=102100&bboxSR=102100&size=" &
       CStr(Screen.AvailableWidth * mdf) & "%2C" & CStr(Screen.AvailableHeight * mdf)
       
 tp.Timeout = 15
 s = tp.Download(ind)
 
 tp.Close
 
 With imageview1
' Modifica il valore del colore dello sfondo dell'immagine caricata:
   .Image = Image.FromString(s)
' Salva l'immagine caricata della mappa in un file formato .png:
   .Image.Save("/tmp/IGM.png", 100)
 End With
   
 Me.Title = COPYR & String(Me.Font.TextWidth(COPYR), Chr(32))
 
End


Note

[1] Da questo punto in alternativa è possibile seguire il seguente itinerario di collegamenti:
- Nella nuova pagina "Servizi per l'Ambiente", che si apre, cliccare sul collegamento "Cartografia".
- Nella nuova pagina "Cartografia", che si apre, cliccare sul collegamento "Portale del Servizio Geologico d'Italia".