Hello.
You still haven't received the email with a key?
My Visual Database → Posts by DriveSoft
Hello.
You still haven't received the email with a key?
Спасибо, исправлю.
Спасибо, подумаю над этим )
В настоящий момент идет работа над созданием новой документации. Можете ознакомиться с ней по данной ссылке
http://myvisualdatabase.com/doc_ru/
Буду рад выслушать ваши замечания и пожелания
Here you can find some materials
http://myvisualdatabase.com/forum/viewtopic.php?id=2277
Also you can study examples
http://myvisualdatabase.com/forum/viewforum.php?id=10
When you open form using script, you should call method dbUpdate for the TableGrid on this form.
Form2.TableGrid1.dbUpdate;
example:
LMsg.CCList.Add.Address := 'email1@gmail.com';
LMsg.CCList.Add.Address := 'email2@gmail.com';
LMsg.CCList.Add.Address := 'email3@gmail.com';
Check out this project
http://myvisualdatabase.com/forum/misc. … download=1
using this line you can add cc recipients
//LMsg.CCList.Add.Address := ''; // CC emails
Правильно будет
TreeView.OnDblClick := @TreeViewOnDoubleClick;
Также можете посмотреть данный проект с примером
Thank you, fixed.
http://myvisualdatabase.com/download/se … 20beta.zip
на форуме присутствует антиспам система, но видимо не справляется.
Everything is fine, I'm here )
Добрый вечер. Если я сейчас куплю лицензию на минорные обновления, а затем хочу на постоянную перейти, будет ли скидка?
Да, вы просто сможете доплатить разницу в цене.
Постраничный вывод записей в TableGrid
Проект с примером.
http://myvisualdatabase.com/forum/misc. … download=1
CONST
RECORS_LIMIT = 500;
procedure Form1_OnShow (Sender: TObject; Action: string);
begin
Form1.bSearch.Click;
end;
procedure Form1_bSearch_OnClick (Sender: TObject; var Cancel: boolean);
begin
Form1.GridEmployees.dbOffSet := 0;
end;
procedure Form1_bNext_OnClick (Sender: TObject; var Cancel: boolean);
begin
if Form1.GridEmployees.RowCount = 0 then exit;
Form1.GridEmployees.dbOffSet := Form1.GridEmployees.dbOffSet + RECORS_LIMIT;
Form1.GridEmployees.dbUpdate;
end;
procedure Form1_bPrev_OnClick (Sender: TObject; var Cancel: boolean);
begin
Form1.GridEmployees.dbOffSet := Form1.GridEmployees.dbOffSet - RECORS_LIMIT;
if Form1.GridEmployees.dbOffSet < 0 then Form1.GridEmployees.dbOffSet := 0;
Form1.GridEmployees.dbUpdate;
end;
begin
Form1.GridEmployees.dbLimit := RECORS_LIMIT;
end.
Сложновато понять, сделайте пожалуйста проект с примером
Да, конечно, на формате SQL тоже самое, и еще вопрос, как можно через ComboBox вытянуть из базы предыдущую запись, т.е. закрываешь путевку прописываешь конечный километраж, а при выдачи новой путевки конечный км. предыдущей путевки этого же авто вытягивался на начальный км. новой путевки? и как поменять текст в TableGrid ос чекбокса тоб значение было не (да/нет) а (закрыта/открыта) и при значении закрыто окрашивало всю строку в красный, очень буду признателен если поможете.
DriveSoft wrote:Покажите пожалуйста скриншот с настройках при импорте, когда возникает ошибка.
Пришлите пожалуйста данный CSV файл, можно малую его часть, протестирую. support@drive-software.com
У путевок есть дата и время закрытия? если да, то можно SQL запросом получить последний километраж
Form1.Edit1.Value := SQLExecute('SELECT km FROM putevka ORDER BY datetime DESC LIMIT 1');
либо просто получить максимальное значение километража
Form1.Edit1.Value := SQLExecute('SELECT MAX(km) FROM putevka');
Для закрыта/открыта создайте вычисляемое поле, где можете переопределить текст
(Case Bool_Field When 1 then 'Открыта' When 0 then 'Закрыта' End)
Увы нет такой возможности. Можно только изменить цвет фона и цвет текста в ячейке.
пример
procedure Form1_cbPrices_OnChange (Sender: TObject);
begin
Form1.Edit1.Value := SQLExecute('SELECT IFNULL(price, 0) FROM groups WHERE id=' + Form1.cbPrices.sqlValue);
end;
Check out this example, on form frmAbonent > Country
DriveSoft,
Thanks!
How to adjust number of days for trial, I cant seem to tweak/change it in the script in your example:
http://myvisualdatabase.com/forum/viewtopic.php?id=1434
In this line
if not reg.ValueExists('StartDate') then reg.WriteDate('StartDate', Now+30); // trial period is 30 days
Компоненты для ScrollBox также создаются динамически?
Создаваемые компоненты наследуют данную настройку у родительского компонента, поэтому для создаваемых компонентов укажите свойство BiDiMode := bdLeftToRight
а также ParentBiDiMode := False
Покажите пожалуйста скриншот с настройках при импорте, когда возникает ошибка.
My Visual Database → Posts by DriveSoft
Powered by PunBB, supported by Informer Technologies, Inc.
Theme Hydrogen by Kushi