Hola
Hay muchas maneras, esta es una:
Código Delphi
[-]
ADOQuery2.Append;
ADOQuery2.FieldByName('dt_id').Value := StrToInt(Label1.Caption);
ADOQuery2.FieldByName('dt_nom').Value :=edit1.Text;
ADOQuery2.FieldByName('dt_can').Value :=edit2.Text;
ADOQuery2.Post;
Ya que el dato lo esta capturando el label1.
Saludos