[DELPHI] Collegare ComboBox prelevando elementi dal database

[pegaso22]

Ciao a tutti,
sto utilizzando Delphi 6.
Come si compila un menù a tendina(TBComboBox) prendendo i dati da un campo del database?

Fatemi sapere.
Grazie mille.

[pegaso22]

L'ho compilato con un ciclo, va bene?

[RadioStudio95]

Cosa intendi per compilare un menu a tendina?
Forse intendi dire un combobox popolato da elementi presenti in un db?
Se è questo che intendevi, ti conviene utilizzare un DBLookupComboBox, al quale potrai collegare direttamente il db dal quale dovrai estrarre i dati.
Ciao
RS95

[pegaso22]

Oppsss, volevo dire popolare.
ho visto il DBLookupComboBox ma non è un menù a tendina, o sbaglio?
a me serve la tendina...

E' da tempo che non uso delphi e sono arruginito al massimo!

[RadioStudio95]

Scusa ma che cosa intendi con menu a tendina e TBComboBox?
Il DBLookupComboBox è un componente tipo combobox che ti permette di collegarlo ad un db in modo molto semplice.
Ciao
RS95

[pegaso22]

Perfetto, stavo confondendo col componente DBLookupList Box.

Grazie mille

[pegaso22]

Ciao,
ho un altra domanda da farti:
come si dichiara una variabile numerica?
Intera := integer
con la virgola?

[RadioStudio95]

Ciao, in Delphi per dichiarare una variabile, basta la seguente sintassi:

Var nomeVariabile: tipoVariabile;

trovi informazioni più dettagliate al seguente link:
http://programmazione.html.it/guide/.../le-variabili/
Per quanto riguarda i tipi integer:
http://programmazione.html.it/guide/...i-parte-prima/

RS95

[pegaso22]

ok, grazie... ho risolto.

Ho un altro problema legato al DBLookupComboBox:
praticamente quando aggiungo un record utilizzo l'oggetto DBLookupComboBox e va tutto bene; quando vado a modificare un record però il campo DBLookupComboBox dovrebbe essere impostato sul valore che gli assegnato al momento del salvataggio solo che così non è, praticamente va sempre al primo valore.
Come posso risolvere?

[RadioStudio95]

Per quello che chiedi dovresti tener traccia dell'ultimo salvataggio effettuato quindi credo che dovresti crearti una funzione specifica.
Credo che la cosa più semplice da fare sia quella di inserire un DBLookupComboBox nella tua maschera di modifica, configurare le seguenti proprietà:
- ListSource;
- KeyField;
- ListFields;
lasciando vuote le proprietà del DataSource e del DataField, a questo punto dovresti inserire dei DBEdit e configurare i relativi DataSource ed il DataField, così facendo, otterrai una maschera che, selezionando un record del tuo DBLookupComboBox, ti visualizzerà la situazione attuale di quel record, dopo di che potrai modificare i campi desiderati.
Nel caso in cui desideri che all'apertura della form i campi siano vuoti, potresti inserire nell'evento che attiva o visualizza la tua maschera, il seguente codice :

nomeCampo.Text:='';

Bye
RS95