Скачать: CL | DM;

Мне нужно удалить все записи в *.dbf   Найти похожие ветки 

← →
pavel_rosl   (2003-04-10 07:14) [0]

Мне нужно удалить все записи в *.dbf
Одну - могу table1.delete;
Просто не так поняли.

---

← →
Ozone ©   (2003-04-10 07:28) [1]

DROP TABLE "Table.dbf"

---

← →
Ozone ©   (2003-04-10 07:30) [2]

I"m sorry. (вопрос не так понял)
DELETE FROM TABLE "Table1.dbf" Table1

---

← →
Anatoly Podgoretsky ©   (2003-04-10 07:48) [3]

EmptyTable

---

← →
ЮЮ ©   (2003-04-10 07:49) [4]

из Help-a:
TTable.EmptyTable
Deletes all records from the table.

---

← →
evvcom ©   (2003-04-10 08:26) [5]

To Ozone: вроде ясно было, что используется компонент TTable, а не TQuery... А ты SQL гонишь!

---

← →
Anatoly Podgoretsky ©   (2003-04-10 08:57) [6]

Вроде бы как не ясно или он тебе сообщил?

---

← →
AlexSerp ©   (2003-04-10 13:51) [7]

2Anatoly Podgoretsky
Отсюда видно " Одну - могу table1.delete; "

---

← →
Vovchik_A ©   (2003-04-10 15:57) [8]

with Table1 do

begin
Active := False;
DatabaseName := "Delphi_Demos";
TableName := "CustInfo";
TableType := ttParadox;
EmptyTable;

end;

---

← →
Anatoly Podgoretsky ©   (2003-04-10 16:37) [9]

AlexSerp © (10.04.03 13:51)
Table1: TQuery;
Table2: TTable;
Table3: TAdoQuery;
Table4: TAdoTable;
и т.д.

Table1.Delete;
Table2.Delete;
Table3.Delete;
Table4.Delete;

Ясность будет наблюдать только тогда, когда он явно скажет, что использует TTable.

Но если это TTable, то лучше EmptyTable, поскольку мгновенно и не надо делать упаковку, я то же исходил из предположения, что он использует TTable, но у меня хватила благоразумия не наезжать по поводу ясности, может evvcom ясно кажется, что TQuery или другой компонент.

---

← →
AlexSerp ©   (2003-04-10 16:51) [10]

Анатолий, да все понятно.
Просто исходя из вопроса можно сделать вывод, что человек новичок.
И при программровании еще не дошел до именования компонентов со смыслом.
Поэтому
Query1: TQuery;
Table1: TTable;
AdoQuery1: TAdoQuery;
AdoTable1: TAdoTable;

И твой вариант подходит, с учетом, что автор вопроса до сих пор не хочет внести ясность.

---

← →
Anatoly Podgoretsky ©   (2003-04-10 22:09) [11]

C учетом вопрос, поскольку ни какой конкретности по системе нет, подходит любой ответ, даже DeleteFile-

---

← →
MsGuns ©   (2003-04-10 22:39) [12]

>Vovchik_A © (10.04.03 15:57)

with Table1 do

begin
Active := False;
DatabaseName := "Delphi_Demos";
TableName := "CustInfo";
TableType := ttParadox;
Exclusive := true; // Без этого бу ругаться !
EmptyTable;

end;

---

← →
MsGuns ©   (2003-04-10 22:46) [13]

А вот так будет еще и профессионально:

with Table1 do
begin
DatabaseName := "Delphi_Demos";
TableName := "CustInfo";
TableType := ttParadox;
try
Exclusive := true; // Захват таблицы
EmptyTable;
Exclusive := false; // Освобождение таблицы
except
ShowMessage("Таблица не может быть почищена сейчас");
end;
end;

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.48 MB
Время: 0.012 c