3,876

(48 replies, posted in General)

AD1408
I checked, all fine, I see  images in cells. It's don't work for you?

3,877

(48 replies, posted in General)

AD1408 wrote:

Images are using "LinkFile" type.
What's causing the issue of not working on my example?
Perhaps there is a workaround...


In your project you using method "StoreFile", please check settings of component "dbiCoLogo" on form "frmCo"

3,878

(3 replies, posted in General)

lostdb
Check out this example:
http://myvisualdatabase.com/forum/misc. … download=1



Anyway it's not good idea to store credit card number in a local database, you should use MySQL client-server database, to prevent access to whole database file. Also you should use SSL connection:
http://dev.mysql.com/doc/refman/5.7/en/ … tions.html


But in the current version MVD not support SSL connection. Maybe you should use more advanced tool to provide more security of data.

3,879

(6 replies, posted in General)

lostdb
Postgresql or Firebird is not planned.


Why you want to include MySQL in your product?
It makes sense when you change the source code of MySQL and must distribute it together with own product. In this case you must to buy commercial license.


But in your case there is no need. Your client should himself download and install MySQL server community edition. And in this case, you and your client are freed from the purchase of commercial license of MySQL.

3,880

(48 replies, posted in General)

AD1408 wrote:

At this point only thing is remaining on this topic is displaying image in a tGrid cell. Please see form1 company tab.
Perhaps Dmitry could offer solution for it.


Unfortunately the example, which you use don't work when you store images in database.

3,881

(3 replies, posted in General)

it's rule of SMTP protocol, you can't change it.

3,882

(10 replies, posted in Russian)

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


procedure Form1_Button1_OnClick (Sender: string; var Cancel: boolean);
var
    i: integer;
begin
    for i := trunc(Form1.Edit2.Value) to trunc(Form1.Edit3.Value) do
        Form1.Memo1.Lines.Add(Form1.Edit1.Text + IntToStr(i) + Form1.Edit4.Text);
end;

3,883

(6 replies, posted in General)

Hello.


You must buy commercial license if you distribute MySQL with your product. If you product just connect to MySQL server, you don't need commercial license of MySQL.


from:
http://www.mysql.com/about/legal/licensing/oem/

For OEMs, ISVs, VARs and Other Distributors of Commercial Applications:
OEMs (Original Equipment Manufacturers), ISVs (Independent Software Vendors), VARs (Value Added Resellers) and other distributors that combine and distribute commercially licensed software with MySQL software and do not wish to distribute the source code for the commercially licensed software under version 2 of the GNU General Public License (the "GPL") must enter into a commercial license agreement with Oracle.


Also I can't recommend using SQLite for  20 users.

FROST
в MVD в принципе нет объектного программирования, это просто паскаль, т.е. вы не можете создать в нем класс, можете только воспользоваться существующими классами.


Зачем вам эта иерархия?

Все верно, иерархию классов можно посмотреть в документации VCL
http://docwiki.embarcadero.com/Librarie … /Main_Page


Нашел также иерархию от Delphi 5, думаю там не много изменилось касательно основных классов
https://imcs.dvfu.ru/lib.int/docs/Langu … Poster.pdf


Собственных классов в MVD не много: TComPort, TRegExp, TWord


Вкладывать вложения можно больше одного, но по очереди.

FROST wrote:

Начинаю изучение скриптового языка My Visual Database. Дмитрий, Вы можете предоставить для изучения объектную модель приложения?

А что это?

3,887

(8 replies, posted in Russian)

$autoinc - это сквозная нумерация, это значение не привязывается к записям, просто нумерация строк, прихватить не получиться.

3,888

(8 replies, posted in Russian)

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


procedure Form1_Button5_OnClick (Sender: string; var Cancel: boolean);
begin
    Form1.TableGrid1.dbSortField := 'id';
    Form1.TableGrid1.dbSortAsc := False;
    Form1.TableGrid1.dbUpdate;
