Добавление записи в бд с label

[Fahman]

Доброго времени суток, хотелось бы узнать как можно грамотно добавлять записи в базу данных? Не используя такие компоненты как DBEdit
Я пробовал так

ADOTable1.Open;
AdoTable1.Edit;
AdoTable1.Insert; //вставка записи
AdoTable1.FieldByName('Сумма').Value :=Label4.Caption;                                                        
AdoTable1.Post;

Потом программа начала ругаться что типа поле id пустое(Ну я так понял)
после чего я добавил такую функцию как заполнения этого самого id

ADOTable1.Open;
AdoTable1.Edit;
AdoTable1.Insert; //вставка записи
AdoTable1.FieldByName('Сумма').Value :=Label4.Caption;
AdoTable1.FieldByName('id').Value :='5';                                                        
AdoTable1.Post;

Но тут опять косяк, при добавлении новой записи если есть строка с id 5 то ругается программа. Надо добавлять с id 6, может есть такой вариант чтобы это поле id заполнялось как нибудь автоматический? Ну что-бы не париться.....

[Аватар]

Сделай его автоинкрементным и вообще программно не заполняй. Заполнение бд с label - такого еще не слышал

[Fahman]

Сообщение от Аватар

Сделай его автоинкрементным и вообще программно не заполняй. Заполнение бд с label - такого еще не слышал

А как сделать "автоинкрементным"?
Да там я заполняю не совсем с label а сразу с переменных))
ну что-то в этом роде

что-бы потом отчет можно было сделать через Fastreport.
Ну если есть вариант как все сделать более удобным и быстрым способом, рад узнать.
В результате мне надо добиться примерно что-то вроде такого.