Newsgroup: it.comp.lang.delphi
Titolo: ComboBox

Ciao Ragazzi,
quale codice devo scrivere nell'evento OnChange per controllare
che in un ComboBox non ci siano due stringhe uguali?
Grazie.

 che in un ComboBox non ci siano due stringhe uguali?
Su, potevi pensarci un attimo ... il codice non è difficile.
var cItem: Integer;
begin
  for cItem := 0 to Combobox1.Items.Count do
      if Combobox1.Text = Combobox1.Items[cItem] then
         ShowMessage('Elemento già presente')
end;
se a priori sei sicuro che non ci siano due Item uguali puoi utilizzare un
Repeat - Until oppure inserire un Break dopo quello ShowMessage().
--
- Carlo -
cbertu81(at)libero(dot)it


Hai perfettamente ragione...mi spieghi come devo procedere le prossime
volte per cercare di risolvere un problema?
Da dove devo partire?
Te ne sarei grato.
Ciao.

Ho provato il codice ma non và in quanto la stringa la fà inserire
ugualmente
mentre non dovrebbe permetterlo.
Bisogna pensare a qualcos'altro...
Carlo Bertuccini <cber...@DOHlibero.it> wrote in message
prLS8.75845$Kt3.1...@twister2.libero.it...


 Da dove devo partire?
hai le conoscenze di base della programmazione? Un problema informatico ha
molte soluzioni dal punto di vista della programmazione. Non posso darti una
"ricetta" su come risolvere i problemi.
Avresti bisogno di un buon testo che ti spieghi i concetti della
programmazione e che ti dia le basi. Sulla rete c'è molto materiale gratuito
per questo.
Ciao


 Bisogna pensare a qualcos'altro...
Pardon, la fa inserire *dove*? Di default un combobox non inserisce niente nella
sua lista, a meno che tu non glielo dica.
La procedura che ha postato Carlo fa quello che tu hai chiesto, ovvero
nell'OnChange controlla se la stringa inserita è presente negli item, e basta.
Se poi tu hai dell'altro codice che aggiunge il Text agli Items, ovviamente devi
condizionare anche quello in base al risultato del controllo...
--
Jax

Hai qualche link?
E comunque le basi della programmazione credo di possederle...
Ciao

 E comunque le basi della programmazione credo di possederle...
Senza offesa credo che se tu possedessi le basi saresti riuscito a risolvere
questo_semplice_problema. Tuttavia č possibile che sia come dici tu, ma che
non conosci bene Delphi.
Ciao! :-)


 del controllo...
Sniff, sniff... Sbalgiero' (sic), ma sento odore di compito a casa... ;)
Ciaotutti,
*

 ;)
Sarei contento per lui. A me a scuola facevano usare WordStar e magari un po' di
Turbo Pascal applicato alla matematica, al massimo...
Magari avessi fatto Delphi... uhm, però, adesso che ci penso, a quei tempi c'era
solo Visual Basic.......... l'ho scampata bella ^___^
--
Jax

 solo Visual Basic.......... l'ho scampata bella ^___^
Non avendo fatto Delphi non ti sei perso niente! Io lo ho "fatto" ma ti
garantisco che è stato tutt'altro che interessante. Nessuna spiegazione su
quel che è il vero potere di Delphi (niente programmazione oo, niente
scrittura di componenti, nessuna spiegazione sulla gerarchia interna alla
VCL ... niente di niente!) il massimo che è stato fatto erano un paio di
lezioni riguardanti interbase ed il suo interfacciamento in Delphi. Ma anche
su questo sono sicuro che nessuno dei miei ex-compagni abbia capito nulla (a
domande tipo:"Come si fa questo?" la risposta era "Esiste un fantastico help
in linea").
Come se non bastasse, quando siamo giunti al quinto anno (che aspettavo con
impazienza per ricevere, finalmente, qualche lezione seria) hanno mandato
una nuova professoressa di informatica alla quale ho dovuto fare un po' di
introduzione a Delphi perchè ne era completamente a digiuno, e quella stessa
professoressa era quella che poi in classe mi interrogava su Delphi!
L' unica cosa di cui li devo ringraziare è di avermi fatto notare che esiste
Delphi, ma da allora sono andato avanti praticamente da solo!


ringraziate con la faccia a terra che avete iniziato direttamente in OOP.
Io sono partito dal gwbasic (ho "qualche" anno + di voi....)
Poi sono passato al quickbasic che almeno era strutturato
Poi sono finito su ca-clipper
Da li, dopo una fuga precipitosa da vb (strumento usato per un progetto al
quale ho lavorato...) sono finito su delphi : e non lo mollo!
A.

 Io sono partito dal gwbasic (ho "qualche" anno + di voi....)
GWBasic? mamma mia.... avevo modificato il programma di contabilitą che usava
mio papą nel 1987 su un M24 (mi pare si chiamasse GheimPC o qualcosa del
genere), a... uhm.... un po' di calcoli.......... 11 anni :) perņ mi ricordo che
casino e adesso che ci penso, non so nemmeno cosa o come ho fatto ^___^;;
--
Jax

 Poi sono finito su ca-clipper
[...]
Quantomeno questi ambienti/linguaggi ti insegnano a *programmare* e non a
piazzare un paio di componenti su una form, ad impostare un paio di
proprietà dell' object inspector e a farti  credere che sai programmare.
Ciao!


 secondo me buona parte si.
La scuola italiana riesce a far odiare agli studenti le cose che dovrebbe
insegnare.
Si dice che la colpa sia dei docenti: è una balla!
La colpa è di chi permette a certi docenti di insegnare.
In 5 anni di ITIS in cui ho cambiato professori molte (troppe...) volte, ne
salvo al max 5.
Gli altri?
Per carità, brave persone.
Ma la buona volontà non basta: serve preparazione, capacita di trasmettere
cio che si sa e, non ultima, una buona dose di savoir fare che permetta di
"accendere" gli studenti che il destino ti ha messo davanti.
Ma questa è utopia.
Per insegnare basta sapere: non occorre sapere "come trasmettere".
Bye
A.

 Per insegnare basta sapere: non occorre sapere "come trasmettere".
Ammetto che insegnare non deve essere facile, ma secondo me uno che insegna
deve farlo perchè lo sente e non tanto per ... dalle sue lezioni può
dipendere anche il futuro di una persona.
Per intenderci se i miei docenti avessero fatto un po' più il loro mestiere
credo che un buon 60% della mia classe sarebbe nel mondo informatico. Ma
questo è un altro discorso
