Si utilizas un Table podrías usar un código similar a:
Código Delphi
[-]
Table1.Append;
Table1.FieldByName('Campo').AsString :=Label1.Caption;
Table1.Post;
Y si decides usar un query
Código Delphi
[-]
Query1.close;
Query1.SQL.Clear;
Query1.SQL.Add('INSERT INTO TABLA (CAMPO1) VALUES ('+QuotedStr(Label1.Caption)+')';
Query1.ExcSql;