801

(10 replies, posted in General)

Hello Dmitry

I'm coding an application with pictures and sounds.
For pictures and sounds, I use two available components  :

SaveImageInDatabase and SaveFileInDatabase.

It works fine.
With Arrows Up and Down, when I navigate in the grid, the picture
for every item of grid is well displayed.

Then, I would like to know if it is possible to launch sounds
corresponding (always when using Up and Down).

In summary, when arrows (Up or Down) stand on an item of the grid,
ii it possible to hear sound while viewing the image corresponding to the item of the grid ?

I've tried a PlaySound, but it seems that mmSystem is not implemented.
Nor with MediaPlayer := TMediaPlayer.Create(Application)

I had made the same application with Delphi 7 and all worked fine (even sounds).
But with Windows 8, Delphi 7 is out.
And I wanted made the same with MVD.

Thanks for your help

JB

802

(2 replies, posted in General)

Hello Dmitry

Could this link it be  the beginning of a track  ?

http://delphi.about.com/library/bluc/text/uc050601a.htm

JB

803

(9 replies, posted in General)

Hello Nightingale

Try this

procedure MyForm_TableGrid1_OnKeyUp (Sender: string; var Key: Word; Shift, Alt, Ctrl: boolean);
Var  Value : String;
begin
     Value1 := SQLExecute('SELECT myfield from mytable WHERE id=' + IntToStr(MyTable.TableGrid1.dbItemID) );
     MyForm.Memo1.Text := Value1;
end:

JB

804

(8 replies, posted in General)

Hello SupaBeast

Perhaps something like

SELECT * FROM mytable WHERE myfield like A%


JB

Hello Robotanex

Give us a detailed plan of your project (tables, planned operations on tables, presentation forms .....).
This can be a challenge for users of MVD and it may be able to help you.

What about you?

JB

806

(6 replies, posted in General)

Hello Derek

Nothing prevents combine the method of Dmitry and mine.

JB

807

(6 replies, posted in General)

Re-Hello Derek

I forget an important thing.

When the splash screen gets away, you have to free The timer by this procedure (when 5 seconds are out) .

procedure OnTimer (Sender: TObject);
begin
     Timer.Enabled := False;        / / Timer is deactived
     Form1_Splash.Close;         // The splash screen is closed
     Grille.Show;                           // First (main) form of the application appears
     Timer.Free;                           //  we release Timer   (not to use ressources)
end;

JB

808

(6 replies, posted in General)

Hello Derek

I use frequently splash screen when I launch my applications (standalone, out from MVD environment).

For this i use a Timer.

Here is a snippet of my code :

On opening my application, a splash screen is shown during 5 secondes  (5000 = 5 sec) then it  escapes to give hand to the user for the application.

    Timer          := TTimer.Create(nil);             // create timer
    Timer.OnTimer  := @OnTimer;               // event procedure
    Timer.Interval := 5000;                            // 5 sec
    Timer.Enabled  := True;                         // Start timer
    Form1_Splash.ShowModal;                // Show welcome screen

It is not really orthodox, but it works fine for me.

I put this code between Begin ... END. at the end of the script.

JB

809

(1 replies, posted in General)

Hello Dmitry

Let's say :

An application to manage any collection.
This application  shows pictures.
From the begining, for the DBImage, property Type was set to StoreFile.
Subsequently, we realize that with pictures embeded in the base, this one is growing and growing ....

We decide to store images in a separate file. Property Type is then set to LinkFile and we get a name for the folder
used to store pictures (using property CopyTo). And we go ahead with our new records.

As our base is already very high, we do not want to re-enter any records, we continue using LinkFile.

By taking each of the previously entered records and by applying  the button 'Delete the image from the database' from DBImage,
does this action delete really from the database the previously entered picture and therefore, is that the weight of the sql file found in all lightened ?

If not, what is the goal of the button 'Delete the image from the database' ?

Thanks for your advices ont this point.

JB

810

(10 replies, posted in General)

Hello Dmitry

All is now OK

I was coding another application with older version of MVD.
I've stop my PC and opened it again.

All wotks fine now

Thanks for your help

JB

811

(10 replies, posted in General)

Hello Dmitry

I've load the last version of MVD given in the link
and when I launch the example  Grid with Images.zip, I get this message

Could not convert variant of type (Null) into type Integer in 9:49

Oups !

JB

812

(10 replies, posted in General)

Hello

This perhaps

Form1.Edit1.Text  :=  Form1.ComboBox1.Text;

