Topic: Подскажите скрипт кнопки

Подскажите как, скриптом под кнопкой нажать другую кнопку.
Мне это надо для добавления записи в две таблицы.

Спасибо.

Re: Подскажите скрипт кнопки

Привет
Просто добавьте эту строку в конце процедуры для Button1

procedure Form1_Button1_OnClick (Sender: TObject; var Cancel: boolean);
begin
  x
  x
  x
  x
  form1.button2.click;
end;

Derek.

Re: Подскажите скрипт кнопки

Работает.
Но не то ожидал. Думал, что при создании новой записи можно вносить и в другую таблицу, но получил запись в другую таблицу, но она становится общей.

Толи не успевает в базе создаться новый id, не понятно...
Если на кнопку 2 сделать функцию новая запись, вместо сохранить, то программа аварийно закрывается.

Re: Подскажите скрипт кнопки

Вы пытаетесь решить проблему с поиском заказчиков в ComboBox? если да, я сделал для вас пример в данной теме
http://myvisualdatabase.com/forum/viewt … 810#p29810

Dmitry.

5 (edited by vit007 2019-03-19 13:59:18)

Re: Подскажите скрипт кнопки

Увы сейчас, еще хуже... надо в две таблицы ввести одинаковое значения по id.

т.е. при приемке пишется в таблицу дата и значение из combobox и их же надо ввести в таблицу статистики.
таблица статистики (истории) просматривается при просмотре заказа.

Сейчас, я могу только пост факт ум подавлять значения. но хочется чтоб и начало было, а за тем и конец в главную таблицу...
в работе - дата
выполнено - дата
звонок - дата
звонок - дата

все строки в статистической таблице, а последняя в главной...

Post's attachments

Attachment icon Database00.rar 304.19 kb, 255 downloads since 2019-03-19 

Re: Подскажите скрипт кнопки

Возможно вам просто необходимо использовать дочерние записи для основной таблицы, как в примере с телефонным справочником, когда один абонент может иметь много телефонных номеров.

Dmitry.

Re: Подскажите скрипт кнопки

Все с дочерними записями верно сделано, брал из примера "Клиент-Мастер"

В Форме просмотра, все работает отлично.
А надо в форме новой записи, чтоб присвоенное значение "В работе" главного Grid появлялось в Grid с историей.

Есть предположение что при новой записи id не успевает присвоиться или не правильно выделяется при последовательном нажатие двух клавиш - Сохранить для главной записи и сохранение в другой таблице.

Есть мысль, попробовать соорудить скрипт по выбору последнего Id в таблице для переноса данных в другую таблицу.

Re: Подскажите скрипт кнопки

procedure frmNew_Button2_OnClick (Sender: TObject; var Cancel: boolean);
begin
    SQLExecute('SELECT data1 from request order by id desc limit 1')
    SQLExecute('INSERT INTO statistic (data) SELECT data1 FROM request WHERE request.id=');
end;

Вроде здесь идет выбор последней записи в таблице + перенос данных... Вот только как грамотно оформить.