MsgDlg Knöpfe auch übersetzen

[Nicodius]

ja aber es soll ja international sein :mrgreen:

[Luckie]

Nimm eine Mesaagebox, diese hat immer die Sprache des installierten Systems.

[Nicodius]

aj das versteh ich ;) allerdings will ich ja das der benutzer PROGRAMMINTERN die sprache wählen kann :)

[alcaeus]

Na dann definiere dir deine eigene Funktion MessageDlg, die einfach die entsprechenden Sprachstrings ladet, das Symbol auswählt, die Buttonliste durchparst und danach die fertige Box mit dem bereits erwähnten Befehl "MessageBox" anzeigt. Das sollte doch nicht das Problem sein, oder?Wenn du in deinem Programm eine Funktion definierst, die bereits definiert ist, so wird die alte Funktion überschrieben, das gilt eben auch für MessageDlg.

[Robert Marquardt]

Das einfachste ist es die Windows-Dialoge zu verwenden. Siehe MessageBox etc.
Diese Dialoge sind zur installierten Windows-Version lokalisiert.
Die Delphi-Dialoge sind nicht sonderlcih gut ausgedacht.

[alcaeus]

Zitat:

Zitat von Nicodius

allerdings will ich ja das der benutzer PROGRAMMINTERN die sprache wählen kann

Ich glaube er will die Sprache unabhängig vom Betriebssystem festlegen. Deshalb ist das Überladen oder Überschreiben von Funktionen die beste Lösung. Beim Überschreiben hast du den Vorteil, dass du die bisherigen MessageDlg-Aufrufe nicht ändern musst. Es steckt aber viel Aufwand dahinter.

Greetz
alcaeus

[Nicodius]

haha das mit dem überladen hb ich eh schon gepostet das ichs jetzt mach ;)

[Bernhard Geyer]

Falls Du ein paar € ausgeben kannst, so schau mal das ElPack an.

Dort gibt es eine ElPrompt-Dialog-Klasse, in der die Button-Text übersetzbar sind.

Dafür könntest Du ein MessageDlg-Funktion schreiben, welche die Button-Caption vor dem Aufruf des Dialogs übersetzt.
Für die Einbau hast Du 2 Möglichkeiten:

1, Du ersetzt überall im Programm die ShowMeessage/MesssageDlg-Aufruf auf diene MyShowMessage-Funktion

2, Du verwendest die TNT-Realisierung, um Delphi-RTL-Funktionen zu hooken (Wie es die InstallTntSystemUpdates-Funktion ein paar Buggy-Delphi-Funktionen realsiiert), um statt der Orginal-Funktion deine erstellt mehrsprachige Version aufzurufen.

[FriFra]

Wie wär's denn damit ;)
http://www.swissdelphicenter.ch/de/showcode.php?id=946

P.S.: Ich versteh erhrlich gesagt nicht ganz, warum bei so vielen "Anworten" noch keiner gemerkt hat worum es eigentlich geht...

[Bernhard Geyer]

Zitat:

Zitat von FriFra

Wie wär's denn damit ;)
http://www.swissdelphicenter.ch/de/showcode.php?id=946

P.S.: Ich versteh erhrlich gesagt nicht ganz, warum bei so vielen "Anworten" noch keiner gemerkt hat worum es eigentlich geht...

Auch 'ne Möglichkeit. Kannt ich noch nicht. Aber meine Lösung (mit ElPack) kann auch Unicode 8) (auch wenn's für DE/EN/FR nicht benötigt wird)