dklang
dklang copied to clipboard
GetConstantValue - missing constants
Hi, missing constants are annoying. But not being able to figure out which one is missing is even more annoying. That's why I made this adjustment in DKLang.pas :
class function TDKLanguageManager.GetConstantValue(const wsName: UnicodeString): UnicodeString; var l_Value : PDKLang_Constant; begin FSynchronizer.BeginRead; try // Result := FConstants.GetValues(wsName); // original code if FConstants.TryGetValue(wsName, l_Value) // my replacement then Result := l_Value.wsValue else Result := '"' + wsName + '"'; finally FSynchronizer.EndRead; end; end;
Maybe this may usefull for others also.