if Edit.Text <> Table.FieldByName('pole').asString then // данные изменились - пишем else // данные не менялись - не трогаем