Search options (Page 362 of 400)

This code for script page.

You can create event for form OnShow and read data from second database table using function SQLExecute and SQL query.

Скачайте снова бета версию 1.45, пришлось снова немного доработать.
https://www.dropbox.com/s/88lx13h9cw5ro … 5.zip?dl=0

Скачайте данный проект телефонного справочника, при нажатии на кнопки Print all (No SQL) и Print all (SQL)
формируется отчет, в принципе тоже самое, только вместо задач, абоненты и их телефоны.

Для реализации импорта, добавил новую функцию для скрипта, пожалуйста скачайте бета версию 1.45
https://www.dropbox.com/s/88lx13h9cw5ro … 5.zip?dl=0

Импортировать непосредственно Excel файл нельзя, поэтому сначала сохраните xls файл как csv (используя Excel)

Пример проекта с реализацией можете скачать по этой ссылке, так же в папке с проектом найдете готовый csv файл который можно импортировать.

var
   b1, b2: string;
begin
   if Form_redakt_idtv.CheckBox2.Checked then b1 := '1' else b1:= '0';
   if Form_redakt_idtv.CheckBox3.Checked then b2 := '1' else b2:= '0';

....
+ Form_redakt_idtv.Edit11.Text + '","'
+ Form_redakt_idtv.Edit10.Text + '","'
+ FormatDateTime('yyyy-MM-DD 00:00:00.000', Form_redakt_idtv.DateTimePicker1.DateTime) + '","'
+ FormatDateTime('yyyy-MM-DD 00:00:00.000', Form_redakt_idtv.DateTimePicker2.DateTime) + '",'
+ b2 + ','
+ b1 + ',"'
+ Form_redakt_idtv.id_TpodstModelTV.????!!!  + '","

только не ясно
Form_redakt_idtv.id_TpodstModelTV
какой это компонент? больше похоже на название внешнего ключа из таблицы БД )

чтобы понять, откуда ошибка, мне необходимо видеть весь запрос.

Отправьте пожалуйста ваш проект на support@drive-software.com
посмотрю, почему не работает.

Такой фокус не пройдет )
При любых экспериментах, просто сделайте копию своего проекта, и если что то пойдет не так, восстановите.

если вы сделали одинаковые изменения в структуре БД через программу SQLite Studio и через My Visual Database, то все будет в порядке.

в текущей версии можете включить скрол в Memo с помощью скрипта

Form1.Memo1.ScrollBars := ssBoth; // включение горизонтального и вертикального скрола

можете эту строчку кода разметить между
begin
// здесь выполняется код при старте программы
end.

В текущей версии, изменять структуру без потери данных, можно, используя стороннюю бесплатную программу SQLite Studio (http://sqlitestudio.pl/), затем необходимо также изменить структуру базы через My Visual Database, при запуске проекта отказаться от пересоздания базы данных, таким образом данные не будут потеряны.

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

Это можно сделать через кнопку с действием Поиск, либо непосредственно в настройках компонента TableGrid, т.о. в подвале компонента будут итоговые значения, более подробно об этом можно прочитать здесь
http://myvisualdatabase.com/help_ru/com … ooter.html

Please, look this topic.
http://myvisualdatabase.com/forum/viewtopic.php?id=459

Тогда лучше сделать по другому, у ComboBox создать событие OnChange

procedure Form2_ComboBox_OnChange (Sender: string);
begin
     if Form2.ComboBox.dbItemID = 1 then  // если выбран нужный пункт
        Form2.DateTimePicker1.Checked := True // тогда задействуем компонент для ввода даты
        else Form2.DateTimePicker1.Checked := False;  // иначе дата не пишется              
end;

и создать событие для формы OnShow

procedure Form2_OnShow (Sender: string; Action: string);
begin
     Form2_ComboBox_OnChange (''); // вызываем событие у ComboBox, чтобы при появлении формы это также работало
end;