[Solved] Translation of ResourceString

[Lulu]

Hi all,
In my resourcestring, I write entry with multiple lines like this:

Code: Pascal  [Select][+][-]

1. ...
2.    resourcestring
3.       S_EXAMPLE1 = 'First line' + LineEnding + 'Second line';
4.       S_EXAMPLE2 = 'Player %s win the game';
5. .....
6. Label1.Caption := Format(S_EXAMPLE2, ['Bob']);

It work well and LineEnding is crossplatform.

[Remy Lebeau]

How about just using multi-line string literals? That feature has been available in FPC for a few months now.

https://forum.lazarus.freepascal.org/index.php/topic,46050.msg561813.html#msg561813

I'm assuming it works for resource strings, eg:

Code: Pascal  [Select][+][-]

1. resourcestring
2.   rReload = '''
3.    File:
4.    %s
5.    has been changed by another application.
6.    Should I reload it from disk ?
7.    ''';
8.  

Code: Pascal  [Select][+][-]

1. resourcestring
2.   S_EXAMPLE = '''
3.    First line
4.    Second line
5.    ''';
6.  

[Khrys]

That feature has been available in FPC for a few months now.

There are many nice things in trunk, but still no official release 🥲

Function references & anonymous functions, the LLVM backend (ASAN my beloved ❤️), constant generic parameters, implicit function specializations, move semantics for RAII managed records and of course multiline string literals... the list goes on, and it's a pity to see all these features stashed away untagged.

[Thaddy]

Yes, that works. Complete:

Code: Pascal  [Select][+][-]

1. program resstr;
2. {$ifdef fpc}{$mode objfpc}{$endif}
3. uses windows;
4. resourcestring
5.   test = '''
6.         Let's
7.          test
8.          that
9.          ''';
10.  
11. begin
12.   messagebox(0,PChar(test),'test me',MB_OK);
13. end.

Confuses the highlighter, though
And only in trunk/main.

Is equivalent to:

Code: Pascal  [Select][+][-]

1. {$ifdef fpc}{$mode objfpc}{$endif}
2. uses windows;
3. resourcestring
4.   test = 'Let''s'+LineEnding+'test'+LineEnding+'that';
5. begin
6.    messagebox(0,PChar(test),'test me',MB_OK);
7. end.

[Zvoni]

*sigh*
Guys, TS' problem is not the usage of the Ressourcestring directly.
His Problem is apparently that if his Ressourcestring has LineBreaks, they DON'T end up in the msgid-Parameter of the po-file resp. the translation in the msgstr.
Look closely at his first post

[jcmontherock]

Finally the Remy's solution is good with some little changes:

Code: Pascal  [Select][+][-]

1. ResourceString
2.   rReload      = 'File:\n%s\n has been changed by another application.\nShould I reload it from disk ?';
3. ...
4.  
5.   sStr := StringReplace(rReload, '\n', #13#10, [rfReplaceAll]);
6.   rc := Application.MessageBox(PChar(Format(sStr, [sPoFileName])), PChar(rFileChanged),
7.                                MB_YESNO or MB_ICONQUESTION);
8.  

Which gives the following po file:

Code: Pascal  [Select][+][-]

1. #: editpou.rreload
2. msgid "File:\\n%s\\n has been changed by another application.\\nShould I reload it from disk ?"
3. msgstr "Fichier:\\n%s\\na été modifié par une autre application.\\ndois-je le recharger du disque ?"
4.  

Thanks a lot to everybody.