This was my implementation of that routine
procedure TranslateUnitResourceStrings(const ResUnitName, BaseFilename,
Lang, FallbackLang: string);
begin
if (ResUnitName='') or (BaseFilename='') then exit;
//debugln('TranslateUnitResourceStrings
BaseFilename="',BaseFilename,'"');
if (FallbackLang<>'') then
DoTranslateUnitResourceStrings(ResUnitName,Format(BaseFilename,[Fallback
Lang]));
if (Lang<>'') then
DoTranslateUnitResourceStrings(ResUnitName,Format(BaseFilename,[Lang]));
end;
I did got it to work but I now have trouble getting the data. I think it
becouse you need to be loged in to go to the edit page.
index.php?title=Spezial:Export&action=submit&pages='+lbFoundPages.Items[
i]+'&curonly=true
This was you old line. If I follow the osF wiki I get a you are not
loged in message.
I gess we should be able to log in.
Met vriendelijke groet,
Pieter Valentijn
Delphidreams
http://www.delphidreams.nl
-----Oorspronkelijk bericht-----
Van: Christian Ulrich [mailto:[EMAIL PROTECTED]
Verzonden: donderdag 1 maart 2007 0:43
Aan: [email protected]
Onderwerp: Re: [lazarus] WikiHelp
> A demo of your XML file would be apreciated (all do I think I can
> produce it if I put in some time.
in folder defs in svn you have the english and german xml files just
copy
them to the output foolder
> I also had a error in this unit Utils in the routine
> I replaced the lines and I got it compiled but im not sure what I miss
> now. Its not part of your source so I gess it's a unit that comes with
> laz.
>
>
> procedure LoadLanguage(lang: string);
> begin
> if
> FileExists(ProgramDirectory+'languages'+Directoryseparator+Lang+'.po')
> then
> TranslateUnitResourceStrings
> // old line
> ('uintfstrconsts',ProgramDirectory+'languages'+Directoryseparator+Lang
> +'
> .po');
>
('uintfstrconsts',ProgramDirectory+'languages'+Directoryseparator+Lang+'
> .po','a','b');
> //
>
TranslateResourcestrings(ProgramDirectory+'languages'+Directoryseparator
> +Lang+'.mo');
> end;
I dont understand what you mean.
thats the definition of TranslateUnitResourceStrings in my lazarus:
function TranslateUnitResourceStrings(const ResUnitName, AFilename:
string
): boolean;
what is ,a,b in your changed one ?
these routiones are just for loading translations so its no big thing if
you
miss them.
Christian
_________________________________________________________________
To unsubscribe: mail [EMAIL PROTECTED] with
"unsubscribe" as the Subject
archives at http://www.lazarus.freepascal.org/mailarchives
_________________________________________________________________
To unsubscribe: mail [EMAIL PROTECTED] with
"unsubscribe" as the Subject
archives at http://www.lazarus.freepascal.org/mailarchives
