prova a inserire questo codice nell'evento GridView1_Data
PUBLIC SUB GridView1_Data(Row AS Integer, Column AS Integer)
IF MyRS.Count THEN
IF Row <= MyRS.Max THEN
MyRS.MoveTo(Row)
GridView1.Data.Text = MyRS[Column + 1]
ENDIF
ENDIF
END
Eccomi qua... osteria che tardi! :o
Allora ho aggiunto la possibilita' di 'pilotare' la scrittura del record nelle colonne con la seguente proprieta':
TableView.Columns[<Column>].Field = Nome del campo che si vuole inserire nella colonna.
Altra 'chicca' ;) ripresa da un mio 'rozzo' tentativo di creare un foglio di calcolo: possibilita' di creare colonne con formula...
es.
TableView.Columns[<Column>].Formula = "=C(4) * 5"
in questo caso recupera il valore della cella[Riga, 4] e la moltiplica x 5 ripetuto su tutta la colonna.
Queste due proprieta' devono essere 'attivate' dalla proprieta' .Columns[<Column>].Type passandogli le seguenti costanti: Grid.Field o Grid.Formula
Per adesso funziona il tutto solo in modalita' ReadOnly... prossimamente (finito di mettere proprieta' alle colonne) faro' i vari Refresh all'inserimento dei dati...
@Golia
Il prossimo invio di sorgenti, con il tuo permesso ovviamente, volevo passare il db su sqlite3 (integrandolo nel progetto) e lasciare solo la form 'Listino' come FormTest.
Cosi' facendo anche chi non ha mysql installato puo' fare da beta testing ;)