Visualizza post

Questa sezione ti permette di visualizzare tutti i post inviati da questo utente. N.B: puoi vedere solo i post relativi alle aree dove hai l'accesso.


Post - aulin

Pagine: 1 2 [3] 4 5 6
31
Programmazione / Re: Hide form chiamante
« il: 22 Novembre 2010, 00:28:24 »
Va leggermente meglio, ma ora quando provo a chiudere la FChiamata non me la chiude.
La logica che vorrei ottenere sarebbe questa:
Avere la Fmain sempre sullo sfondo
da Fmain --> Form1
           da       Form1 --> Form2 rendendo hide la Form1
quando chiudo la Form2 rendere hide la form2 e rendere nuovamente visibile la Form1 con i dati precedentemente inseriti.



32
Programmazione / Re: Hide form chiamante
« il: 21 Novembre 2010, 22:30:18 »
Tentativo fallito. Invalid Object

33
Programmazione / Hide form chiamante
« il: 21 Novembre 2010, 20:08:48 »
Ho pensato di non far visualizzare la form chiamante.Tipo :
Codice: [Seleziona]
 Me.Hide
     ProgettoTotVis.ShowModal
 Me.Show
Risultato : Me.hide funziona, visualizzo correttamente  ProgettoTotVis.ShowModal però non riesco a ridare il controllo al form chiamante.
Torna addirittura al Main.
Ho provato anche
Codice: [Seleziona]
NomeForm1.Hide
     ProgettoTotVis.ShowModal
NomeForm1.Show
Stesso risultato.
Si può operare in questo modo?

34
Programmazione (Gambas 2) / Re: Creazione programma per "filtrare"
« il: 10 Novembre 2010, 12:08:08 »
Vista così mi da + l'impressione di essere una matrice. La faccenda si complica.

35
Progetti degli utenti / Indicizzazione documenti
« il: 09 Novembre 2010, 17:57:30 »
Vorrei gestire un progetto che indicizzasse alcuni documenti presenti nel disco.
Qualcuno ha realizzato qualcosa del genere?
Cercasi compagni di avventura.
Forse non è il luogo giusto ma non sapevo dove inserirlo.

36
Programmazione / warning: unable to load Qt translation: it_IT.utf8
« il: 20 Ottobre 2010, 14:03:41 »
Ho scaricato l'ultima versione di gambas3,ed ho osservato che mi ha cambiato la risoluzione del video e quindi sono costretto a riguardare tutte le form.
Inoltre eseguo il programma mi tira fuori questo warning. E' solo un warning, ma da fastidio averlo sempre tra i piedi. Si può eliminare?
E comunque grazie per la collaborazione.

37
Programmazione / Re: DataView e DataControl
« il: 08 Ottobre 2010, 18:51:31 »
di quale componente stiamo parlando ??

38
Programmazione / DataView e DataControl
« il: 08 Ottobre 2010, 10:10:35 »
E' possibile gestire i DataControl insieme al DataView, vale a dire utilizzare il dataView come se fosse un DataBrowser? Più specificatamente utilizzando l'evento Activate del DataView  :hard:e definendo il nome del campo nel DataControl posso ottenere la visualizzazione del contenuto del campo ? Nel caso si potesse realizzare, come faccio poi a salvare le modifiche. A me non funziona.

39
Programmazione / Re: Associare tasto a bottone
« il: 05 Ottobre 2010, 11:32:07 »
Ragazzi ho trovato la soluzione e funziona perfettamente, spesso chi cerca trova. C'è solo un piccolo problema. Non riesco a capire cosa effettivamente fanno. C'è qualcuno così cortese da farmi comprendere l'arcano del funzionamento di queste routines??

Codice: [Seleziona]

Public Sub BTN_Su_Click()
 Dim sRiga As String

  ' remove the highlight
  ColumnView1.Current.Selected = False

  ' do the reposition
  If Not ColumnView1.MovePrevious() Then
    ' is done, get the key
    sRiga = ColumnView1.Item.Key

    ' highlight the new item by key
    ColumnView1[sRiga].Selected = True
  Endif 