JB

813

(2 replies, posted in SQL queries)

Hello Dmitry

You're right.
A simple SEARCH action is enough.

I looked for a problem which did not exist

Thanks

JB

814

(2 replies, posted in SQL queries)

Hello Dmitry

Let's say we have an application managing video films on DVD.

Some of those DVD are too damaged and must be changed.

The damaged DVD are indicated by a checkBox (checked = DVD to change)

What will be the good SQL syntax to show those damaged DVD in a grid ?

I've try something  with SQLExecute mais it doesn't work fine.

Thanks for your lights

JB

815

(10 replies, posted in General)

Hello Dmitry

Thanks for this new feature
I know few developers which answer so fast the wishes of the users
You're really a big boss

My next wish for MVD : A TreeView (or a DBTreeView)

Thanks again
Best regards

JB

816

(10 replies, posted in General)

Sorry Dmitry

I missed your answer for such a question to  tcoton on the 2015-03-13 15:34:09
Best regards
JB

817

(10 replies, posted in General)

Hello Dmitry

With last version of MVD, is it possible to show a picture in a TableGrid.
For example, in an application managing videos, I would like something like this picture :

Thanks

JB

818

(2 replies, posted in General)

Thanks Dmitry

Well I see it is used with FastReport.

I have to read documentation to succeed with charts

It doesn't seem easy but it's really exciting !

JB

819

(2 replies, posted in General)

Hello Dmitry

Does MVD allow to embed Chart in any report ?

I've found an example in this forum but I can't play with it.
If yes, what the name of the Chart component ?
Have you any example of code to use it ?

Thakns

JB

820

(7 replies, posted in Script)

Thanks Dmitry

Now I understand why

If there is no secret to reveal it, what's the different meanings for
Ver=2
Ver=3

and I see now  Ver=4

verTables=1
verForms=1
version=2

Excuse my curiosity

Cordialy

JB

821

(7 replies, posted in Script)

Hello Dmitri and Mathias

Your script about Difference between 2 dates WITHOUT week-ends is very interesting.

Mais When I want launch Matthias's project WE, I got an error :

'The selected project was created by a newer version of this application and cannot be opened.

I'm using last version of MVD (1.50) loaded from official site ( Version: 1.49 (16 February 2015)

When I opened his WE.vdb, I read   [info] version=3

With my version 1.49, I read [info]  version=2

What's the matter with my version ?

Thanks

JB

822

(6 replies, posted in Talks about all)

Hello Mathmatou :

Pareil :

Je stocke tous les snippets de code que je récupère sur le forum de MVD
pour les réutiliser dans mes futures applis.
Ca me fait une espèce de FAQ
Pour cela j'utilise un vieux programme freeware de Christian Martinez :
SOFTNOTES  (en plus il est en français).

J'attends avec impatience que MVD embarque un TreeView (ou un DBTreeView) pour
me faire ma propre appli pour gérer les  snippets (ou tout autre type d'infos ou de notes).
C'est quand Dmitry veut bien l'envisager.

I look forward that MVD embedds  a TreeView (or a DBTreeView) to realize  my own app to manage snippets
(or quite different typeof information or notes).
It is when Dmitry is willing to envisage it.

Bonne soirée

JB

823

(16 replies, posted in Script)

Hello TCoton

I commonly use a ColorPicker to chose and modulate my colours for MVB
( ie ColorUtility, many are free and very efficient, some allow to copy the result
and you have only to paste it in MVB)

In Delphi, all colors code begin with a $ (ie Form1.Edit2.Font.Color := $00000033;)

Follow this link

https://fr.wikipedia.org/wiki/Liste_de_noms_de_couleur   (sorry, it's in French)

There are all Windows colors names with hexadecimal code, RGB code, CMJ and TSL codes)

Be aware, with Delphi values R and B (for RGB) are inverted : RGB becomes for Delphi BGR  (Blue - Green - Red)

From MVB you can select your own colors by Object Inspector (See attachement)

Cordialy

JB

824

(16 replies, posted in Script)

Sorry

When I wrote RVB for colors, i wanted to say RGB (in english - RVB is the same but in French)

JB

825

(16 replies, posted in Script)

Hello

I use two ways :

Form1.MyGrid.Color := clMoneyGreen;    // using name of Windows  colors

or

Form1.Edit2.Font.Color := $00000033;   // using hexa values (from a paint soft)

(As much as I remember, thr order oF RVB is not the same in delphi and HTML.
I would have to find this information)

JB