TsiLang Components Suite 7.8.4, Delphi 10.4.1
1. Add the "Replace" dialog button to the "Translation Editor" expert window. For the "replacement" to work in the selected section of the "Translations" tree.
2.
For example, there is a code like this:
Code: Select all
procedure Test(a :integer);
begin
if a = 1 then begin
ShowMessage('bla-bla-bla');
Exit;
end;
end;
Code: Select all
procedure Test(a :integer);
begin
if a = 1 then begin
ShowMessage(siLangLinked.GetTextOrDefault('IDS_1' { 'bla-bla-bla' }));
Exit;
end;
end;
Is it possible to add an option to the TsiLang-Expert settings so that this text is added above the replacement line, at its beginning ?
Code: Select all
procedure Test(a :integer);
begin
if a = 1 then begin
{ 'bla-bla-bla' }
ShowMessage(siLangLinked.GetTextOrDefault('IDS_1'));
Exit;
end;
end;