Search options (Page 1 of 3)

Уважаемые форумчане, прошу помочь.
У меня есть таблица1. В ней есть строки, которые я копирую кнопкой копировать (кнопка со свойством Показать запись) и к которой я прикрепил скрипт:
if (Action = 'ShowRecord') then  FrmCard.btnSave.dbGeneralTableId := -1; После чего, что надо, правлю и сохраняю, создается новая строка в таблице1 с поправленными параметрами.
На форме, которая открывается из таблицы1, есть не только параметры Edit, DateTimePicker, Combobox, но и TableGrid (назову ее таблица2). В этом случае таблица 2 не копируется, и при открытии она будет пустая. Можно ли как-то сделать так, чтобы и она тоже копировалась со своим содержимым?

Пользователь в моей программе, нажав на кнопку Копировать, начинает редактировать значения, в тч и в TableGrid и после сохранения удивляется, почему в скопированной строке таблицы1 оказываются пустые строки таблицы2 на этой форме, а в той строке, которую он копировал, оказались изменены все строки таблицы2 на как раз те, что изменял для новой записи.

Я понимаю, с чем это связано (он открыл старую запись и правил данные в ней и сохранил под новой записью, но вот таблица2 то так и остается привязанной к старой записи, и она не переносится в новую запись), но не могу придумать как при копировании их тоже скопировать и привязать к новой записи и сразу править.

Чтобы избежать такой проблемы пока обхожусь тем, что строка копируется без возможности внести изменения в запись в таблицу1 и лишь после этого можно открыть скопированную запись и править как вздумается, там будет таблица2 как раз пустая и ее нужно будет заполнить сначала.

Может добавить процедуру: при нажатии кнопки сохраняется в невидимое поле DateTimePicker текущее время, дата?
FrmMain.DateTimePicker1.Date:=SQLDateTimeToDateTime(SQLexecute('SELECT datetime (''now'')'));

Может тогда воспользоваться  if ((SQLexecute('SELECT cast (julianday (date1, "+4 hours") as INT) FROM ... WHERE ...') - SQLexecute('SELECT cast (julianday (date2) as INT) FROM ...')) < '0') then... else...

Скажите, а какой функцией можно при открытии формы подставить в комбобокс значение по умолчанию?
У меня есть форма, на которой комбобокс. В нем я выбираю один из параметров другой связанной таблицы (Например, Сотрудник, а в комбике я отображаю лишь фамилию).
Пробовал Form1.ComboBox1.dbSQLExecute ('SELECT fieldname, id FROM tablename'); но такой запрос лишь позволяет выбрать в комбике нужный мне вариант, а не сразу сделать за меня выбор, который мне интересен.
Form1.ComboBox1.ItemIndex:=SQLexecute('SELECT 1 FROM tablename'); работает, когда таблица tablename состоит лишь из одного параметра, а если их несколько как у меня Фамилия, Должность и тд, то уже не работает

В примере на главной форме хотел бы показать по умолчанию первую запись. В идеале, где чекбокс=1

Если имеется в виду, что при редактировании те столбцы, которые заполнялись из комбобокса, открывались также тут в виде комбика, то позволить редактировать/создавать данные в таблице. Свойство Editable и выбрать, что нужно.

Не сработало. На втором Card не подставляет дату при пустом Status.
Функцию Date я использовал, чтобы оставить от даты/времени только дату.

Вопрос снят.Решил такой записью: FrmCard.ComboBox2.ItemIndex:=SQLexecute('SELECT name_status.id FROM...
При таком запросе в комбике сразу отображается Текущий статус из вообще всех возможных статусов

Понял, что вы сделали.
Я имел в виду показывать в поиске не все записи с этим статусом, а лишь тот Card, у которого запись с таким статусом последняя.
Потому я решил создать дополнительный параметр - Текущий статус, по которому уже и фильтровать Card в поиске, но не знаю как присвоить определенный статус комбобоксу, чтобы его потом на форме Card сохранить, а уже на форме Card_Full использовать в качестве комбобокса для поиска.

Решил отобразить в форме Card последний по дате статус прибора (name_status.name). Сделал отображение в Edit2 FrmCard. Но тут задумался - мне же нужно потом по этому параметру осуществлять поиск по приборам Card у кого какой текущий статус и они могут быть разные, а выбираются они из комбобокса, который хранится в таблице name_status. Вывел его на той же форме Комбобокс2.

Как мне в таком случае быть, чтобы организовать поиск?
Как я понимаю - 1) попробовать сохранять не в Edit, а в том самом комбобоксе, что отвечает за выбор статусов, но что-то у меня это не сработало с моим запросом.
2) Сохранять в Edit, но потом как-то в поиске придумать комбобокс и к нему как-то привязать компонент Edit - тоже не знаю как
3) Искать по компоненту Edit, заполняя вручную статусы, без возможности выбора. Могу, но как-то это будет смотреться криво.
Идеально конечно был бы первый вариант, но как его реализовать я не знаю. Прошу помощи в этом.

А можно как-то вычисленную дату записать не в компонент Edit, а в DateTimePicker? Хотел это реализовать, чтобы при сохранении полученной даты в БД, по ней потом поиск вести через компонент DateTimePicker.

Написал так:
Var
i: string;
begin
i:=SQLexecute(SQLexecute ('SELECT date(date, "+'+ FrmCard.ComboBox1.Text +' month") FROM status WHERE id='+FrmCard.TableGrid1.sqlValue)');
FrmCard.DateTimePicker1.Date:=StrToDate('i');
end;
Пишет, что ошибка в неверном формате даты.

Спасибо, sibprogsistem! Работает.
Скажите, а как в этом случае показать в таблице на форме FrmCard_Full после названия card, to_interval, полученную дату? Я только знаю способ через вычисляемое поле отобразить нужное мне значение, но с таким текстом как:
(
SELECT date(date, '+ to_interval.value month')
FROM status
LEFT OUTER JOIN organization ON status.id_organization=organization.id
LEFT OUTER JOIN to_interval ON card.id_to_interval=to_interval.id
WHERE organization.id_name_status=1
AND status.id_card=card.id
ORDER BY date DESC LIMIT 1
) 
оно не работает.
Я вижу тут два варианта - или поправить вычисл. поле, так чтобы оно заработало, либо видимо использовать SQL запрос, чтобы добавить столбец со вычисленными датами в таблицу, но этого я не умею.