You are not logged in. Please login or register.
My Visual Database → Posts by DriveSoft
Приветствую,
Доработал проект, заменил
if Form1.Label4.Left < (-Form1.Label4.Width) then
begin
Form1.Label4.Left := Form1.Width;
end;на
if Form1.Label4.Left < (-Form1.Label4.Width) then
begin
Form1.Label4.Left := Form1.Width;
Timer.Interval := 10000; // пауза 10сек
end;mr_d
Thank you for the help, fixed.
Here you can download offline version of the help.
http://myvisualdatabase.com/forum/misc. … download=1
motorolla
Должно работать и при SQL запросе.
Пришлите пожалуйста ваш проект на support@drive-software.com
посмотрю в чем дело.
Приветствую,
к сожалению это кардинально не решит проблему безопасности, так как файл базы данных все так же, можно будет открыть любым SQLite browser'ом, и прочитать данные из таблиц, так как данные не шифруются.
Шифрование базы данных в будущем планируется.
motorolla
Нет, база сама не оптимизируется.
После этого, вам необходимо удалить все изображения из базы, это можно сделать SQL запросом:
UPDATE tablename SET imagefield = NULL, imagefield_filename=NULLзатем файл базы данных можно оптимизировать (перестроить, чтобы уменьшить ее размер) с помощью утилиты Sqlite Studio
(Меню: База данных > Сжатие)
SQLite не умеет производить регистронезависимый поиск не английского текста, возьмите файл sqlite.dll из дистрибутива My Visual Database, он модифицирован для решения этой проблемы.
в SQL запросе сделать так, чтобы например в гриде отображались только записи с id__statuszayavki = пустой, 1 и 2. Кроме 3.
SELECT
datavvoda,
textzayavki
FROM
zayavki
WHERE
id_statuszayavki<>3Ну или хотя бы - можно посмотреть пример, как отобразить только те записи у которых id_statuszayavki пустой.
SELECT
datavvoda,
textzayavki
FROM
zayavki
WHERE
id_statuszayavki IS NULLПриветствую,
к сожалению пока не реализовал возможность транзакции SQL запроса, но планируется.
Сделал для вас пример, как с помощью скрипта подсчитать итоговую сумму в гриде и поместить результат в подвал.
Скачайте пожалуйста данный проект с примером
Приветствую,
Можно получить количество записей в отдельно взятой таблице БД с помощью SQL запроса, затем сложить полученные значения из всех таблиц
var
i1, i2, i3: integer;
begin
i1 := SQLExecute('SELECT count(*) FROM tablename1');
i2 := SQLExecute('SELECT count(*) FROM tablename2');
i3 := SQLExecute('SELECT count(*) FROM tablename3');
Form1.Edit1.Text := IntToStr(i1+i2+i3);
end;функции для получения размера файла базы данных пока нету.
Данный отчет можно сделать без использования SQL запроса, используя кнопку с действием "Отчет"
просто добавив в список необходимые поля.
Доработал ваш проект, также добавил кнопку отчета на форму Form1
Unfortunately I was not able to understand what you need formula.
Thank you for ideas. Planned.
I added two function in version 1.48 beta
https://www.dropbox.com/s/6rz92s72djtmv … 8.zip?dl=0
procedure DirectoryCopy(const SourceDirName, DestDirName: string);
procedure DirectoryMove(const SourceDirName, DestDirName: string);тогда так:
SELECT
datavvoda,
textzayavki
FROM
zayavki
WHERE
(CASE WHEN {ComboBox1}=-1 then 1=1 else id_statuszayavki={ComboBox1} end) AND
id_statuszayavki<>2motorolla
Если в ComboBox пустое значение, то это -1
вам необходим запрос, чтобы при не выбранном статусе в ComboBox, были выведены все записи, вне зависимости от статуса?
I will add this function (Sleep) in version 1.48
Thanks.
I can't see in your database table, fields for sum.
You can write in calculated field: field1+field2
Also you can send me your project to support@drive-software.com
I'll try to help you.
поправил SQL запрос
SELECT
sklad.chassis
FROM sklad
WHERE
date('now') > date(sklad.date, '+30 days') ShellExecute in current version is not support, instead use OpenFile
procedure MenuClick5 (Sender: string); //copy Form
var
filename: string;
begin
filename := 'C:\program files (x86)\MVD Form Copier\MVDFormCopier.exe';
OpenFile(filename);
end;You can do it using script
Example:
Form1.Memo1.ScrollBars := ssNone; // The component has no scroll bars. (default)
Form1.Memo1.ScrollBars := ssHorizontal; // The component has a single scroll bar on the bottom edge.
Form1.Memo1.ScrollBars := ssVertical; // The component has a single scroll bar on the right edge.
Form1.Memo1.ScrollBars := ssBoth; // The component has a scroll bar on both the bottom and right edges.К сожалению такая структура таблиц думаю неверная.
На форме frmNew у вас есть компонент TableGrid, куда должны были бы добавляться дочерние записи таблицы stuff, но все добавляется опять в таблицу staff
вам необходимо пересмотреть структуру базы данных.
Приветствую,
думаю такой отчет можно сделать без применения SQL запроса, расположить компонент DateTimePicker на форме, в который с помощью скрипта установить нужную дату, объяснить будет сложновато, поэтому
Пришлите пожалуйста ваш проект на support@drive-software.com
с описанием, из какой таблицы нужен отчет.
попробуйте так:
SELECT
datavvoda,
textzayavki,
(case when {CheckBox1}=1 then "Да" else "Нет" end)
FROM
zayavki
WHERE
Date({DateTimePicker1}) < Date(zayavki.datavvoda) AND
Date(zayavki.datavvoda) < Date({DateTimePicker2})My Visual Database → Posts by DriveSoft
Powered by PunBB, supported by Informer Technologies, Inc.
Theme Hydrogen by Kushi