101

(11 replies, posted in General)

Now a doubt has come to me: In the .pas file I created I had it start with 'begin' and end with 'end.'
Is this the correct way or should it be ended with end;? Or without begin and end?
end. could not go to interfere with the end. of the main project?

102

(11 replies, posted in General)

Hi Derek, Thanks for the usual clear and thorough explanations.
As often happens, you anticipate my questions, in fact I was just thinking about how it should have been done for a form model, the ones that are often used as the information form. Thank you very much!

103

(11 replies, posted in General)

Hi Derek, it's just as you guessed: I created a 'trad.pas' file where trad stands for 'tradurre', where I put the code for all the translations.
Now it works I was missing the '' and then I also had to put the .pas extension otherwise it would tell me it couldn't find the file.
Thank you so much derek, as always with the solution ready.
What do you think, for projects with little code is a library file better or a simple copy and paste would be better?

104

(11 replies, posted in General)

I created a file called 'trad.pas' inside the 'scripts' folder.
Then I wrote in a project this:

uses trad;

It gives me this error: Identifier expected at 1:5.
Cursor in front of 'Trad'.

derek wrote:

Привет Константин, Fabio,
Просто для информации, но я получаю ту же ошибку при загрузке проекта (я использую Windows 10 с MVD 6.5).
Однако я изменил «Frmmain.labDescription» на Frmmain.derek  (не очень оригинально!) в форме «FrmMain, изменил сценарий «classexplorer.vdb», а также в «UserApp.pas» (строки 311, 312, 313), и это кажется, решить проблему.
Но почему он вообще жалуется — загадка.
Derek.
.
Just for information, but I'm getting the same error when loading a project (I'm using Windows 10 with MVD 6.5).
However I changed  'Frmmain.labDescription' to Frmmain.derek' (not very original!)in form 'FrmMain, changed the 'classexplorer.vdb' script and also in the 'UserApp.pas (lines 311, 312, 313) and this seems to fix the problem.
But why it complains in the first place is a puzzle.

Yes, that allowed me to run the program. Thank you so much derek.

106

(32 replies, posted in General)

Asifmute wrote:

If you want to learn something new just follow DEREK.

Very true. He also has the ability to understand what you're asking even if you write it terribly. Furthermore, he always explains in a clear and understandable way what you are asking, sometimes even before you ask him.
This doesn't take anything away from the others who always strive to help those with a hard head like me and whom I will always thank.

Hi k245,
I tried downloading the project again from the page you linked.
The one in the attached screen shot is what happens to me when I run the project.

108

(11 replies, posted in General)

Hi k245,
thanks for the reply, actually i thought so but i didn't know for sure that you could put scripts in other files.
I didn't quite understand, however, if it is as I think, i.e. these files must have the .pas extension. From what you told me I think I understood the correctness of what I thought, that these files must be declared in 'uses'.
What then is not clear to me what is the code to call these files.

109

(11 replies, posted in General)

Good morning everyone and thank you for taking an interest in my request.
Going forward I realize that there are necessary pieces of code that can be used on various projects and that they are identical. A practical case could be that of translating messagebox.
According to an easy approach, a copy and paste would suffice.
According to a stylistic approach, however, it would seem more appropriate to create a library file that can be recalled in each project. Tell me if I'm talking nonsense.
Considering the Pascal course I'm following and also my hanging skills, if I understand correctly I should create a .pas file and declare it in the project in 'uses'.
Can you help me understand what the method is?
Thank you and greetings.

HI k245, hi everyone,
I had a look at your project downloaded from the page you indicated. Unfortunately I can't see what it does in practice because I can't run it. When I run it I get this error: "Undeclared identifier 'labDesñription' at 311:25". And he puts my cursor at the 25:18 position basically a few spaces after the "end" command.
I thought that the identifier maybe should have been "labDscription" instead of "labDesñription" but I really don't know which file to find it on.

111

(32 replies, posted in General)

Hi everyone. I have read the thread with interest and looked at your projects. It's all very interesting. Among other things, having never heard of this "Eisenhower matrix", I immediately went to find out what it was and I discovered something new.

Thanks derek and thanks to you too K245, I looked at the link and also the project but it's too advanced for me but maybe in part it answers a question I have in mind. Soon I will ask in the forum for a clarification to my doubts. Maybe one day I'll understand better, for now I'm following an online Pascal course.

Hi Derek, your solution works as always, thanks! How to disable the menu, as you said?

Is there the possibility of translating the menu that appears on click of the right mouse button, within a TabelGrid?

I tried trivially like this:

Translate('Copy_cell', 'Copia');

Unfortunately that would have been too good.

Thank you very much Vladimir, perfect!

Hello everyone and thank you for reading my request.
I would have liked to translate the tooltip that appears on the buttons for inserting or removing a photo from the control for inserting photos.
I have read this thread: http://myvisualdatabase.com/forum/viewtopic.php?id=5402
and I really thought that here was the right procedure but it doesn't translate anything for me.

Translate('Open_image_to_save_the_database', 'Scegli un''immagine'' da aggiungere');
Translate('Export_image_from_database', 'Esporta immagine dal database');
Translate('Delete_Image', 'Elimina immagine');

117

(9 replies, posted in General)

Ok, I understood everything. Thanks sparrow and Vladimir.

118

(9 replies, posted in General)

Hi sparrow and vladimir.
Thanks for the usual and clear information. I was missing this showmodal property.
Do you think there is anything in this code that could be improved?

119

(9 replies, posted in General)

Hi everyone,
I set only 1 day for the expiration of the trial to test its behavior right away.


    if iDays < 1 then
       begin
         if MessageDlg('Il periodo di prova è finito!'+#10+' Vuoi visitare la pagina per ordinarlo?', mtInformation, mbYes+mbNo, 0) = mrYes
           then OpenUrl('http://esempio.com');
             Form2.show;
             Form1.Close;
           Exit;
       end;

The problem arises when it expires.
Form2 which should allow registration opens for a moment and then the whole program closes, effectively not allowing the program to be registered.
Where could I put the Form1.close statement so that the program closes only if not registered?

Thanks to all and a greeting.

Wow, my first help in the forum. However, by creating the right fields, derek's project is certainly more practical and complete than mine.

Thanks derek, I always get lost in the dumbest things.
If you can, can you also take a look at the thread I opened on creating a trial version and tell me what's wrong?
Thank you!

Hello, for once I would have liked to help out but the inevitable Derek arrived first with his project always at the top.
But this time I would have beaten him at the photo finish smile if it hadn't been that I got stuck on a problem I thought I was past by now.
I always get lost on the usual stuff: in the attached project that I had attempted to create to answer the thread, each computer is assigned to all users instead of the one I would like. So I went from trying to help to seeking help.
derek, where that is wrong for the umpteenth time on the same thing? Thank you!

123

(9 replies, posted in General)

Thank you Vladimir. It was what I needed. Is there anything that could be improved in the code I wrote?

124

(9 replies, posted in General)

Hello everyone and thank you for reading my request. I've searched and read all the threads in the forum regarding developing code to create test versions.
What I managed to create is attached, I put my hand on the fire that you will be horrified at what you will see.
Aside from assuming there will be numerous fixes to be made, what I haven't been able to do is prevent re-registration if the software is already registered.
Thanks to all and greetings.

125

(6 replies, posted in General)

Thank you derek, always essential.