messageboxex & mehrsprachiger dialog

[_frank_]

hi,
ich versuche per messageboxEx einen mehrsprachigen dialog zu machen.
Ich vermute, ich muss die entsprechenden Sprachdefinitionen (LANG_*, SUBLANG_*) im System definiert haben (wo mach ich das?), weil die Schaltflächen sind immer in deutsch...

mal ein bisschen Quelltext:

Delphi-Quellcode:

function makelangid(p,s:word):word;
begin
  result:=p or (s shl 10);
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
  messageBoxEx(
    self.handle,
    PCHAR('text'),
    PCHAR('caption'),
    MB_YESNOCANCEL,
    makelangid(LANG_ENGLISH,SUBLANG_NEUTRAL)
  );
end;

Gruß Frank

[hille]

Hi,
was meinst du mit dialog?

Hille

[_frank_]

eine messagebox halt ;)
mir gehts da um die button-beschriftungen, die bei MessageBox* durch windows gesetzt werden.

[himitsu]

Zitat:

Zitat von hille

was meinst du mit dialog?

MessageBoxEx erstellt eine MessageBox, oder auch Dialog genannt :zwinker:


Aber er hat Recht ... ich hätte och gedacht, daß dann die Button in Englisch sein müßten, aber vermutlich muß auch noch das nötige Sprachprofil (die ganzen ResourceStrings und Co.) im Windows installiert sein.
Hier ist jedenfalls nur Deutsch drauf und ich vermute mal, daß daher keine andere Sprache möglich ist

auch mit makelangid(LANG_ENGLISH,SUBLANG_ENGLISH_US) nicht.

Na ja, ich lad' im Moment eh meine eigenen Sprachen ... behandle das ganze also selber, weil ich die Button natürlich in der selben Sprache wie im Rest des Programms haben will (dieser Mischmasch is sch***).


[edit]ich wünschte mir 'ne RedBox ._.

[hille]

Oh, naja, Und was passiert da genau?
Ich kann mir das gerade nicht vorstellen, weil ich keine Ahnung habe was diese Box macht!!

PS: Ich habe nähmlich so ein Problem mit Dialogen aber ich glaube das ist was anderes!

Hille

[himitsu]

MessageBoxEx ist was von der WinAPI ... man ruft sozusagen nur eine Prozedur von Windows auf, worin dann der gewünschte Dialog erstellt wird.
Und natürlich werden die Resourcen für den Dialog (wie z.B. die ButtonBezeichnungen) aus WindowsDLLs geladen.

Der DateiÖffnenDialog ist ja auch aus der WinAPI, aber da hab ich über eine netten Hook die Möglichkeit den Text der enthaltenen Objekte zu ändern.

Delphi-Quellcode:

SendMessage(GetDlgItem(hWnd, 1), WM_SETTEXT, 0, Integer(PChar('abc123')));

Das DialogItem 1 ist da z.B. der OK-Button ... einfach mal auf "OpenDialog" klicken und dort Rechts, der obere Button, da steht nicht OK drin :mrgreen:
http://www.delphipraxis.net/internal...=536694#536694

[hille]

Ah. Nagut. Damit beschäftige ich mich einanderes mal. Vielen Dank für die Erklärung, werde es mir merken.

Hille

[_frank_]

Zitat:

Zitat von himitsu

Na ja, ich lad' im Moment eh meine eigenen Sprachen ... behandle das ganze also selber, weil ich die Button natürlich in der selben Sprache wie im Rest des Programms haben will (dieser Mischmasch is sch***).

da geb ich dir Recht, wie machst du es denn mit den Message-boxen?
Gettext, eigene Forms oder etwas komplett anderes?

[himitsu]

Zitat:

Zitat von _frank_

da geb ich dir Recht, wie machst du es denn mit den Message-boxen?
Gettext, eigene Forms oder etwas komplett anderes?

Du kannst ja statt der MessageBox eine DialogBox verwenden, sollte Optisch auf's selbe rauskommen, nur daß man dort eine DialogProzedur einbinden kann, wo man dann z.B. bei WM_INITDIALOG ein bissl mit SendMessage und Co. an den Controls rumspielen kann.

CreateDialogIndirectParam, CreateDialogParam, DialogBoxIndirectParam, oder DialogBoxParam

[Bernhard Geyer]

Oder wie wärs mit dem TElPromptDialog vom ElPack?
Damit kann man sehr einfach die Captions der "Standarddialogbox" ersetzen. Und es geht auch mit Unicode auch unter Win9x/ME.