Search options (Page 382 of 400)

gulmirch1k
скорей всего нет, расскажите пожалуйста, что именно вы хотите реализовать таким образом?

Думаю лучше указывать дату рождения, а возраст вычислять с помощью вычисляемого поля:
date('now') - birthdate + (case when strftime('%m-%d', 'now') < strftime('%m-%d', birthdate) then -1 else 0 end)

где birthdate - дата рождения.

зачем на всех формах, предназначенных для добавления/редактирования записи присутствует TableGrid?

Roman.SHmakov
Спасибо за идеи.

1-3. Запланировано, появится со временем.
4. Не совсем понял, что имеется ввиду, вы всегда можете самостоятельно написать документацию и распространять ее вместе с базой данных.
5. В принципе программа в установке не нуждается, можете скопировать папку My Visual Database на флешку.
6. Ок )

в принципе это возможно, но необходимо писать скрипт с использованием SQL запросов.

как вариант, вместо ComboBox можно все таки использовать TableGrid на форме заказа, в котором будут видны все покупатели, и вы просто выбираете в нем необходимого покупателя.

У заказа может быть только один покупатель? тогда вам не нужен TableGrid1, вместо него разместите ComboBox где вы и будете выбирать покупателя для данного заказа.

mitrich45
не понял вопроса

попробуйте так

,ifnull(

(SELECT SUM(detall.price) FROM detall WHERE detall.id_application = application.id)

,0) AS SumDetallPrice

urkov1987
данный пример проекта будет работать только в версии 1.41, которую я сегодня обновил, скачайте ее по ссылке ниже
https://www.dropbox.com/s/fr76z69sc69l1 … 201.41.zip

к сожалению ваш вопрос немного специфичен, пожалуйста, можете чуть подробней.

1. К сожалению не понял вопроса )

2. Используем событие OnAfterClick от кнопки, отвечающую за поиск

procedure Form1_bSearch_OnAfterClick (Sender: string);
var
   i,c: integer;
   sDate: string;
begin
     c := Form1.GridSearch.RowCount-1; // узнаем количество строк в гриде                                                                         
     for i := 0 to c do // цикл перебора всех строк в гриде                                                                                                
     begin
          sDate := Form1.GridSearch.Cells[0,i]; // получаем из первого столбца текстовое значение даты                                                                                                                                 
          if ValidDate(sDate) then // на всякий случай проверяем, верный ли формат даты                                                                                                                            
             if StrToDate(sDate) <= (Date-3) then Form1.GridSearch.Cell[0,i].Color := clYellow; // сравниваем дату в ячейке с текущей датой +3 дня, если дата меньше или равно, то окрашиваем в желтный                                                                                                                                                                                                                                            
     end;
end;

3. В текущей версии это не поддерживается.

4. К сообщению прикреплен тестовый проект, с примером реализации, добавлен пункт в подменю File и непосредственно в меню
но перед этим скачайте версию 1.41
https://www.dropbox.com/s/fr76z69sc69l1 … 201.41.zip