8,076

(42 replies, posted in Russian)

Спасибо  )

8,077

(24 replies, posted in General)

tcoton
Can you send me project for test?
support@drive-software.com

8,078

(4 replies, posted in General)

All code after "end." will not run


Your code should look like this:

// Display History with select in database
procedure History_OnShow (Sender: string; Action: string);
begin
   History.MemoHistory.Text := SQLExecute('SELECT history FROM History WHERE id=1');
   History.MemoHistory.ScrollBars := ssVertical; // The component has a single scroll bar on the right edge.
end;

begin
     Form1.mniAbout.Visible := False;
end.

8,079

(1 replies, posted in General)

In current version you can't, but planned.

Menshikov
В качестве скриптов используется довольно распространенный язык Object Pascal, он же Delphi, по нему в Интернете много информации.


Боюсь получится очень толстая книга, если описать все возможности скриптов.

Тогда будет так


procedure frmEmployee_Button2_OnClick (Sender: string; var Cancel: boolean);
begin
     if CheckDublicate(frmEmployee.dbAction, 'employees', 'lastname', frmEmployee.edLastName.Text, frmEmployee.ButtonSave.dbGeneralTableId) AND
        CheckDublicate(frmEmployee.dbAction, 'employees', 'firstname', frmEmployee.edFistName.Text, frmEmployee.ButtonSave.dbGeneralTableId) AND
        CheckDublicate(frmEmployee.dbAction, 'employees', 'dateofbirth', FormatDateTime('yyyy-MM-DD 00:00:00.000', frmEmployee.dtDateOfBirth.Date), frmEmployee.ButtonSave.dbGeneralTableId)
     then
     begin
          ShowMessage('Person already exists.');
          Cancel := True;
     end;
end;

8,082

(4 replies, posted in General)

Hello,


You can do it using a script:

begin
     Form1.mniAbout.Visible := False;
end.

Не совсем, данную строчку можно вставить между

begin
   Form1.Button1.Default := True;
end. // именно end с точкой


Также сделал для вас проект

С помощью скрипта, для кнопки поиска необходимо установить значение Default := True, например:

Form1.Button1.Default := True;

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


скачайте пожалуйста данный пример
http://myvisualdatabase.com/forum/misc. … download=1

8,086

(31 replies, posted in Russian)

jazzitcool
Не могли бы вы скопировать текст ошибки и код.


Это никак не связано с пробным периодом, для того, чтобы проверить версию вашего проекта, в меню нажмите
"О Программе"

К сожалению в версии 1.44 нет возможности копирования файлов, данная функция для скрипта (CopyFile) была добавлена в более новых версиях.

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


Компонент DbFile имеет свойсво CopyTo, позволяет задать путь (в т.ч. и относительный) куда будет скопирован файл, также автоматически переименуется, если в данной папке уже есть такой файл.



Или вам нужен именно ваш вариант?

8,089

(9 replies, posted in Script)

Yes, you can use event OnChange from TableGrid and event OnShow from Form1 for auto update.


Please, send me your project to support@drive-software.com
with link on this topic.


Thanks.

8,090

(9 replies, posted in Script)

You can do it only using script and SQL query (SQLExecute function) then put result in TextBox


Also you can use event or timer for automatic updates this vallue.

8,091

(3 replies, posted in Script)

Unfortunately, this error was in the old version (1.45), try using the latest version. This error has been fixed.


Please, let me know result.

8,092

(3 replies, posted in Script)

Please, let me know more info.

- Version of My Visual Database?
- Several users are working with a database?
- How often an error?
- Please, send me project to support@drive-software.com for test



Thanks for bug report.

8,093

(5 replies, posted in General)

You can do it using script

// for ComboBox
    Form1.ComboBox1.TextHint := 'Status';
    Form1.ComboBox1.Style := csDropDown;


// for TextBox
    Form1.Edit1.TextHint := 'Last name';

8,094

(17 replies, posted in Script)

You have mixed types of field TEXT and BOOLEAN
I sent to you fixed project.

8,095

(17 replies, posted in Script)

By default (if you don't use SQL query), it should work the way you want (with Yes/No instead of 1/0)


Please, send me your project to support@drive-software.com

8,096

(17 replies, posted in Script)

Exactly where you want to see Yes/No and how?
Can you show me a screenshot?


Thanks.

8,097

(2 replies, posted in General)

If your key from bitsdujour.com then you can't upgrade for free.


On tab "The Fine Print" you can get more information about the license from Bitsdujour
http://www.bitsdujour.com/software/my-visual-database

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

8,099

(3 replies, posted in General)

Hello,


Official version is 1.48

8,100

(3 replies, posted in Russian)

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


Тогда все будет работать без скрипта.