Zitat von
taveuni:
In der neuesten Version ist bei mir "Unterstütztes BS" leer.
Ups, ist mir garnicht aufgefallen
(hatte aber auch garnicht danach geguckt, weil ich doch eigentlich nichts geändert hatte,
außer die Lokalisierung für diese Liste abzuschalten ).
Delphi-Quellcode:
Function TForm1.LangCount(Typ, Name, Lang: String): Integer;
Var Nodes: IXMLDOMNodeList;
Begin
...
If Result = 0 Then Result := LangCount(Typ, Name, '*');
End;
Was eine kleine (mal absichtlich weggelassene) Zeile später für Auswirkungen haben kann.
Mal sehn, wie ich dieses dennoch besser lösen kann.
Denn falls man nun sprachabhänige und sprachunabhängige Texte hinterlegt, stimmt die Zählung nicht mehr, aber mir fällt ein, daß sie dann vorher auch nicht stimmte ... da hatte ich mir wohl was falsches gedacht ... und nein, Folgendes geht auch nicht.
If Lang <> '*' Then Inc(Result, LangCount(Typ, Name, '*'));
Aber da hier aktuell nix gemischt ist, geht es erstmal so.