Go Premium for a chance to win a PS4. Enter to Win

x
?
Solved

Changing the default record delete confirmation

Posted on 2000-03-05
4
Medium Priority
?
407 Views
Last Modified: 2010-04-04
I have many TTables and TDBNavigators in my app connected to a Paradox 7 db (using BDE).

What's the simplest way to change ALL the default delete record confirmation dialog boxes - those that appear when you press the "delete" function on the TDBNavigator? (I want to make it locale language)
0
Comment
Question by:idok
  • 2
4 Comments
 

Expert Comment

by:zb_russia
ID: 2586432
1. Search files:

Bdeconst.pas
Comconst.pas
Consts.pas
Dbconsts.pas
Ibconst.pas
Midconst.pas
Mxconsts.pas
Oleconst.pas
Webconst.pas
Sysconst.pas

2. Copy in a separate folder. Sample: MyLoc
3. Translate them. (in MyLoc)
4. In all projects, which you want localize, choose in the menu " to add in the project " and add all these files (or some).
5. Compile

Is taken from ru.delphi for Delphi 4.2
0
 

Author Comment

by:idok
ID: 2588402
No. I don't like that.

In my locale - I also need to reposition the "question" icon to the right side (RTL language).

So I want to catch the delete dialog appearing and replace it with my call - only trick is that I don't want to write so many exact same events on so many DBNav's.


0
 

Expert Comment

by:SuperSy
ID: 2630409
First of all, are you using the Resource DLL wizard to create a separate resource file?  

Oh, and what is your Delphi version?
0
 

Accepted Solution

by:
SuperSy earned 75 total points
ID: 2630459
Never mind all that.  I see you have a nice "HebMessageDlg" of your own already.  

Well, it looks like all the call to that "Delete records?" dialog is done in procedure TDBNavigator.BtnClick in "dbctrls".  

It seems like you already have a working "HebMessageDlg", so if you copy unit "dbctrls" into your project folder, change the MessageDlg() to your HebMessageDlg(), add your "dbctrls" to your project and compile.  

Hope it works!

0

Featured Post

Industry Leaders: We Want Your Opinion!

We value your feedback.

Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Creating an auto free TStringList The TStringList is a basic and frequently used object in Delphi. On many occasions, you may want to create a temporary list, process some items in the list and be done with the list. In such cases, you have to…
Hello everybody This Article will show you how to validate number with TEdit control, What's the TEdit control? TEdit is a standard Windows edit control on a form, it allows to user to write, read and copy/paste single line of text. Usua…
Integration Management Part 2
Look below the covers at a subform control , and the form that is inside it. Explore properties and see how easy it is to aggregate, get statistics, and synchronize results for your data. A Microsoft Access subform is used to show relevant calcul…

926 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question