SQL wird ausgeführt, aber nicht angezeigt?

[Nalincah]

Wenn ich das ein Statement wie "SELECT * from Adressen" aufrufe, macht der das zwar, aber der akualisiert das DBGrid nicht. Das Grid ist mit TradeDS verbunden

Delphi-Quellcode:

procedure TForm1.Button5Click(Sender: TObject);
var
i:integer;
begin
  if TradeSQL.Lines.Count > 0 then
  begin
    TradeQuery.SQL.Clear;
    for i := 0 to TradeSQL.Lines.Count - 1 do
    begin
      TradeQuery.SQL.Add(TradeSQL.Lines[i]);
    end;
    try
      TradeQuery.ExecSQL;
      TradeDS.DataSet := TradeQuery;
      DBGrid2.Repaint;
    except
      on e:exception do
      ShowMessage('Statement konnte nicht ausgeführt werden'#10#13'Fehler: ' + e.Message);
    end;
  end;
end;