Bonjour

Je suis incapable de mettre a jour mon listbox après une correction, création ou destruction d'un enrégistrement.

voir extrait du code http://docwiki.embarcadero.com/RADSt...OS_et_Android)

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
 
procedure TForm1.ButtonDeleteClick(Sender: TObject);
var
  TaskName: String;
begin
  TaskName := ListBox1.Selected.Text;
 
  try
    SQLQueryDelete.ParamByName('ShopItem').AsString := TaskName;
    SQLQueryDelete.ExecSQL();
    ItemTable.Refresh;
    LinkFillControlToField1.BindList.FillList;   //  erreur ici existe pas
    if ListBox1.Selected <> nil then
      ButtonDelete.Visible := True
    else
      ButtonDelete.Visible := False;
  except
    on e: Exception do
    begin
      SHowMessage(e.Message);
    end;
  end;
end;
Les enregistrements sont bien crées mais je les vois seulement au démarrage de mon application. Est-ce qu'il a une autre méthode pour rafraichir un listbox.

Merci de votre aide.

Mario