[Risolto] Cancellare un elemento da una ListBox

[petrusic]

dopo avere riempito una una ListBox coi valori prelevati da ubna tabella di DB SQLite3, devo selezionare una rga della ListBox per trasferire il suo contenuto (data di calendario) in una DateTimePicker. Quindi devo cancellare dalla ListBox la riga trasferita.

Per la cancellazione della riga dalla ListBox ho seguito prima un metodo, poi un altro. Entrambi sono falliti, anche in maniera diversa.

metodo n.1:

Codice: [Seleziona]

var
  i, indListBox, indListUlt: Integer;    
  dtContEdit, dtListBoxSel: String = '';  
...
begin
   ...
  for i:= 0 to indListUlt do
     begin
      if (dtContEdit = LBGgAperte.Items[i]) then
      begin
         LBGgAperte.Selected[i];
         LBGgAperte.DeleteSelected;                

Sembra che il codice venga eseguito (NON da Errore), ma l'elemento selezionato per la cancellazione resta sempre nella ListBox.

Codice: [Seleziona]

metodo n.2:
[code]
...
begin
   ...
  for i:= 0 to indListUlt do
     begin
      if (dtContEdit = LBGgAperte.Items[i]) then
      begin
        dtListBoxSel:= LBGgAperte.Items[i];

        indListBox:= LBGgAperte.ItemIndex;  //  (°)
        LBGgAperte.items.delete(indListBox);  // (°)

quest'ultimo va addirittura in errore, perchè in "indListBox" vi viene caricato "-1"

(°)   istruzioni prelevate http:// http://]http://www.lazaruspascal.it/index.php?topic=227.msg1485#msg1485

Francamente  non capisco.

[DragoRosso]

metodo n.1:

Codice: [Seleziona]

...
         LBGgAperte.Selected[i];
         LBGgAperte.DeleteSelected;                
...

Hai usato la proprietà Selected per leggere lo stato ( ), se vuoi selezionare la riga devi porla a true:

Codice: [Seleziona]

...
         LBGgAperte.Selected[i] := True;
         LBGgAperte.DeleteSelected;                
...

Nel secondo metodo, la proprietà ItemIndex rimane a -1 finchè non è selezionata un riga ... nel tuo caso ovviamente doveva prima essere selezionata a mano ad esempio con il mouse .....

Ciao

[petrusic]

Quindi i due procedimenti sono tutti e due validi e servono ad affrontare situazioni diverse.

In questo caso e nel passo in cui tocca al programma decidere la riga da selezionare, è opportuno usare il primo metodo: Ho modificato, seguendo il tuo suggerimento, la riga di selezione:

Codice: [Seleziona]

 LBGgAperte.Selected[i]:= True; 

Ora la successiva riga di cancellazione viene eseguita correttamente.

Grazie sempre!