Topic: Помощь 4 в проекте для Новичка
Здравствуйте, помогите мне пожалуйста.
При создании новой записи, в поле выбора КАТАЛОГА (ComboBox1) необходимо вывести последнее из сохраненных значений
У меня получилось только вывести максимальное значение
procedure Form2_ComboBox1_OnChange (Sender: TObject);
begin
if (Form2.dbAction = 'NewRecord') then
if (Form2.ComboBox1.ItemIndex > -1) then
Form2.Edit1.Text := SQLExecute('SELECT (ost1) FROM tb_home WHERE id_tb_catalog='+IntToStr(Form2.ComboBox1.ItemIndex));
if (Form2.dbAction = 'NewRecord') then
if (Form2.ComboBox1.ItemIndex > -1) then
Form2.Edit2.Text := SQLExecute('SELECT (ost2) FROM tb_home WHERE id_tb_catalog='+IntToStr(Form2.ComboBox1.ItemIndex));
end;