Problem gelöst!
Delphi-Quellcode:
function TGnuGettextInstance.gettext(
const szMsgId: MsgIdString): TranslatedUnicodeString;
var
domain: DomainString;
domainIndex: Integer;
begin
Result := dgettext(curmsgdomain, szMsgId);
if SearchAllDomains and (szMsgId <> '') then begin <------------- !!!!
domainIndex := 0;
while (Result = szMsgId) and (domainIndex < domainlist.count) do begin
domain := domainlist[domainIndex];
Result := dgettext(domain, szMsgId);
Inc(domainIndex);
end;
end;
end;
So banal, daß man sich schon fast schämen muß
Im xxxx.dpr DefaultInstance.SearchAllDomains:= TRUE; setzen
Und wer setzt jetzt die "offene Frage" zurück?
Schöne Grüße
Charly