End

Public Sub BTN_Giu_Click()
Dim sRiga As String

  ColumnView1.Current.Selected = False
  If Not ColumnView1.MoveNext() Then
    sRiga = ColumnView1.Item.Key
    ColumnView1[sRiga].Selected = True
  Endif

End


40
Programmazione / Re: Associare tasto a bottone
« il: 04 Ottobre 2010, 22:41:05 »
Certo che potrebbe, ma siccome ho paginato i dati, questa possibilità è stata esclusa.

41
Programmazione / Re: Associare tasto a bottone
« il: 04 Ottobre 2010, 19:45:56 »
Devo riaprire il messaggio perchè il funzionamento del ColumView.Current.Above / Before è alquanto particolare.
MI scala infatti le righe della CV avanzando si il cursore, ma mettendo poi la riga dove avrebbe dovuto posizionarsi alla prima riga del CV.
Quindii si sposta il cursore verso il basso, ma la riga viene messa all'inizio. Boh !!!!

42
Programmazione / Re: Associare tasto a bottone
« il: 04 Ottobre 2010, 17:29:35 »
Grazie Surf.
Ho visto che i 2 metodi da te propostie associati al bottone permettono di gestire l'avanzamento di riga nella ColumnView.
Incrociamo le dita.

43
Programmazione / Re: Associare tasto a bottone
« il: 04 Ottobre 2010, 16:48:50 »
L'idea era quella di realizzare un gestore di kiosko. L'utente interagisce col touch screen senza tastiera, esclusivamente tramite la pressione di bottoni che permettono di visualizzare dati. Nella ColumnView riesco a gestire tranquillamente la pagina avanti e pagina indietro per visualizzare dati, ma se volessi cliccare sulla riga i-esima dovrei scendere giu col tasto freccia in giu ( o mouse down ?).
A questo punto dovrei inserire un bottone che simuli il tasto freccia in giu. Se ho ben capito i controlli interni al ColumnView sono riferiti agli item della riga e non riesco ad associare alcun evento per far avanzare la riga premendo un bottone.
Spero di essere stato chiaro.

44
Programmazione / [RISOLTO] Associare tasto a bottone
« il: 04 Ottobre 2010, 10:24:49 »
Se avessi un monitor touch screen e volessi associare un tasto ad un bottone si potrebbe fare?
Vale a dire cliccando sul bottone ottenere lo stesso effetto che se avessi premuto il tasto vero.

45
Programmazione / Re: Stampa con versione 2.99
« il: 18 Settembre 2010, 23:59:19 »
Non ho ancora chiuso la discussione perchè non riesco ancora a far funzionare la stampante.
Sistemao ticamente mi tira fuori un foglio miseramente bianco.
Allego un banale sorgente non funzionante.

Codice: [Seleziona]

Public Sub BTN_Chiudi_Click()
  Me.Close
End

Public Sub Form_Open()
End

Public Sub BTN_Stampa_Click()
Me.Printer1.Configure
 Me.printer1.Print

'  Printer1_Begin()
'  Printer1_Draw()
'  Printer1_End()
  
End

Public Sub Printer1_Begin()
End

Public Sub Printer1_End()
End

Public Sub Printer1_Draw()
Dim Messaggio As String
  Messaggio = "Res: " & Str(printer1.Resolution) & ", Width: " & Str(printer1.PaperWidth) & ", Height: " & Str(printer1.PaperHeight)  
   message.Info(Messaggio)                        
  Paint.Font.Name = "Sans"
  Paint.Font.Size = 90
  Paint.Font.Bold = True
  Paint.MoveTo(10, 135)
  Paint.Text("Hello kdjgh gkjh kghdf kgjh kgh kjgh kjh kh k kh khkh")
Paint.End
End

Pagine: 1 2 [3] 4 5 6