76

(11 replies, posted in Russian)

еще пожелание по поводу отчета. Можно ли будет в будущем сделать чтобы программа не писала "database is lock" при открытом отчете (при работе в сети у клиентов выскакивает это сообщение и лечится только закрытием отчета, составленного через SQL запрос)

77

(11 replies, posted in Russian)

Ожидается в планах пересоздание базы при изменениях без потери информации?

78

(11 replies, posted in Russian)

DriveSoft wrote:

Что нового?
- Добавлена возможность создать отчет без использования SQL запроса
- Улучшена навигация по формам, удобно в случае большого количество форм в вашем проекте
- Добавлено несколько новых функций для скрипта


Скачать новую версию можете по этой ссылке:
http://drive-software.com/download/myvisualdb.exe



С Уважением, Дмитрий.

Уххх долго ждал) Спасибо! Оценим)

Изображения
http://i7.pixs.ru:/thumbs/9/1/9/RRRRRR1JPG_2566569_13015919.jpg
http://i7.pixs.ru:/thumbs/9/2/0/RRRRRR2JPG_9362118_13015920.jpg

День добрый! Появилась необходимость в проекте добавить возможность вносить ремонт не с помощью textbox, а через справочник, но никак не могу подружить эти 2 метода ввода. Может как то можно реализовать, подскажите пожалуйста, проект отправлю Вам на почту, буду рад любой подсказке.
С Уважением Дмитрий

81

(16 replies, posted in Russian)

DenNik wrote:

mitrich45, оптимизируй так

frmApplication.DateTimePicker2.Checked:= frmApplication.CheckBox1.Checked;

спасибо!

82

(16 replies, posted in Russian)

заработал

procedure frmApplication_CheckBox1_OnClick (Sender: string);
  begin
  if frmApplication.CheckBox1.Checked = True then frmApplication.DateTimePicker2.Checked := True
  else frmApplication.DateTimePicker2.Checked := False; 
  end;

83

(16 replies, posted in Russian)

Спасибо работает!
Решил на этой основе написать скрипт, чтобы при нажатии на checkBox ставилась галка на дате DateTimePicker...но что то ругается...

begin
  if frmApplication.CheckBox1.Checked := 'True' then frmApplication.DateTimePicker2.Checked := True
  else frmApplication.DateTimePicker2.Checked := False;

84

(16 replies, posted in Russian)

День добрый! Спасибо за помощь с SQL запросом! Хочется побольше автоматизировать внесение данных. Как можно реализовать, чтобы при выборе определенной записи в comboboxе автоматически ставилась галочка в радиокнопке (DateTimePicker).
Например: При изменении статуса ремонта "готов", который выставляется через комбобокс, автоматически ставится галочка  даты готовности (DateTimePicker)

85

(9 replies, posted in Russian)

DriveSoft wrote:

My Visual database 1.41
скачать: http://myvisualdatabase.com/download/myvisualdb.exe


Что нового?
Добавлены функции для скрипта
- SQLExecute
- OpenFile
- OpenURL


Добавлены многие методы компонентов для использования в скриптах


Обновлена документация (раздел Скрипты)
http://myvisualdatabase.com/help_ru/


Исправлены ошибки.

Спасибо!

УРААА!! ЗАРАБОТАЛО! Спасибо Вам!

спасибо попробую

не знал про функцию ifnull, как понимаю она проверяет на заполнение данных на истину или ложь, если истина то пропускает, если false то  присваивает 0

именно ifnull вписывать?

DriveSoft wrote:

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

,ifnull(

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

,0) AS SumDetallPrice

можно по подробней, такого вида?

,is null(,0) AS SumDetallPrice
(SELECT SUM(detall.price) FROM detall WHERE detall.id_application = application.id)

может как то можно привязать к отчету или запросу функцию isNull чтобы поле не было пустым по умолчанию

TOTAL сработал для расчета в таблицах, но не в отчетах))). Подскажите пожалуйста как в строчке ниже добавить ноль к сложению, мне нужно чтобы получалось целое число, тоесть если поле было пустым то добавляется ноль

[SUM(StrToFloat(<Report."detall_price">),MasterData2)]



[SUM(StrToFloat(<Report."detall_price">),MasterData2) +0] не работает

Спасибо, TOTAL сработал, видимо он умеет складывать даже с учетом отсутствующих записей, а вот SUM работает только с целыми данными

Проще говоря как можно сделать чтобы эта процедура работала, если нет данных в таблице detall.price
(
(SELECT SUM(raboty.price) FROM raboty WHERE raboty.id_application = application.id)
+
(SELECT SUM(detall.price) FROM detall WHERE detall.id_application = application.id)
)

День добрый. Имеются 2 таблицы: TableGrid2, TableGrid3, Есть поле с формулой для расчета суммы данных в этих гридах: (CALCULATED:(\r\n(SELECT SUM(raboty.price) FROM raboty WHERE raboty.id_application ^equally^ application.id)\r\n+\r\n(SELECT SUM(detall.price) FROM detall WHERE detall.id_application ^equally^ application.id)\r\n)\r\n)

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

Пробовал через скрипт

procedure uslugi_OnClose (Sender: string; Action: string);
begin
   Detali.Button1.Click;

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

Может есть какой нибудь скрипт SQL для добавления новой ID записи в таблицу

форма  frmApplication (c двумя гридами) и 2 идентичных формы uslugi, Detali с кнопками сохранений и memo с нулевыми дефолтными значениями

Приветствую! "Лаг" пропал, есть конечно маленький остаток (пока не закроешь печатную форму нельзя редактировать записи в таблице), но это уже нестрашно, 3 рабочих места будет и думаю совпадения печати формы и редактирования записи особо не будет, но на край всегда можно прокричать во все горло "эйй у кого отчет открыт, закройте" Спасибо!

Спасибо Дмитрий, завтра на работе попробую, дома 1 только ноутбук, о результатах отпишусь

День добрый. Подскажите пожалуйста как справиться с багом такого рода: Запускаю программу на 2х клиентах, все работает, записи добавляются и редактируются одновременно, НО, если на любой машине нажать отчет в печатную форму, как другие клиенты срау же отваливаются и при попытке создать или отредактировать запись в базе падает ошибка database is locked.

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

День добрый, начал тестить расшаренную базу по сети, если на удаленной машине вбивают информацию, то на другой соответственно информация не обновляется в гриде. Как можно написать скрипт для обновления таблицы? Как понимаю процедура будет типа
procedure Form1_TableGrid1_OnMouseLeave