[Mrak]

Сообщение от poison-bla

В таблицу Выдача идут поля:
ID автора, фамилия автора - из таблицы Автор
ID книги, название книги - из таблицы Книги
ID человека, фамилия - из таблицы People должны выбираться

Дата выдачи, срок и статус книги - вводятся самостоятельно

добавь из вкладки datacontrols dblookupcombobox, ставь ему свойства listsource = source таблицы people, в keyfield и listfield пиши surname

добавь Quеry
пиши на событии кнопки

Код:

Query.close; 
query.SQL.text:='INSERT INTO vidacha(idавтора, фамилия автора, idкниги, название книги, фамилиячеловека, дата, срок, статус) VALUES (' + 
tableAuthors.fieldbyname('idавтора').asinteger + ', ' +
QuotedStr(tableAuthors.fieldbyname('фамилияавтора').asstring) + ', ' + 
tablebooks.fieldbyname('idкниги').asinteger + ', ' + 
QuotedStr(tablebooks.fieldbyname('названиекниги').asstring) + ', ' + 
QuotedStr(people.fieldbyname('фамилиячеловека').asstring) + ', ' + 
datetimepickler1(date) + ', ' + 
QuotedStr(edit1.text) + ', ' + 
QuotedStr(edit2.text) + ')';
try 
  Query.ExecSQL; 
except 
  begin 
    messageDlg('Ошибка SQL', mtError, [mbOK], 0); 
    exit; 
  end; 
end;

подставляй поля согласно схеме данных в этом запросе и добавь на форму datetimepickler1 - дата выдачи, edit1 - срок выдачи, edit2 - статус