end;

3,889

(8 replies, posted in Russian)

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


Вы можете сортировать записи в гриде просто кликнув по названию столбца, повторное нажатие столбца вызовет обратную сортировку.

3,890

(23 replies, posted in General)

AD1408 wrote:

Hi Dmitry,


True, it saves...
I was naming the file for instance abcd and when I click on backup database menu item to get save as dialog window, saved abcd file wasn't on the list. However, when I change Save as type combo and choose Any file they are shown on the list with Type as File while files saved with default name type were DB File.
Shouldn't files saved with custom name such as abcd automatically be assigned to DB File type?

Hello.


Please add this line

SaveDialog.DefaultExt := 'db';

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


Для многопользовательской работы рекомендую вам использовать MySQL, для этого необходимо иметь где либо на стороне MySQL сервер либо установить на собственный компьютер.


Начать разработку можете и на SQLite, как правило переключение на использование MySQL проблем не вызывает.


Использование удаленного рабочего стола в принципе самый лучший компромис если хотите использовать SQLite для многопользовательской работы через Интернерт.

3,892

(18 replies, posted in Russian)

Причина ошибки в том, что данное поле в БД было создано каким либо сторонним инструментом, т.к. MVD использует для поля ДА/НЕТ тип INT, вместо TINYINT


Но в принципе это не должно было бы вызывать ошибку, поэтому исправил это в самой программе. Скачайте пожалуйста последнюю бета версию и откомпилируйте с ее помощью ваш проект, ошибка должна исчезнуть
https://www.dropbox.com/s/1y0jek64gzfdy … a.zip?dl=0

Aleksandr.Filyanin wrote:

Я отправил исходник в личном сообщении на форуме.

Ответил вам на емейл.

3,894

(18 replies, posted in Russian)

К сожалению присланный вами архив не открывается, пишет что поврежден.

3,895

(4 replies, posted in General)

Hello.


I have tested, but unfortunately can't reproduce the error.

3,896

(13 replies, posted in Russian)

beniamin91
Скачайте последнюю версию программы
https://www.dropbox.com/s/1y0jek64gzfdy … a.zip?dl=0


Доработал, чтобы ComboBox с опцией MultiSelect заработал при поиске. Правда записи в результате поиска могут задваиваться в гриде, пока не могу это поправить

3,897

(35 replies, posted in Russian)

нашел в сети такое вот решение

SELECT
    CAST((strftime('%s', JulianDay(MAX("DateField"))) - strftime('%s', JulianDay(MIN("DateField")))) / (60 * 60 * 24) AS TEXT) || ' days ' ||
    CAST(((strftime('%s', JulianDay(MAX("DateField"))) - strftime('%s', JulianDay(MIN("DateField")))) % (60 * 60 * 24)) / (60 * 60) AS TEXT) || ':' ||
    CAST((((strftime('%s', JulianDay(MAX("DateField"))) - strftime('%s', JulianDay(MIN("DateField")))) % (60 * 60 * 24)) % (60 * 60)) / 60 AS TEXT)

FROM employees

показывает дни, часы и минуты

3,898

(23 replies, posted in General)

AD1408 wrote:

I found that it only saves/copies with hard coded file name. It's fine but user also should be able to save under the name they type in.
Is this possible?
At present it give the impression of saving with custom file name but it doesn't.


What do you mean hard coded? You can change file name in the SaveDialog, I checked it, it works.

3,899

(13 replies, posted in Russian)

Я посмотрел ваш проект, но у вас там все перепутано,
вместо события

procedure frmEmployee_OnShow (Sender: string; Action: string)

;
вы используете

procedure Form1_TableGrid1_OnCellDoubleClick (Sender: string; ACol, ARow: Integer); 

этого также не было в моем примере

idEmp := IntToStr(Form1.TableGrid1.dbItemID);

3,900

(35 replies, posted in Russian)

RZ-007
как должен выглядеть результат?