• Registered: 2014-10-21
  • Posts: 89

Topic: Замена верхнего меню кнопками

Здравствуйте.
Возможно ли с помощью скрипта назначить на кнопки вызов диалога выбора места расположения файла базы данных и открытие редактора отчётов, которые вызываются из меню "Инструменты"?
Спасибо.

  • Registered: 2014-02-14
  • Posts: 10,294

Re: Замена верхнего меню кнопками

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


Можно, например так

procedure Form1_Button1_OnClick (Sender: string; var Cancel: boolean);
begin
     Form1.mniReport.Click; // откроет дизайнер отчета
end;


procedure Form1_Button2_OnClick (Sender: string; var Cancel: boolean);
begin
     Form1.mniDBLocation.Click; // вызов диалога выбора места расположения файла базы данных
end;

События OnClick необходимо создать, как описано в документации
http://myvisualdatabase.com/help_ru/scr … rview.html

Dmitry.
  • Registered: 2014-10-21
  • Posts: 89

Re: Замена верхнего меню кнопками

Спасибо.

  • From: Украина, Киев
  • Registered: 2014-10-23
  • Posts: 405

Re: Замена верхнего меню кнопками

Можно, например так

procedure Form1_Button1_OnClick (Sender: string; var Cancel: boolean);
begin
     Form1.mniReport.Click; // откроет дизайнер отчета
end;

Ошибка: незадекларирован идентификатор mniReport. Что ещё дописать?

Не боги горшки лепят!
  • Registered: 2014-02-14
  • Posts: 10,294

Re: Замена верхнего меню кнопками

kunar80
скорей всего у вас старая версия, скачайте последнюю.

Dmitry.
  • From: Украина, Киев
  • Registered: 2014-10-23
  • Posts: 405

Re: Замена верхнего меню кнопками

Крайняя 1.47

Не боги горшки лепят!
  • Registered: 2014-02-14
  • Posts: 10,294

Re: Замена верхнего меню кнопками

kunar80
Странно, проверил, работает, пришлите пожалуйста ваш проект, без удаления exe файлов из папки.
support@drive-software.com

Dmitry.