[Completato] Programma gestionale vendite ordini consegne

[Golia]

Grazie, gentilissimo :cappello:

[fsurfing]

 GridView1[myrow, 1].Background = &H7FFFFF&
 GridView1[myrow, 2].Background = &H7FFFFF& ....

ricordo a tutti che gambas offre l' opportunità di selezionare un colore (circa una trentina mi pare)tramite delle costanti , ad esempio il bianco è

color.wite

il nero: color.black
blu chiaro: color.lightblue
blu scuro: color.darkblue
blu: color.blue

ecc ecc

personalmente io lo trovo molto più comodo se non si deve ricercare una particolare tonalita di colore

[Golia]

Si è molto più comodo, grazie non lo sapevo

[Golia]

Ciao, volevo fare un combobox autocompletante.
Cioè quando comincio a scrivere mi ricerca e mi completa la parola che ho in lista.
Riempio il combobox cosi:

Codice: [Seleziona]

   MyRS = MODMain.$conn.Exec("select * from fornitori order by fornitore")                   
   IF MyRS.Available = TRUE THEN
         tbfornitore.clear 
       MyRS.movefirst 
     FOR i2 = 0 TO Myrs.count - 1
         tbfornitore.add(MyRS!fornitore, i2)
         MyRS.movenext
      NEXT
   ENDIF

Ciao grazie

[Golia]

Ho fatto qualcosa riguardo la combobox autocompletante.
Intanto non ci vuole una combobox ma un testbox.
Ecco questo è il codice che ho fatto fino adesso, funziona abbastanza bene.

Codice: [Seleziona]

PUBLIC SUB tbauto_Change()
DIM sql AS String
DIM p AS Integer
DIM myfiltro AS String
DIM risu AS String
DIM lungrisu AS Integer
p = tbauto.Pos
 IF p > 0 THEN 
  myfiltro = Left$(tbauto.Text, p)
  sql = "select * from clienti WHERE " 
  sql = sql & "cognome  LIKE '%" & myfiltro & "%'" "  "
  sql = sql & "order by cognome"             
  MyRS = MODMain.$conn.Exec(sql)                    
      IF MyRS.Available = TRUE THEN
        MyRS.movefirst
        risu = MyRS!cognome 
        lungrisu = Len(risu)
        tbauto.Text = myfiltro & Right$(risu, (lungrisu - p))
        tbauto.Pos = p
        ELSE 
        tbauto.Text = myfiltro
        tbauto.Pos = p
      ENDIF 
  ENDIF 
END

Ha questo problema:
Se cerco un cognome es. Rossi, digitanto "r" prima di darmi Rossi mi trova altri cognome con la lettera "r" che non è per forza la prima lettera, esempio "baraldi" dandomi questo risultato quà "raraldi"
Avete qualche idea di come risolvere questo errore?
Ciao grazie

[fsurfing]

togli il segno % davanti a myfiltro.


come hai scritto tu cerca il valore di myfiltro con qualsiasi cosa ci sia davanti o dietro

[Golia]

Grazie Fsurfing, sono proprio un testone :oops:

[Golia]

Ciao, volevo chiedere se qualcuno ha tempo per farmi le maschere per i ringraziamenti, licenza etcc. Volevo copiarla da meteomachine ma mi sembra che non vada tanto bene..  :nono: Inoltre non so come funzionano le licenze e quindi non so cosa scrivere.
Ah, ricordo che il programma sarà libero a tutti.
Con il programma sono a buon punto, mi sembra sempre di avere quasi finito, ma poi mi accorgo che manca qualcosa o di fare qualche miglioria.
Mi manca anche l'importazione da file csv, ma farò in un secondo tempo, ho deciso di rimandare un pochino. (md9327 ti stresserò la vita più avanti ;-)
Spero di farcela nel giro di un mesetto..purtroppo posso lavorarci solo la sera.
Intanto vi ringrazio ancora perchè senza di voi non sarei neanche all'inizio :2birre:

[Ceskho]

Puoi copiare da meteomachine non preoccuparti..figurati se è un problema copiare i ringraziamenti su un programma in GPL3...:_)

[Golia]

E quanto riguarda l'uso della licenza è uguale?
Adesso non ho meteomachine sottomano, ma ho letto che c'è una copia depositata ..non ricordo dove. Fammi capire

[Ceskho]

La licenza di meteomachine è la GPL versione 3 basta fare riferimento a quella..

[Golia]

ok grazie, io copio :-)

[Ceskho]

[OT] Ochio! In caso ti becca la maestra [/OT]

Beh come prosegue il progetto allora? Cosa manca? Cosa hai intenzione di implementare? Quanto tempo pensi che passerà prima del rilascio? Che si mangia domani? Dov'è il santo Graal?

[Golia]

So risponderti solo alle ultime 2 domande, sai io sono un mago non un programmatore  :-)
 Diciamo che stasera sto dando una bella botta :-D
Mi mancano tutte le stampe che però so già come fare grazie alla classe di md.
Sto modificando i form della licenza di meteomachine, mi puoi spiegare questo punto?

Una copia della licenza GNU General Public License è disponibile con MeteoMachine Linux; se così non fosse, scrivere alla Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA

[Golia]

@Ceskho
Stasera sono in vena, mi è saltata per la testa la radice quadrata √ , e l'ho inserita nella tua calcolatrice

Codice: [Seleziona]

PUBLIC SUB radquad_Click()
  '-- aggiorna il nastro
  ''simbolo tasto √;
  tNastro.Text &= tVal.Text & " √" & gb.NewLine
    tVal.Text = Sqr(Val(tVal.Text))    
  tNastro.Text &= tVal.Text & gb.NewLine
  tNastro.EnsureVisible()
  ugu.SetFocus
  operazione = ""
  virgola = FALSE
  other = FALSE
END

edit:
il simbolo è questo √, non so come mai quà vengono fuori quei numeri