Hi again Well it worked partially, it got the STATIC messages translated, but not the dynamic ones.
First of those are the error messages. I use a little wrapper procedure to show them (they are captions on a tpanel) Procedure ShowError(Error:String); Begin OKLinMain.ErrorLabel.Caption := Error; OKLinMain.ErrorLabel.Visible := True; Writeln(Error); end; Then wherever in the code is needed, I call showerror. So I defined resource strings for my error messages, and replaced the first few. Sure enough I could translate them, but the resulting program doesn´t show their translations. The static parts are all translating just fine, but these ones are not translating at all. showError(LoggedInUser+' '+Utf8ToAnsi(RsHasBeenLoggedout)) Moreover this is clearly not an ideal setup for them since the grammer would require the username to be elsewhere in the sentence sometimes (how do I handle that), and there is the even more complex part where I need to set a number of captions for a different form out of this unit later on: TrayIcon1.Hint := IntToStr(Units)+' Units remaining'; Popup1.Caption := IntToStr(Units)+' Units remaining'; Popup1.Panel1.Color := RGBToColor(227,108,42); Writeln(Units); Popup1.TextY.Caption := 'Welcome user '+LoggedInUser+LineEnding; Popup1.TextY.Caption := Popup1.TextY.Caption+'You have '+IntToStr(Units)+' time units left'+LineEnding; All of that should obviously ALSO be translated. How do I do that part please ? A.J. -- A.J. Venter CEO - OutKast Solutions C.C. http://www.outkastsolutions.co.za Cell: +27 83 455 9978 Fax: +27 21 413 2800 Office: +27 21 591 6766 _________________________________________________________________ To unsubscribe: mail [EMAIL PROTECTED] with "unsubscribe" as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
