Listbox con caricamento dinamico

[xinyiman]

Ciao a tutti, potrà capitarvi in futuro di dover caricare una listbox in maniera dinamica. Questo succede spesso quando si popolano dei componenti grafici con i dati ritornati dall'interrogazione di qualche api. Bene ho fatto un esempio per dimostrare come è possibile farlo con lazarus. L'esempio carica 100 stringhe in un array e poi popola la listbox (in realtà si tratta di una stringgrid con due colonne, la prima è nascosta) quando scorrete verso il basso e visualizzare l'ultimo elemento.

Spero di aver fatto cosa gradita

Ciao a tutti

[bonmario]

Grazie per l'esempio.
Se mi posso permettere, io di solito dichiaro le colonne come costanti, e poi uso lke costanti quando vado a popolare la StringGrid.
Esempio:

Codice: [Seleziona]

const
   CstColData=0;
   CstColNome=1;

Poi popolo la StringGrid così:
            TStringGrid(Sender).Cells[CstColData,TStringGrid(Sender).RowCount-1] := StrData;
            TStringGrid(Sender).Cells[CstColNome,TStringGrid(Sender).RowCount-1] := StrNome;

Questo, perché già in passato, mi è capitato, a progetto finito o quasi, di dover invertire alcune colonne tra di loro. Usando questo trucchetto, lo fai in 5 secondi !!!

Ciao, Mario

[xinyiman]

Ciao, si è vero quello che dici e anche io lo faccio quando mi serve. Qui era solo un esempio con due colonne di cui una nascosta per contenere una chiave. Ho evitato di farlo.

[Mimmo]

Grazie dell'esempio!