...change each button's hint on the TDBNavigator ?
Author: Szabó János
*** Changing the TDBNavigator Buttons Hints ***
The buttons hints are english but sometimes would be better for local
use in other language. The possibility to change this hints is in principle
given (Hints property) but after changing the texts the compiled hints
remain the original.
The solution is simple: you have to use the LoadFromFile method to
load data from a file at run time. In this case the dbnButtonHints.txt
file is the the same directory as the compiled file.
The dbnButtonHints.txt file must contain all the 10 hints for the buttons
(nbFirst, nbPrior, nbNext, nbLast, nbInsert, nbDelete, nbEdit, nbPost, nbCancel,
nbRefresh) independently from the number of the visible buttons.
*** Veränderung der Hilfetexte von TDBNavigator-Knöpfe ***
Die Knöpfe haben englische Hilfetexte, die soll man manchmal auf andere Sprache
umstellen. Die Möglichkeit ist prinzipiell gegeben (Hints-Eigenschaft),
aber die compiled Hilfetexte bleiben unverändert englisch anstelle der übersetzten
Version.
Die Lösung ist einfach: man muß das LoadFromFile-Verfahren benutzen,
um die Hilfetext-Daten in Echtzeit aus einer Textdatei einzulesen.
Diese datei soll sich in gleichen Directory befinden wie die compiled Datei.
Die dbnButtonHints.txt-Hilfetext-Datei soll jederzeit alle 10 Hilfetexteintragen
enthalten, unabhängig von Anzahl der eben sichtbaren Druckknöpfe. Und läuft...
type
dbnNavigator: TDBNavigator;
procedure TfrmDataInput.FormCreate(Sender: TObject);
begin
dbnNavigator.Hints.LoadFromFile('dbnButtonHints.txt');
end;
printed from
www.swissdelphicenter.ch
developers knowledge base