Nalazenje podatka i brisanje tabele

[ rankez @ 31.05.2006. 07:17 ] @

1. Koja je komanda za brisanje cele ADOTable (ili ADOQuery-a)?
2. Kako je najlakse ispitati da li se neki podatak vec nalazi u odredjenoj koloni tabele (ili Query-a)? (kod)

Pozdrav.

[ marcha @ 31.05.2006. 10:28 ] @

Code:

procedure BrisiTabelu(const sNazivTabele: string);
begin
  with AdoQuery do
  begin
    Close;
    SQL.Text := Format('DELETE FROM %S', [sNazivTabele]);
    ExecSQL;
  end;
end;

procedure ProveriDaLiPostojiPodatak(
  const sNazivTabele, sNazivKolone, sPodatak: string);
begin
  with AdoQuery do
  begin
    Close;
    SQL.Text := Format('select count(*) FROM %s where %s = %s',
      [sNazivTabele, sNazivKolone, sPodatak]);
    Open;
    ShowMessageFmt('%d redova sa podatkom %s u tabeli %s i koloni %s',
      [Fields[0].AsInteger, sPodatak, sNazivTabele, sNazivKolone]);
  end;
end;

[ rankez @ 31.05.2006. 17:36 ] @

Hvala za prethodni source i...
Kako se koristi svojstvo DeleteRecords kako bi se obrisala cela ADOTable?