关于SQL语句

Question

你用的是系统自动唯一id，这是系统完成的，没有办法的，除非你不用系统唯一id。

Answer 1

不要让系统自动创建
在前端插入记录时，用Select MAX(字段名) 得到当前最大值然后加1作为新值。
—————————————————————————————————
MaximStr := '宠辱不惊，看庭前花开花落，去留无意；
             毁誉由人，望天上云卷云舒，聚散任风。';
if Not Assigned(I) then
  I := TI.Create(Nil);
I.Maxim := MaximStr;
I.Explain := '假如上述代码中出现“OA”、“3D”等字样，改为“=”等';
I.Desire := '加不加分随你';
—————————————————————————————————
　　　　　　　

Answer 2

要改正现在的问题来个循环就行了
var I: Integer;
table1.first;
while not table1.Eof do
begin
  Inc(I);
  table1.FieldByName('').AsInteger := I;
end;
table1.Post;
—————————————————————————————————
MaximStr := '宠辱不惊，看庭前花开花落，去留无意；
             毁誉由人，望天上云卷云舒，聚散任风。';
if Not Assigned(I) then
  I := TI.Create(Nil);
I.Maxim := MaximStr;
I.Explain := '假如上述代码中出现“OA”、“3D”等字样，改为“=”等';
I.Desire := '加不加分随你';
—————————————————————————————————
　　　　　　　

Answer 3

table1.FieldByName('').AsInteger := I;
后加上：
table1.Next;
—————————————————————————————————
MaximStr := '宠辱不惊，看庭前花开花落，去留无意；
             毁誉由人，望天上云卷云舒，聚散任风。';
if Not Assigned(I) then
  I := TI.Create(Nil);
I.Maxim := MaximStr;
I.Explain := '假如上述代码中出现“OA”、“3D”等字样，改为“=”等';
I.Desire := '加不加分随你';
—————————————————————————————————
　　　　　　　

Answer 4

那你只有用循环修改了，用当前的ID 减上一记录的  ID  大于1就把当前ID 用上一记录的ID加1

Answer 5

table1.FieldByName('').AsInteger := I;
后加上：
table1.Next;—————————————————————————————————
MaximStr := '宠辱不惊，看庭前花开花落，去留无意；
             毁誉由人，望天上云卷云舒，聚散任风。';
if Not Assigned(I) then
  I := TI.Create(Nil);
I.Maxim := MaximStr;
I.Explain := '假如上述代码中出现“OA”、“3D”等字样，改为“=”等';
I.Desire := '加不加分随你';
—————————————————————————————————

Answer 6

table1.first;
i;=1;
while not table1.eof do
begin
  table1.FieldByName('').value:= i;
  table1.next;
  inc(i);
end;

Answer 7

我还想问个问题，  用Query  怎样建立主/从表

Answer 8

我是QUERY的，我看上面的兄弟都是用用TABLE 的！，有谁知道这样用QUERY来实现他