• Registered: 2017-05-23
  • Posts: 3

Topic: Прошу о помощи (примеры) работа с изображениями, скрипт

Добрый день , коллеги!

Прикрепил к базе картинки (фотографии) вопрос - как реализовать возможность их увеличения (приближение) через scroll на мышке.
При открытии файла изображения показывает максимальный размер картинки (или окна программы) нет возможности приближать.
Есть ли рабочие  примеры?

С какой версии программы можно сохранять изображения не в базе, а как ссылку на картинку, но при этом чтобы сохранялась возможность предварительного просмотра по скрипту:

procedure frmMain_TableGrid1_OnCellClick (Sender: string; ACol, ARow: Integer);
begin
     frmMain.DBImage1.Clear;
     frmMain.DBImage1.LoadFromDatabase('tech', 'shema', frmMain.TableGrid1.dbItemID);
end;

Есть идея для создания редактируемого окна программы - где можно рисовать линии и делать на них ссылки в строки базы(привязка по значению).
Как такое реализовать и есть ли рабочие примеры?

С Уважением, Алекс!
  • Registered: 2014-02-14
  • Posts: 10,294

Re: Прошу о помощи (примеры) работа с изображениями, скрипт

Здравствуйте.


В текущей версии нет возможности отловить скролл колесика мышки.


С какой версии программы можно сохранять изображения не в базе, а как ссылку на картинку, но при этом чтобы сохранялась возможность предварительного просмотра по скрипту:

К сожалению уже не вспомню.


Есть идея для создания редактируемого окна программы - где можно рисовать линии и делать на них ссылки в строки базы(привязка по значению).
Как такое реализовать и есть ли рабочие примеры?

сделал для вас пример:

Post's attachments

Attachment icon Lines to database.zip 10.61 kb, 322 downloads since 2017-05-24 

Dmitry.
  • Registered: 2017-05-23
  • Posts: 3

Re: Прошу о помощи (примеры) работа с изображениями, скрипт

Большое спасибо, Дмитрий.

Для обхода скролла - думаю принудительно задать открытие файла через программу. Как вариант mspaint.exe.
Требуется открывать файл который автоматически появляется при нажатии на строку базы.

Вставляю скрипт:

procedure frmMain_TableGrid1_OnCellClick (Sender: string; ACol, ARow: Integer);
begin
     frmMain.DBImage1.Clear;
     frmMain.DBImage1.LoadFromDatabase('tech', 'shema', frmMain.TableGrid1.dbItemID);
end;

procedure frmMain_DBImage1_OnClick (Sender: string);
begin
   OpenFile('imgFile' ,  'mspaint.exe');
end;

Открывается и картинка, и отдельно paint. Подскажите в чем ошибка, как принудительно открывать файл.

Работаю в бесплатной версии 1.44. На перспективу думаю приобрести Ваш продукт. Какие есть выгодные предложения?

DriveSoft wrote:

Здравствуйте.


В текущей версии нет возможности отловить скролл колесика мышки.


С какой версии программы можно сохранять изображения не в базе, а как ссылку на картинку, но при этом чтобы сохранялась возможность предварительного просмотра по скрипту:

К сожалению уже не вспомню.


Есть идея для создания редактируемого окна программы - где можно рисовать линии и делать на них ссылки в строки базы(привязка по значению).
Как такое реализовать и есть ли рабочие примеры?

сделал для вас пример:

С Уважением, Алекс!
  • Registered: 2014-02-14
  • Posts: 10,294

Re: Прошу о помощи (примеры) работа с изображениями, скрипт

DomninAlekcey
Какой метод у вас используется для сохранения изображений, непосредственно в базу данных? или в папке?

Dmitry.
  • Registered: 2017-05-23
  • Posts: 3

Re: Прошу о помощи (примеры) работа с изображениями, скрипт

Добрый вечер, Дмитрий.

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

С Уважением, Алекс!
  • Registered: 2014-02-14
  • Posts: 10,294

Re: Прошу о помощи (примеры) работа с изображениями, скрипт

Здравствуйте.


В версии 1.44 нет возможности хранить изображения вне базы данных, поэтому сделал пример в последней версии.


Файлы сохраняются в папке photo, также обратите внимание, для компонента Form1.DBImage1 установлены свойства
EnablePreview = False
ShowButtons = False


проект:

Post's attachments

Attachment icon LinkFile open file by script.zip 162.12 kb, 336 downloads since 2017-05-26 

Dmitry.