Englische Fehlermeldungen trotz deutschem Delphi

[CodeX]

Ich verwende das deutsche Delphi 2006 Pro.
Nun möchte ich, dass wenn ein Exception-Fehler auftritt, dass dann die Fehlermeldung auf Englisch erscheint.
Ich habe es auf einer englischen Windows-Version getestet. Manche Fehler werden über die Sprache des OS gesteuert, manche scheinbar vom verwendeten Compiler.

Beispiel:
Syserrormessage(MyInt) zeigt die Meldung in der Sprache des OS an.
-> gut so

Greife ich auf Printer.PrinterIndex zu und es ist kein Drucker installiert, so erhalte ich im Debugger diese Meldung:
"Im Projekt ist eine Exception der Klasse EPrinter mit der Meldung 'Zur Zeit ist kein Standard-Drucker gewählt' aufgetreten."
Anschließend die Programmmeldung: "Zur Zeit ist kein Standard-Drucker gewählt" - sowohl bei deutschem als auch bei englischem OS.
-> nicht gut

Was muss man tun, um wirklich alles entweder an die OS Sprache anzupassen oder einfachheitshalber auf Englisch umzustellen?

[SirThornberry]

du musst diese Fehlermeldung mit "try-Except" abfangen und kannst dementsprechend dann eine eigene Fehlermeldung anzeigen.

[CodeX]

Zitat:

Zitat von SirThornberry

du musst diese Fehlermeldung mit "try-Except" abfangen und kannst dementsprechend dann eine eigene Fehlermeldung anzeigen.

Es ist weder mir, noch irgendjemandem möglich, alle möglichen Fehlermeldungen vorherzusehen und alles was nur geht mit try except abzufangen.
Die Exceptions sind schon in Ordnung. Sie liefern Standard-Fehlermeldungen. Nur eben nicht in der gewünschten Sprache.
Das gepostete Beispiel dient der Veranschaulichtung. Es ist momentan das einzige, das ich reproduzieren kann.

[g-hun]

wenn du es mit try-except nicht machen möchtest kannst du es auch mit if-bedingungen machen.
da kommt es jedoch darauf an was du programmieren möchtest :???:

[mkinzler]

Du mußt ja nicht alle Fehlermeldungen im einzelnen abfangen. Es reicht ja alle ersichtlichen Stellen in deinem Programm abzusichern (sei es über try-except oder andere Möglichkeiten wir Try... bei Typounwandlungen, Eingabeüberprüfungen) und vielleicht einen globalen try..except Block, der nur das Anzeigen der deutschen Fehlermeldungen verhindert.

[DGL-luke]

Mal im Forum suchen, ich hab da schon was gelesen. Glaube das bezog sich auf D2005, jedenfalls gibt es auf dem Datenträger diese "Sprachdateien" in Englisch und mit einer kleinen Exe kann man die austauschen.

[CodeX]

Was ist ersichtlich?

Die bisherigen Antworten gehen leider an meiner Frage vorbei. Es ist mir schon klar, dass und wie ich Fehler abfangen kann. Trotzdem wird es mir nicht gelingen. Und in diesen Fällen soll die Meldung auf Englisch und nicht auf Deutsch erscheinen. Das muss doch irgendwie machbar sein. Irgendetwas umstellen oder bestimmte Dateien ersetzen?

@DGL-luke
Ich meine das auch irgendwo mal gelesen zu haben. Bevor ich hier poste, suche ich immer zuerst. Leider habe ich diesmal dazu nichts gefunden.

[Hansa]

Wo die Sprache bei Fehlermeldungen genau herkommt ist mir auch nicht klar. Spielt bei mir auch keine Rolle. Aber selbst die deutschen Standard-Fehlermeldungen sind meistens wenig- bzw. nichtssagend. Wegen der vielen Möglichkeiten sind sie allerdings durchnummeriert und in Klassen aufgeteilt. Wenn sich das mit der Sprache nicht eindeutig klären läßt, dann baue Dir eventuell wirklich besser einen eigenen Exception-Handler. Z.B. so :

Delphi-Quellcode:

procedure TfrmMain.MainException (Sender : TObject;E : Exception);
begin
  showmessage ('Fehler : ' + E.Message + #10#13 +
               'Klasse : ' + E.ClassName)
end;

procedure TfrmMain.FormCreate(Sender: TObject);
begin
 Application.OnException := MainException;
end;

Die Methoden des Exception-Objekts würde ich mir auch mal ansehen. Da ist einiges zu machen.

[Phistev]

Check mal VCLUS.cab auf der vierten CD, das könnte sein, was du suchst. Backups nicht vergessen.

[CodeX]

Zitat:

Zitat von Phistev

Check mal VCLUS.cab auf der vierten CD, das könnte sein, was du suchst. Backups nicht vergessen.

super! genau das wars. hab die VCLUS.cab ins delphi verzeichnis entpackt und die vorhandenen dateien überschrieben.
jetzt heißts "There is no default printer currently selected." :thumb: