http://myvisualdatabase.com/download/myvisualdb4.6.exe
Была по моему еще бета версия 4.7 но, далее вышла 5.0

2

(63 replies, posted in Russian)

Доброго времени суток! Checkbox не позволяет менять цвет  "Caption", ни через визуальный интерфейс, ни через скрипт.

Form1.CheckBox1.Font.Color := clRed;

Версия программы MVDB 5.2

Дмитрий,  в виду того что Google Maps ввели обязательное использование API Key для полноценного пользования api запросом, нельзя ли в последующих версиях MVDB добавить альтернативу Яндекс карты ?

mcsimm wrote:

Добрый день, Дмитрий, есть ли скидка на версию 5 с минорными обновлениями для тех, кто пользовался версией 4.хх?

Дмитрий, добрый вечер, та же самая проблема! Рассылки не получал

Ошибка GoogleMaps

версия 2.6

Дмитрий, здравствуйте !
С выходом версии MVDB 4.6 обнаружился один досадный момент. После компиляции проекта в версии 4.6 сбивается выравнивание относительно границ формы, имеется ввиду визуальная компонента Anchors : Right, Up и т.д., в версии 2.5 такой проблемы нет. Исходники тестов скомпилированных в разных версиях программы прилагаются.

А также есть проблема , с отображением карт GoogleMaps на форме проекта стал выдавать ошибку (скриншот прилагается), данный момент не связан с версией программы. Скорее всего беда в системе Windows 10 (с её бесконечными обновлениями и ужесточением контроля "безопасности" системы ), в Window7 такой ошибки нет.

DriveSoft wrote:

Приветствую.


Посмотрите данный пример

Да,  Дмитрий, этот вариант работает в MYSQL, огромное спасибо!

Остался один вопрос: в строке скрипта

LoadFromStream(MemoryStream, 15)

что значит цифра 15 ?

Дмитрий, здравствуйте !
Возникла непредвиденная ситуация, в формате базы SQL скрипт работает как надо , а вот в формате MySQL ругается на строку:

Form1.SQLConnection.Execute(sSQL, Params);

Пробовал заменить на MySQLConnection, не помогает, подскажите что не так ?

DriveSoft wrote:

Приветствую.


Проект с примером
http://myvisualdatabase.com/forum/misc. … download=1

Спасибо  Дмитрий!! То, что надо.

Дмитрий, добрый день!
Не подскажите , на форуме не нашел, скрипт добавления файла в базу, зная его расположение.

Например по нажатию на Button без отображения диалога выбора файла (скриптом).

Дмитрий, здравствуйте !
Если не секрет, то какой (хотя бы ориентировочно)  новый функционал планируете добавить в версии 4.5 и 4.6 .
И, не помню точно где, но обсуждалась тема по взаимодействию MVDB с Web-камерой. В частности интересует возможность делать снимки напрямую с Web камеры, ну и совсем для полного счастья запись звука или видео, без привлечения сторонних программ. Понимаю, дерзко, наверняка и других просьб навалом, но все же.
За ранее, спасибо !

Дмитрий, попутный вопрос.
Как можно скопировать определенную строку из Memo , например 1 строку из Мемо в текстовое поле ?

DriveSoft wrote:

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

Дмитрий, спасибо!

DriveSoft wrote:

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

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

Всем, добрый день.
Дмитрий , не подскажите с помощью какой функции можно реализовать поиск файла в системе на всех дисках, зная имя файла и расширение. С последующим перемещением (либо копированием) в необходимую (указанную) директорию.
Ну и если можно с небольшим примерчиком. За ранее спасибо!

k245 wrote:

Проверил на Win7 - всё работает. Обратите внимание на название окна, которое вы хотите закрепить.

http://f5.s.qip.ru/pgTu2DMN.jpg

Константин, уже все перепроверил. Код в сообщении выше - это для примера. Дело в том что раньше , на Win10 работало, теперь ни в какую.

Дмитрий, здравствуйте.
Точно помню что запуск приложения на форме отлично работал, но до поры до времени в этом функционале не было острой необходимости. Теперь же на версии MVDB 4.3, запуск приложения производится, но без закрепления на форме проекта. В чем может быть проблема. (Windows 10)
Ваш пример когда-то использованного кода

procedure Form1_Button1_OnClick (Sender: string; var Cancel: boolean);
var
    h: integer;
    Max: integer;
begin
      // run calculator
      OpenFile('calc.exe');

      // finding window's calculator
      h := 0;
      Max := 20;
      while (h = 0) and (Max > 0) do
      begin
          h := FindWindow('', 'Calculator'); // find window using caption
          Dec(Max);
          Sleep(50);
      end;

      // move the calculator to the Form1
      if h <> 0 then
      begin
          SetWindowPos( h, 0, 10, 10, 0, 0, SWP_NOSIZE); // set position x=10, y=10
          SetParent( FindWindow('', 'Calculator'), Form1.Handle);
      end;
end;

Дмитрий, здравствуйте!
Возможно ли отобразить маркеры GoogleMaps на компоненте "Карта", через sql запрос. Уточню , допустим есть десять (а то и больше) записей с координатами местоположения объекта, как посредством sql запроса отобразить все маркеры указанных записей (по условию) на компоненте "Карта" одновременно.
И еще один вопрос, который является продолжением первого: Возможна ли реализация вывода дополнительной информации об объекте над маркером через Marker.MapLabel.Text согласно id записи . Имеется  ввиду при множественном показе маркеров.
За ранее, спасибо!
Можно на данном примере:

DriveSoft wrote:

Скачайте пожалуйста последнюю бета версию

Теперь изображение должно выводиться.

Дмитрий, спасибо ! Теперь все работает как надо

Дмитрий, здравствуйте!
Изображение хранится непосредственно в базе
Через визуальную компоненту MVDB (кнопка Поиск) изображение выводится в Grid  без проблем. Но при попытке сделать то же самое через кнопку с sql запросом изображение не выводится (появляется набор символов)

Пример запроса:

SELECT
person.firstname,
person.lastname,
person.address,
person.Tel,
person.photo

FROM Person 

Предполагаю что, что то необходимо дописать в запросе в строке person.photo_ ...... (может ошибаюсь)
Подскажите что делаю не так?

22

(25 replies, posted in Russian)

Дмитрий, здравствуйте!!!
Есть ли возможность реализовать "Отобразить окно проекта (а лучше определенной формы проекта) поверх всех окон Windows, при определенных условиях" , а не только готового проекта ?
Если данная функция уже существует, подскажите !
За ранее спасибо !

Дмитрий, здравствуйте !
Можно немного подробнее о введенном функционале в версии 4.1

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

2. Добавлено свойство "Scaled" для формы

3. Добавлено свойство "MarkersDraggable" для карты

4. Значение компонентов с формы теперь доступно в отчетах в качестве переменных

5. Добавлены функции Ping и PingEx

Если есть возможность, примерчик не помешал бы ) 
За ранее спасибо!

DriveSoft wrote:

Данное событие предназначено для перехвата ошибок связанных с исполнением SQL запросом. События для ошибок связанных с подключением к серверу пока не предусмотрено.

Ясно, жаль

Дмитрий, для какой версии программы данный скрипт ? На версии 3.4 не работает. Всплывает ошибка про неопределенный тип