[Ildar-tsr]

Код:

ADOQ2.SQL.Text:= ' update items set '+
' caption = '+QuotedStr(caption)+
', count = '+inttostr(count)+
', group = '+QuotedStr(group)+
', status = '+inttostr(status)+
', username = '+QuotedStr(Username)+
' where id = '+frmAdd.id.Caption;