Search options (Page 2 of 8)

Здорово!!!
начало положено...(думаю Вам интересней было услышить...)
докрутить бы сюда скрипты, SQL запросы, примеры...
НАПРИМЕР:
Вы создаёте направление..." работа с едитом"
а.)  отправить значение из грида в едит (скрипт+ пример)
б.)  сумма двух едитов (скрипт+ пример)
------------------------------------------------------------------------------------------------
А также  сделать в пункте (а) и  (б) местечко...примеры с форума на данную ветку...
куда бы форумчане кидали свой проект-пример...(с разными способами...)
за неё Вы отвечать не будете...,НО...
мы могли ставить "лайки" тому кто выложил проект-пример, если он помог или понравился...,
а так же в случае непоняток задать вопрос хозяину проект-примера...что...откуда... и дли чего...
P./S. Сужу по себе...прежде. чем понять насколько мне нужно MVD,
пришлось неделю... день и ночь бегать по  ВСЕМ ПОСТАМ собирать  проект-примеры,
что бы понять как это работает...
                                               С Уважением и Благодарностью Роман!!!

Доброго времени суток!!!
Кусочек скрипта...

if MessageDlg(' ДАТА  №... ' + Form2.DateTimePicker5.sqlDate + ' уже есть ! ! !', mtInformation, mbYes+mbNo, 0) = mrYes

получается:     ДАТА  №..." 2016-06-09"  уже есть ! ! !
Подскажите есть вариант добиться...формат даты
получить:        ДАТА  №..." 09.06.2016"  уже есть ! ! !
С Уважением и Благодарностью Роман!!!

Дмитрий ПОСТ №21...я получил нужный результат!!! ОК!!!
НЕ принципиально,НО...
1.) я получил нужный результат от битона используя SQL запрос!!!
Возможно получить этот же результат при создания  новой(отдельной) ТАБЛИЦЫ,
заполнив её где-то скриптом или вычисляемым полем??? ели ДА
как заполнить  вычисляемые поля???(или хотя бы направления...)
(умысел...результат нужен в гриде для построения ГРАФИКОВ...и беря данные для статистики...
т.е. данных много и фантазии хватает сделать серьёзную статистику+графики которые брали
данные из грида+таблица+(всевозможный поиск) переживаю,что мой  SQL запрос одним бетоном не отделается)
С Уважением и Благодарностью Роман!!!

СПАСИБО ВАМ МНОГО РАЗ!!!
С Уважением и Благодарностью Роман!!!

ДРУЗЬЯ!!!
вот скрипт...

procedure frmEmployee_OnShow (Sender: string; Action: string);
begin
    if frmEmployee.dtDateOfBirth.Checked then
        frmEmployee.edDate.Text := FormatDateTime('ddmmyyyyhhnn', Frac(frmEmployee.DateTimePicker1.DateTime) + Trunc(frmEmployee.dtDateOfBirth.DateTime))
        else frmEmployee.edDate.Clear;
end;

procedure frmEmployee_edDate_OnChange (Sender: string);
var
    s: string;
    YY, MM, DD: string;
    HH, MIN,SEC: string;
    dt: TDateTime;
begin
    s := frmEmployee.edDate.Text;
    if Length(s)=14 then
    begin
        DD := Copy(s, 1, 2);
        MM := Copy(s, 3, 2);
        YY := Copy(s, 5, 4);

        HH := Copy(s, 9, 2);
        MIN := Copy(s, 11, 2);
        SEC := Copy(s, 13, 2);

        try
            dt := Trunc(EncodeDate( StrToInt(YY),StrToInt(MM),StrToInt(DD) )) + Frac(EncodeTime( StrToInt(HH),StrToInt(MIN),StrToInt(SEC), 0 ));
            frmEmployee.DateTimePicker1.DateTime := Frac(dt);
            frmEmployee.dtDateOfBirth.DateTime := Trunc(dt);
            frmEmployee.edDate.Color := clWhite;
        except
            frmEmployee.DateTimePicker1.Checked := False;
            frmEmployee.dtDateOfBirth.Checked := False;
            frmEmployee.edDate.Color := clRed;

        end;
    end else
    begin
        frmEmployee.DateTimePicker1.Checked := False;
        frmEmployee.dtDateOfBirth.Checked := False;
        frmEmployee.edDate.Color := clWhite;
    end;
end;

т.е. в едит(edDate) по маске вводим 06.06.2016 21:11:33 тогда у DateTimePicker1 и dtDateOfBirth
появляются значения и они активны.....
помогите исключить(убрать) из скрипта секунды, методом простого стирания связанного с секундами результато не дало!
P./S. в едит(edDate) по маске вводим 06.06.2016 21:11(без секунд) тогда у DateTimePicker1 и dtDateOfBirth
появляются значения и они активны.....

Доброго времени суток!!!
Таблица "ААА" имеет поля "id_BBB" ... "data"  ... "profit"
Кликаем на Button1 получаю SQL запрос.....

SELECT DISTINCT BBB.bbb,
strftime('%d.%m.%Y',AAA.data) as ,

FROM AAA

LEFT OUTER JOIN BBB ON BBB.id=AAA.id_BBB

WHERE
(CASE WHEN {ComboBox3}=-1 THEN 1=1 ELSE BBB.id={ComboBox3} END)

НЕ ПОЛУЧАЕТСЯ ДОПИСАТЬ ....
подсчитать общий итог для id_BBB из поля "profit" за одну уникальную  дату???
P./S. В ТАБЛИЦЕ ТАКАЯ ЗАПИСЬ:
id_BBB    data           profit
======================
111        06.06.2016    10
111        06.06.2016    20
222       06.06.2016    40
======================
НУЖЕН РЕЗУЛЬТАТ ТАКОЙ
======================
111        06.06.2016    30
222        06.06.2016   40
Подскажите, что и куда надо дописать?????

ОК!!!

SELECT DISTINCT datefield FROM tablename

1.) при этом запросе дату отображает  2016-05-01 00:00:00.000
А есть способ отобразить  01.05.2016
2.)  Возможно ли:
Таблица "ААА" у неё поля "id_BBB" и "data".....
показать записи из поля  "id_BBB" которые попали в уникальную дату???

УРА...РАБОТАЕТ!!!
БЛАГОДАРЮ ВАС!!!

ОК!
Спасибо!!!
То что надо...

Друзья, мне кто нибудь может подсказать???
ВОПРОС СНЯТ...ДОКУМЕКАЛ...