Changeset 157 for trunk/Packages


Ignore:
Timestamp:
Oct 21, 2017, 8:38:57 PM (7 years ago)
Author:
chronos
Message:
  • Fixed: Build under Lazarus 1.8.
File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/Packages/CoolTranslator/UCoolTranslator.pas

    r79 r157  
    197197  PropInfo: PPropInfo;
    198198  PropList: PPropList;
    199   Excludes: TComponentExcludes;
    200199begin
    201200  Count := GetTypeData(Component.ClassInfo)^.PropCount;
     
    413412  end;
    414413  if Lang = '' then
    415     LCLGetLanguageIDs(Lang, T);
     414    LazGetLanguageIDs(Lang, T);
    416415
    417416  if Assigned(Language) and (Language.Code = '') and Assigned(FOnAutomaticLanguage) then begin
     
    429428function TCoolTranslator.FindLocaleFileName(LCExt: string): string;
    430429var
    431   T: string;
    432430  Lang: string;
    433431begin
Note: See TracChangeset for help on using the changeset viewer.