Einzelnen Beitrag anzeigen

Benutzerbild von littleDave
littleDave

Registriert seit: 27. Apr 2006
Ort: München
556 Beiträge
 
Delphi 7 Professional
 
#3

Re: TTranslateShortCutText Komponente

  Alt 16. Nov 2008, 16:54
Also eine einfachere Möglichkeit, wie du es gemacht hast, fällt mir nicht ein. Ich hab das bei mir ähnlich gelöst: ich hab auch die Funktion "ShortCutToText" auf eine eigene Funktion umgeleitet. Die Funktion habe ich komplett aus der Menus.pas übernommen - das einzige was ich gemacht habe, ist das array mit den ShortCutTexten in der neuen Unit nochmal zu deklarieren - jedoch im Interface-Teil und nicht im Implementation-Teil, so dass ich den Inhalt einfach über die Multi-Language-Unit beliebig verändern kann.

Das gleiche habe ich auch noch mit der MessageDlg-Funktion gemacht. Das hab ich gemacht, um die Captions (mtWarning, mtInformation, ...) und die Button-Captions zu ändern. Das könntest du ja auch noch mit Einbauen.
Jabber: littleDave@jabber.org
in case of 1 is 0 do external raise while in public class of object array else repeat until 1 is 0
  Mit Zitat antworten Zitat