Topic: Newbie in My Visual Databse

Hi everyone,

I'm new here in this forum.. just want to ask if there is a  tutorial site, books on how to use MVD? i'm kinda curious in the script part I don't what is the function of the script part in the MVD.

I'm planning to create a simple inventory application hope i can create using MVD.

Thanks everyone.

-lemodizon

Re: Newbie in My Visual Databse

Hi Lemodizon,
Perhaps look here as a starting point.
http://myvisualdatabase.com/download/Bo … tabase.pdf
And for any specific help, then just ask through the forum and someone will get back to you.
Derek.

Re: Newbie in My Visual Databse

Hi derek,

thanks for the link.

-lemodizon

Re: Newbie in My Visual Databse

No problem, Lemodizon.
The 'script' side of MVD is generally where you might want to add some extra features to your application that can't be done within 'standard' MVD (and 'standard' MVD does do a great deal).
To use your example of an inventory application, 'standard' MVD will show your products, your stock levels, when something has dropped below a re-order level or is out of stock etc.  But you might want to show products that have fallen below re-order level in orange and out of stock products in red - that's a scenario when you would write a small procedure to go into your script..
Derek.

Re: Newbie in My Visual Databse

Hi Derek,

Thanks again.. Do you know who is the founder/ceo of "my visual database". i was trying to search when is MDV started.

I was exploring yesterday the MDV.  it is a great application.

-lemodizon

Re: Newbie in My Visual Databse

Hello lemodizon, Hi Derek

The creator of MVD is Dmitry I. who lives in Bulgaria.
For some time now, he has been abandoning the further development of MVD (which is a shame, I hear voices shouting "Come back, Dmitry).
Currently, he is pursuing an apprenticeship aimed at developing applications on the Internet, with the use of new programming languages (Python).
It could be that if he doesn't get the results he's looking for, he'll come back to MVD again.

As for the idea of putting MVD in open source, it is unthinkable because of the third-party programs involved for which Dmitry paid licenses.

Of course, we can only wish for the further development of MVD with Dmitry in action.

JB

Re: Newbie in My Visual Databse

Hi JB,

Thanks for the information, hope Dmitry I.... will come back and add more features on MVD.. I find MVD a great software.

what type of programming language is MVD or is this a programming language? or RDBMS software?

Hope MVD can help me on creating my inventory.

Thanks JB.

-lemodizon

Re: Newbie in My Visual Databse

MVD is RAD. ObjectPascal-based scripting language is used. In some cases, knowledge of the SQL is required.

Визуальное программирование: блог и телеграм-канал.

Re: Newbie in My Visual Databse

Hi k245,

Thanks for the information.

-lemodizon

Re: Newbie in My Visual Databse

Hi all,
Can anyone tell me the easiest way to to get the number of records in a table.
What i really want is the next sqlvalue so i would just add 1 to it.

Cheers

John

Re: Newbie in My Visual Databse

Hi John,
Try something like
  vrecordcount := sqlexecute('select count(*) from mytable');
where vrecordcount is declared as a local integer variable
The procedure you attach it to all depends on what you're doing in your program.
Derek.

Re: Newbie in My Visual Databse

Hello John, Hi Derek

You have many ways to always get what you want (dixit Mixk Jagger)

Pour compter le nombre de lignes d'une grille

procedure Grille_OnShow (Sender: string; Action: string);
Var i : Integer;
begin
     Grille.TableGrid1.dbUpdate;
    i := Grille.TableGrid1.RowCount;
    Grille.Label1.Caption := 'Il y a ' + IntToStr(i) + ' fiches dans la table Biblio';
end;


Or

procedure Form1_TableGrid1_OnChange (Sender: string; ACol, ARow: Integer);
var s: string;
begin
s := IntToStr (SQLExecute('SELECT count(id) FROM base') );
Form1.Label1.Caption:= ' Total : ' + s;
end;

Or

procedure Form1_TableGrid1_OnChange (Sender: TObject);
begin
    Form1.Label1.Caption := IntToStr(Form1.TableGrid1.RowCount);
end;

JB

Re: Newbie in My Visual Databse

jean.brezhonek wrote:

Hello John, Hi Derek

You have many ways to always get what you want (dixit Mixk Jagger)

Pour compter le nombre de lignes d'une grille

procedure Grille_OnShow (Sender: string; Action: string);
Var i : Integer;
begin
     Grille.TableGrid1.dbUpdate;
    i := Grille.TableGrid1.RowCount;
    Grille.Label1.Caption := 'Il y a ' + IntToStr(i) + ' fiches dans la table Biblio';
end;


Or

procedure Form1_TableGrid1_OnChange (Sender: string; ACol, ARow: Integer);
var s: string;
begin
s := IntToStr (SQLExecute('SELECT count(id) FROM base') );
Form1.Label1.Caption:= ' Total : ' + s;
end;

Or

procedure Form1_TableGrid1_OnChange (Sender: TObject);
begin
    Form1.Label1.Caption := IntToStr(Form1.TableGrid1.RowCount);
end;

JB


Hi JB,

i'm curious on how do you this in MVD do  you have a sample file on how it works..

thanks

-lemodizon

Re: Newbie in My Visual Databse

Hi Derek and Jb,

Many thanks to you both and it worked fine, and please excuse my stupidity.
But what i really need is the id value of the last record in the table, as i should have known
the total record number is only going to work if you never delete a record.

In advance, many thanks for your help.

John

Re: Newbie in My Visual Databse

Hi John, Salut JB,
Try it like this.
Look at line 48 in the script (ignore everything else in the attachment as I just grabbed the nearest program to hand as an example).
I've put the next available ID on a label but you could use anything.
Regards,
Derek.

Post's attachments

Attachment icon record count john.zip 400.21 kb, 224 downloads since 2022-05-18 

Re: Newbie in My Visual Databse

Derek that worked perfectly, many many thanks.

John

Re: Newbie in My Visual Databse

derek wrote:

Hi John, Salut JB,
Try it like this.
Look at line 48 in the script (ignore everything else in the attachment as I just grabbed the nearest program to hand as an example).
I've put the next available ID on a label but you could use anything.
Regards,
Derek.


Hi Derek,

I saw the file you shared. I can use this as my guide in putting  itemcode in every product on my practice program (inventory).

I still need to learn basic script in MVD.

thanks derek.

-lemodizon