SiComponents Forums

Posted: **Wed Jul 19, 2006 2:22 pm**

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

Posted: **Thu Jul 20, 2006 8:54 am**

Resizing of dialog controls is not quite easy. For setting the caption you can use the following code:

Code: Select all

procedure TForm1.siFindDialog1Show(Sender: TObject);
const
begin
  SendMessage(siFindDialog1.Handle, WM_SETTEXT, 0, Integer(PChar(siLang1.GetTextOrDefault('IDS_0' (* 'Find' *) ))));
end;

Hope this helps.

SiComponents Forums

Find dialog

Find dialog