Search options (Page 5 of 5)

Есть SQL запрос. Он работает и выводит в ГРИД необходимые записи. Проблема в том что их нельзя редактировать или это нереализовано в принципе? Может я что-то не так написал? Подскажите пожалуйста, а то уже кучу всего перечитал и не получается.

select
BDog.num_gk,
strftime('%d.%m.%Y',bdog.date_gk),
BDog.shifr,
vedisp.numstage,
vedisp.namestage,
vedisp.ONTD,
strftime('%d.%m.%Y',vedisp.startstage),
strftime('%d.%m.%Y',vedisp.endstage)as dateend,
vedisp.trud,
vedisp.cashstage,
vedisp.NDS,
vedisp.vidcash,
vedisp.Zakl_OC,
vedisp.Zakl_TFC,
vedisp.udost,
(case when vedisp.otmstage= 1 then 'Да' else 'Нет' end),
vedisp.id_bdog

from vedisp, bdog

where vedisp.id_bdog=bdog.id and strftime('%m.%Y',vedisp.endstage)= strftime('%m.%Y',{DateTimePicker2})and vedisp.otmstage='0'
order by dateend

Опять прошу помощи. Хочу не много усовершенствовать систему входа по логину и паролю. Для этого необходимо запомнить в comboboxe ID пишу запрос сохранения в базу в отдельную таблицу

SQLExecute('INSERT INTO usersid (idlogin) VALUES (''' +frmLogin.edUser1.dbItemID +''');');

Но выдает ошибку не соответствие типов данных хотя idlogin тип Целое.

С загрузкой разобрался написал так:
frmLogin.edUser1.dbitemID := SQLExecute('SELECT idlogin FROM usersid');

Спасибо заранее.

Добрый день! Хочу сделать выход из программы не просто по кнопке и тупо закрыть форму, а с подтверждением. Для этого хочу воспользоваться MessageDlg, но выдает ошибку. Что я делаю не так?

procedure Form1_BtnExit_OnClick (Sender: string; var Cancel: boolean);
begin
if MessageDlg('Вы действительно хотите выйти ?', mtConfirmation, [mbYes, mbNo],0)=mrYes then
form1.close;
end;