Skip to forum content
My Visual Database
A Simple Solution for Creating Databases
You are not logged in. Please login or register.
Active topics Unanswered topics
Search options (Page 375 of 400)
Topics by DriveSoft User defined search
Posts found: 9,351 to 9,375 of 9,999
Приветствую,
думаю будет лучше сделать это через вычисляемое поле, которое будет иметь следующий вид:
(case when [документ] is null then 'Нет' else 'Да' end)
через скрипт не рекомендую, т.к. придется делать проверку на наличие файла и все равно может возникнуть ошибка при сохранении файла в базу, а это сложновато отловить скриптом.
fkostya@mail.ru
Здравствуйте, здесь вы найдете все доступные функции, которые можно использовать в вычисляемом поле, но к сожалению возведение в степень в вычисляемом поле не доступно.
http://www.sqlite.org/lang_corefunc.html
http://www.sqlite.org/lang_aggfunc.html
Действительно функция Last_Insert_id вернет ноль если база данных была снова запущена без создания записи, думаю можно так:
Edit_pacient.Edit1.Text := VarToStr( SQLExecute('SELECT record_count FROM Counter WHERE id = (SELECT MAX(id) FROM Counter)') );
Попробуйте не использовать действие Показать форму, а вместо этого отображать форму с помощью скрипта
Hello,
Thank you for bug report, fixed, please download 1.43 version here:
https://www.dropbox.com/s/4qdlk4pouldrz … 201.43.zip
создайте событие кнопки OnClick которая имеет действие Показать форму, и в данном событие напишите:
Form1.PageControl1.ActivePageIndex := 2; // устанавливаем 3 вкладку активной, нумерация с нуля
К сожалению пока в таблицу не вывести путь к файлу и нет возможности его открыть непосредственно из таблицы, но будет реализовано в будущем.
Приветствую,
принцип действия такой же как и для других компонентов участвующих в поиске, добавьте компонент CheckBox в настройки кнопки поиска, также для компонент CheckBox заполните свойство TableName и FieldName
Также для CheckBox рекомендую установить свойство AllowGrayed в True, что позволит добавит для компонента третье состояние, которое позволит игнорировать его при поиске.
Thank you for feedback! )
Приветствую,
Добавил для этого метод ScrollToRow, пример скролит таблицу на последнюю строку:
Form1.TableGrid1.ScrollToRow(Form1.TableGrid1.RowCount-1);
Но перед этим скачайте версию 1.43
https://www.dropbox.com/s/4qdlk4pouldrz … 201.43.zip
Hello,
Can you send me screenshot or video to support@drive-software.com
Thanks.
Hello,
It is not possible in current version.
Thanks.
Hello,
In this video you can see how to use component Counter
https://www.youtube.com/watch?v=bG30pqCrw8k#t=938
In script you can get value from component Counter
Form1.EditCounter1.Text
Example:
ShowMessage(IntToStr(Form1.EditCounter1.Text));
Hram
можете самостоятельно скриптом добавить пункт меню, пример реализации:
http://myvisualdatabase.com/forum/misc. … download=1
Приветствую,
могу предложить изменять структуру базы данных с помощью бесплатной программы SQLite Studio, затем необходимо также изменить структуру базы через My Visual Database, при запуске проекта отказаться от пересоздания базы данных, таким образом данные не будут потеряны.
Sergius
Приветствую,
1. Есть такая особенность, в будущем надеюсь будет устранена, как вариант могу предложить изменять структуру базы данных с помощью бесплатной программы SQLite Studio, затем необходимо также изменить структуру базы через My Visual Database, при запуске проекта отказаться от пересоздания базы данных, таким образом данные не будут потеряны.
2. Имеете ввиду на вкладке "Таблицы базы данных"? спасибо, постараюсь поправить.
А что необходимо сделать, чтобы повторить данный баг?
К сожалению с Fast Report знаком поверхностно, можете задать вопрос на форуме поддержки Fast-Report
http://www.fast-report.com/ru/forum/ind … owforum=12
Hram
Можно, для этого есть функция Last_Insert_id, которая возвращает последний добавленный id для указанной таблицы.
SQLExecute ('UPDATE tablename SET record_count=record_count+1 WHERE id = ' + IntToStr(Last_Insert_id('tablename')) +';');
Hram
Ваш вариант запроса прибавит один ко всем записям поля record_count
вам необходимо еще указать идентификатор записи, которую необходимо изменить, добавив условие WHERE
SQLExecute ('UPDATE tablename SET record_count=record_count+1 WHERE id = 5;');
zhenja15
не нужно было удалять событие OnShow, код должен выглядить так, для примера "Вход по паролю"
procedure Form1_OnShow (Sender: string; Action: string);
begin
frmLogin.edPassword.PasswordChar := '*';
frmLogin.ShowModal; // show windows for login
end;
Чучкин Евгений
Перепроверьте имена компонентов, которые используете в SQL запросе, скорей всего ошиблись с их именами, т.к. вы пишите у вас есть компонент EDIT1, а в запросе пишите EDIT2
Hello,
Please, send me project to support@drive-software.com
Thanks.
Posts found: 9,351 to 9,375 of 9,999