Если нет автоинкремента - используется физический адрес записи.

Удалить есть куча вариантов

1. Утилитой Function Executor
2. TPvTable компонентой из PDAC
3. Из PCC
4. Используя DTI

Под delphi, типа этого



q1.DatabaseName:= BaseFile;
q1.SQL.Clear;
q1.SQL.Text:= 'select * from noise where ...........';
q1.Open;
if q1.RecordCount > 1 then // дубль есть
for i:= 1 to q1.RecordCount -1 do begin // все кроме одной
q1.First;
g1.delete;
end;
q1.Close;

Это все просто - вот рабочий кусок ,


Это база

CREATE TABLE "proba_del"(
"I1" INTEGER,
"I2" INTEGER
);

До программы в базе (копия из PCC)
<<<<<<<<<<<<<<<<<<<<<<<<
I1 I2
=========== ===========
2 2
1 1
2 2
1 1
3 3
3 3
3 3

7 rows were affected.

После выполнения программы (копия из PCC)


<<<<<<<<<<<<<<<<<<<<<<<<
I1 I2
=========== ===========
1 1
2 2
1 1
3 3
3 3
3 3

6 rows were affected.

>>>>>>>>>>>>>>>>>>>>>>>>

unit Unit1;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, DB, Grids, DBGrids, pvtables, btvtables, pvip, StdCtrls,
pvsqltables, sqldataset, DBCtrls;

type
TForm1 = class(TForm)
Button1: TButton;
pses: TPvSession;
Tbl: TPvTable;
DataSource1: TDataSource;
DBGrid1: TDBGrid;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
var
i: integer;
begin
pses.ServerName:= 'info-btr';
pses.Active:= True;
Tbl.DatabaseName:= 'Proba';
Tbl.TableName:= 'proba_del';
Tbl.Open;
Tbl.Filter:= 'i1 = 2';
Tbl.Filtered:= True;
Tbl.First;
while not Tbl.Eof do begin
Tbl.delete;
Tbl.Next;
end;
Tbl.Filtered:= False;
Tbl.Close;
pses.Active:= False;
end;

end.