I replaced in my Delphi application the standard FindDialog with a siFindDialog.
Most of the text appears translated, except 2 small problems:
- the dialog caption 'Find' text stays untranslated;
- the Direction group is not resized to match the translation (the French translated word "Haut" = "Up" do not show the end t).
It's not big deal but:
Is this something known? Is there a simple solution?
Thanks,
Ioan
Find dialog
Resizing of dialog controls is not quite easy. For setting the caption you can use the following code:
Hope this helps.
Code: Select all
procedure TForm1.siFindDialog1Show(Sender: TObject);
const
begin
SendMessage(siFindDialog1.Handle, WM_SETTEXT, 0, Integer(PChar(siLang1.GetTextOrDefault('IDS_0' (* 'Find' *) ))));
end;
Best regards,
Igor Siticov.
Igor Siticov.