merhaba
zamn içerisinde deneme kayıtları oluşuyor ve tek tek delete * form... gibi ifade kullanmadan veya tek bir sql ile DB deki table ların içeriğini nasıl silerim
saygılar
tüm table içeriğini nasıl silerim
1. Veritabanına göre bir script oluşturup çalıştırın. Mesela Oracle'da / ile komutları ayırabiliyorsunuz.
gibi.
2. Veritabanının scriptini çıkartın. Silip sıfırdan oluşturun.
Kolay gelsin.
Kod: Tümünü seç
a tablosunu sil
/
b tablosunu sil
/
...
2. Veritabanının scriptini çıkartın. Silip sıfırdan oluşturun.
Kolay gelsin.
bir tane query bileşeni şeç ve formuna koy.DatabaseName ve Datasource alanlarını yazdığın prg göre seçmelisin.Bir tane buton koy ve aşağıdaki kodu yaz.dikkat et koşul belitmeksizin database siler.(Paradoks içindir.)
QUERY1.Close;
QUERY1.SQL.CLEAR;
QUERY1.SQL.Add('DELETE FROM deneme.DB');
QUERY1.Prepare;
QUERY1.ExecSQL;
TABLE1.REFRESH;
QUERY1.Close;
QUERY1.SQL.CLEAR;
QUERY1.SQL.Add('DELETE FROM deneme.DB');
QUERY1.Prepare;
QUERY1.ExecSQL;
TABLE1.REFRESH;
EmptyTable

Kod: Tümünü seç
Example
with Table1 do
begin
Active := False;
DatabaseName := 'Delphi_Demos';
TableName := 'CustInfo';
TableType := ttParadox;
EmptyTable;
end;
.-.-.-.-.-.-.-. ^_^