1

(2 replies, posted in Russian)

В общем вопрос снят. Решил проблему через DATEDIFF.

2

(2 replies, posted in Russian)

Ещё скрин

Простенький запрос с вычислением, но не могу понять - как оно это посчитала. Это бред какой-то.
Запрос и результат во вложении.

4

(1 replies, posted in Russian)

Вношу данные в базу запросом INSET. Если на форме присутствует таблица (любая, даже не связанная с базой) выскакивает ошибка, но данные вносятся в базу. Если таблицы нет то всё проходит штатно. В чем может быть проблема?

5

(1 replies, posted in Russian)

Создам ещё тему. В предыдущих версиях программы при заполнении грида запросом если есть idто можно было показать запись кнопкой, теперь это не работает. Мой запрос

SELECT DISTINCT                 
dogovor.nomer AS `nom dog`,
dogovor.data AS `dat dog`,
dogovor.finish AS `срок действия`,
(SELECT kontr.name FROM kontr WHERE kontr.id=dogovor.id_kontr) AS 'контр',
dogovor.predmet AS `predmet`,
dogovor.summ AS `summ dog`,
dogovor.id
                                                                                                                   
FROM dogovor
LEFT OUTER JOIN kontr ON kontr.id=dogovor.id_kontr
LEFT OUTER JOIN buh_doc ON buh_doc.id_dogovor=dogovor.id
LEFT OUTER JOIN status ON status.id=dogovor.id_status
LEFT OUTER JOIN user ON  user.id=dogovor.id_user
LEFT OUTER JOIN rashod ON dogovor.id_rashod=rashod.id
LEFT OUTER JOIN tips ON dogovor.id_tips=tips.id
LEFT OUTER JOIN finans ON dogovor.id_finans=finans.id

Спасибо, работает

Ошибка. У меня база на MySQL

Есть три таблицы данных вида:

dogovor     |     finans    |       buh_doc
------------   |     ---------    |      -------------
id_finans   |     статья    |      id_dogovor
                                       |     сумма
                                       |     дата

т.е. есть договор, у него есть статья расходов и несколько сумм с разными датами.
Может быть несколько разных договоров с одной статьёй и разными суммами

Необходимо свести в оду таблицу запросом что бы получить сумму по каждой статье без разбивки по договорам

9

(7 replies, posted in Russian)

С диска он открывает, а вот с базы

10

(7 replies, posted in Russian)

Файл у меня открывается сразу двойным кликом, хотелось бы предпросмотр перед открытием. А возможно файл передать напрямую в TWebBrowser? по крайней мере pdf будет отображаться.

11

(7 replies, posted in Russian)

Возможно ли реализовать предпросмотр файлов типа Word, Excel, pdf сохраненных в базе?

12

(2 replies, posted in Russian)

И ещё вопрос - с какими ключами можно запускать скомпилированный экзешник?

13

(2 replies, posted in Russian)

Сделал инсталятор программы. По умолчанию ставит в Program Files при этом после закрытия выскакивает ошибка. На сколько я понял, необходимы права Администратора для изменения файла (при запуске с правами Админа все работает нормально). Подскажите способ выдавать права при установке программы автоматически т.к. необходимо установить программу на несколько машин и не вариант ходить и всем ручками выставлять права.

14

(2 replies, posted in Russian)

Спасибо, все работает

15

(2 replies, posted in Russian)

Есть большая база(на MySQL), прикрепленные файлы хранятся прямо в базе. Необходимо выгрузить все файлы на диск.

Подскажите как сделать. Необходимо в TableGrid вывести данные из Excel не внося в базу данных.
По замыслу есть два TableGrid в одной данные из базы в другой из Excel. Скриптом сравниваем строки и из временной вносим недостающие данные в базу.

17

(3 replies, posted in Russian)

Проект очень большой и на MySQL

таблица имеет вид:

id | Текстовое поле|Текстовое поле|
|Значение1       |Значение2       |
|Значение2       |Значение3       |

18

(3 replies, posted in Russian)

Есть форма, на форме ComboBox с MultiSelect и таблица. Необходимо чтобы при открытии в  ComboBox были выбраны значения из таблицы. Пробовал такой скрипт:

procedure edit_OnShow (Sender: string; Action: string);
  var
  i,r,c : integer;

begin
     c := edit.TableGrid6.RowCount - 1;
          for r := 0 to c do
              begin
                  i := StrToInt(edit.TableGrid6.Cells[0,r]);
                 edit.ComboBox8.ItemsChecked[i] := True ;
             end;
 end;

Работает только если в таблице одно значение, если больше уже не срабатывает.
Подскажите как сделать.

И ещё вопрос - какое значение edit.ComboBox8.ItemsChecked[?] := True ; должно быть чтобы не было выделено не одной записи? При 0 - выделено всё, при -1 - ошибка.

19

(3 replies, posted in Russian)

Form1.TableGrid1.HeaderSize:=28;

событие - OnChenge,
размер под две строки

в свойствах кнопки "Сохранить" убираешь галку закрывать после сохранения и прописываешь AfterClic -

Button1.dbGeneralTableId

ну и или в переменную или ещё куда

сумбурно но как-то так

21

(5 replies, posted in Russian)

Спасибо, все работает

22

(5 replies, posted in Russian)

Что, ни у кого ни каких идей не будет?

23

(5 replies, posted in Russian)

При выполнении в моем проекте выдает ошибку (во вложении). Вероятно связано с тем что у меня проект на MySQL

24

(5 replies, posted in Russian)

подскажите синтаксис SQL запроса для сохранения файла в базе данных

пробовал так:

INSERT INTO test (file, file_filename, name)
VALUES (:file, {Edit3}, {Edit2});

не работает

Если таблицу заполнять SQL запросом то можно сделать так - ROUND( значение, 3)