Qwertj (Dev Team)
Guru
Messaggi: 678
Iscritto: 30/05/2011
|
Si chiama programmazione...
|
|
zerg (Normal User)
Rookie
Messaggi: 48
Iscritto: 13/11/2009
|
Non mi entra prorpio in testa il ragionamento OO, ho fatto qualche programma in VB6 per la gestione i un magazzino, era anche diventato abbastanza grande, ma ora mi trovo in grossa difficoltà con l'OO.
Per esempio, la misura della distanza, l'ho implementata, ma la latitudine e longitudine la stò passando io, invece devo prenderla nel file xml e tutta una serie di cose che si traducono in (Non sò programmare ad oggetti)
|
|
Qwertj (Dev Team)
Guru
Messaggi: 678
Iscritto: 30/05/2011
|
Se devi semplicemente usare delle classi (e non progettarti tu un'architettura del software OOP) non vedo la difficoltà.
Praticamente invece di chiamare
Codice sorgente - presumibilmente Plain Text |
Usi
Codice sorgente - presumibilmente Plain Text |
Per il resto si comportano come struct del C (insiemi di valori) |
|
zerg (Normal User)
Rookie
Messaggi: 48
Iscritto: 13/11/2009
|
Grazie intanto per la pazienza, leggendo quà e là comincio a capire qualcosa, innanzitutto posto il codice per la ricerca di un waypoint il quale poi dovrà essere ciclato per la misura della distanza.
Codice sorgente - presumibilmente VB.NET |
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim file As XElement = XElement. Load(Application. StartupPath + "\esempio.xml") Dim query As IEnumerable (Of XElement ) = From el In file.<placemark> Where el.<name>. Value = TextBox1. Text Select el For Each el As XElement In query MsgBox(el.@name) Next End Sub
|
Il codice mi sembra corretto, solo che il MsgBox non parte, quindi presumo che ho sbagliato, perchè non lo trova
Ultima modifica effettuata da zerg il 01/06/2012 alle 11:39 |
|
Qwertj (Dev Team)
Guru
Messaggi: 678
Iscritto: 30/05/2011
|
Ti stai complicando un po' la vita. Basta che fai:
Codice sorgente - presumibilmente VB.NET |
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim file As String = IO. File. ReadAll(Application. StartupPath + "\esempio.xml") Dim reg As New Regex("<coordinates>(?<coord>(-|+)\d+\.\d+,(-|+)\d+\.\d+)</coordinates>") Dim matches As MatchCollection = reg. Matches(file) If matches.Count > 0 Then MessageBox.Show("coordinate waypoint: " & matches(0).Groups("coord").Value) Else MessageBox.Show("nessun waypoint") End If End Sub
|
Se c'è qualcosa che non va prova con una regex più generale, tipo
Codice sorgente - presumibilmente Plain Text |
<coordinates>(?<coord>[+\-0-9\.,])</coordinates>
|
|
|
zerg (Normal User)
Rookie
Messaggi: 48
Iscritto: 13/11/2009
|
possibile che rporpio non ci riesco?
dato questo codice:
Codice sorgente - presumibilmente VB.NET |
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load 'Carica il documento Dim doc As XDocument = XDocument.Load(Application.StartupPath + "\esempio.xml") 'Estrae tutti gli elementi <name> <coordinates> <description> <when> contenuti nell'elemento <Document> Dim risultato = From pippo In doc...<document> Select New With { .nome = pippo.Element("name").Value(), .coordinate = pippo.Element("coordinates").Value(), .descrizione = pippo.Element("description").Value(), .data_ora = pippo.Element("when").Value() } Dim source As New BindingSource source.DataSource = risultato.ToList BindingNavigator1.BindingSource = source DataGridView1.DataSource = source End Sub
|
il datagrid sembra che lo popola, infatti le colonne mi vengono intestate e non vedo i dati, ma la bindingnavigator è vuota, invece se al posto di risultato.ToList, metto ToString, la binding navigator mi dice che ne ha trovati 160, mentre la datagrid rimane vuota.
Qualcuno sa darmi una risposta?
Se riesco a portare i risultati dentro la datagrid, poi le ricerche varie son facili da effettuare.
Ultima modifica effettuata da zerg il 11/06/2012 alle 16:24 |
|