Gambas-it

Gambas3 => Programmazione => Topic aperto da: allegfede - 26 Marzo 2013, 16:42:12

Titolo: [RISOLTO] Columnview questa sconosciuta (per me ...)
Inserito da: allegfede - 26 Marzo 2013, 16:42:12

domanda dell'ultimo minuto per quelli veramente nabbi come me .....

perche' questo codice non funziona (le textbox rimangono vuote anche se la column view e' piena):

Dim Indice As Integer
Try Indice = ColumnView_Media.Current.Key
If Error Then Return

Form_Edit.Load
'Message.Info("indice=" & Indice, "OK")
Form_Edit.Label_id.Text = Indice
Form_Edit.TextBox_Programma.Text = ColumnView_Media.Item[1]
Form_Edit.TextBox_Stagione.Text = ColumnView_Media.Item[2]
Form_Edit.TextBox_Episodio.Text = ColumnView_Media.Item[3]
Form_Edit.TextBox_Durata.Text = ColumnView_Media.Item[4]
Form_Edit.TextBox_Taglist.Text = ColumnView_Media.Item[5]
Form_Edit.DrawingArea_Preview.Tag = ColumnView_Media.Item[6]
Form_Edit.Show


mentre questo si?

Dim Comando As String = "select * from Programs_episodes"
Dim $Con As New Connection
Dim Risultato As Result
  
  $Con.close()                  ' Close the connection
  $Con.Type = "MySQL"           ' Type of connection
  $Con.Host = DB_server_IP   ' Name of the server
  $Con.Login = DB_server_DBuser    ' User's name for the connection
  $Con.Port = DB_server_Port       ' Port to use in the connection, usually 3306
  $Con.Name = DB_server_DBname    ' Name of the database we want to use
  $Con.Password = DB_server_DBpass ' User's password
  
  Risultato = $Con.Exec(comando)
  
  For Each Risultato
  
    ColumnView_Media.Add(Risultato!id, Risultato!id, PictureBox_OK.Picture)
    ColumnView_Media.Item[1] = Risultato!program
    ColumnView_Media.Item[2] = Risultato!season
    ColumnView_Media.Item[3] = Risultato!episode_name
    ColumnView_Media.Item[4] = Somma(Risultato!Parts)
    ColumnView_Media.Item[5] = Risultato!Tags
    ColumnView_Media.Item[6] = Risultato!episode_path
    
  Next

come al solito ringrazio anticipatamente :D

Titolo: Re: Columnview questa sconosciuta (per me ...)
Inserito da: Picavbg - 26 Marzo 2013, 17:53:14

Dovresti essere più preciso. Dove ti da errore?  Qual'è l'errore che ti segnala?
 :ciao:

Titolo: Re: Columnview questa sconosciuta (per me ...)
Inserito da: allegfede - 26 Marzo 2013, 18:15:10

non c'e' errore di compilazione .... semplicemente riesco ad indirizzare le singole subitems (come di diceva in VB) in fase di assegnazione del valore (quando leggo dal DB), mentre quando leggo i subitems per passarli a dei textbox il contenuto sembra vuoto (tranne ColumnView_Media.Item[6] = Risultato!episode_path che invece ha il contenuto giusto) 8-|

misterooooooo

Titolo: Re: Columnview questa sconosciuta (per me ...)
Inserito da: Picavbg - 26 Marzo 2013, 19:10:22

Sei proprio sicuro che il contenuto di riferimento nella ColumnView sia diverso da NULL?
Non ho ancora utilizzatto le CoumnView, quindi non ne conosco le caratteristiche.
Vorrei suggerirti intanto di migliorare anche un pò la leggibilità di quanto codifichi quando lavori su oggetti con più proprietà o metodi:

Codice: gambas [Seleziona]

Form_Edit.Load
Wait 0.1          'Prima di fare proseguire il programma aspetterei la fine del caricamento della Form
'Message.Info("indice=" & Indice, "OK")
With Form_Edit
            .Text = Indice
            .TextBox_Programma.Text = ColumnView_Media.Item[1]
            .TextBox_Stagione.Text = ColumnView_Media.Item[2]
            .TextBox_Episodio.Text = ColumnView_Media.Item[3]
            .TextBox_Durata.Text = ColumnView_Media.Item[4]
            .TextBox_Taglist.Text = ColumnView_Media.Item[5]
            .DrawingArea_Preview.Tag = ColumnView_Media.Item[6]
            .Show

Dal codice che hai riportato sembra che tu svolga il lavoro di caricamento delle TextBox appartenenti alla Form_Edit fuori dalla stessa e  prima di valorizzare la ColumnView. In quale Form si trova la ColumnView?
 :ciao:

Titolo: Re: Columnview questa sconosciuta (per me ...)
Inserito da: allegfede - 26 Marzo 2013, 21:24:10

si e' vero ... il contenuto viene infilato sul form edit da quello che lo carica ;-)

Titolo: Re: Columnview questa sconosciuta (per me ...)
Inserito da: Picavbg - 27 Marzo 2013, 00:29:37

Vedo che non hai risposto a tutte le mie domande. Ti dispiacerebbe allegare il programma così che io possa capire meglio cosa accade?
 :ciao:

Titolo: Re: Columnview questa sconosciuta (per me ...)
Inserito da: allegfede - 28 Marzo 2013, 19:19:54

scusa ero di fretta e ho "velocizzato" la risposta.

Diciamo che il succo del discorso e' che all'avvio del programma questo prova a connettersi al DB e se la connessione riesce carica i dati relativi agli ultimi inseriementi nella columnview del FMain.form ..... selezionando una riga e premendo il pulsante EDIT si dovrebbero riempire i controlli textbox del form Form_edit.form con i dati opportuni.

Il problema e' che stranamente riesco ad "indirizzare" i subitems della singola riga del columnview in fase di inseriemnto dei dati prelevati dal DB nella riga.
Ma quando rileggo i singoli subitems questi sembrano vuoti "" tranne il subitem 6 ( .DrawingArea_Preview.Tag = ColumnView_Media.Item[6]  ) che ha il contenuto giusto .......

PS: il form_edit ha i controlli in pubblic come suggerito da vuott (perche' altrimenti non erano raggiungibili dall'esterno della classe :D)

PPS: se ci riesco metto il sorgente in attach

Titolo: Re: Columnview questa sconosciuta (per me ...)
Inserito da: allegfede - 28 Marzo 2013, 19:36:07

[RISOLTO]

come al solito era semplice ... sapendolo :D

i dati dalla columnview si estraggono cosi':

variabile=columnview[valoredellachiave][indicedellacolonna]

in attach il codice modificato ;-)