Changeset 107
- Timestamp:
- May 6, 2019, 1:40:27 PM (6 years ago)
- Location:
- trunk
- Files:
-
- 2 added
- 5 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/Forms/UFormTargetCode.pas
r106 r107 8 8 Classes, SysUtils, FileUtil, SynEdit, SynHighlighterAny, SynHighlighterPas, 9 9 SynHighlighterCpp, SynHighlighterPHP, SynHighlighterJava, 10 SynHighlighterPython, Forms, Controls, Graphics, Dialogs, StdCtrls, Menus,11 ActnList, strutils;10 SynHighlighterPython, SynHighlighterJScript, Forms, Controls, Graphics, 11 Dialogs, StdCtrls, Menus, ActnList, strutils; 12 12 13 13 type … … 94 94 else if SourceExt = '.php' then SynEditTarget.Highlighter := TSynPhpSyn.Create(nil) 95 95 else if SourceExt = '.java' then SynEditTarget.Highlighter := TSynJavaSyn.Create(nil) 96 else if SourceExt = '.py' then SynEditTarget.Highlighter := TSynPythonSyn.Create(nil); 96 else if SourceExt = '.py' then SynEditTarget.Highlighter := TSynPythonSyn.Create(nil) 97 else if SourceExt = '.js' then SynEditTarget.Highlighter := TSynJScriptSyn.Create(nil); 97 98 end; 98 99 -
trunk/LazFuck.lpi
r102 r107 98 98 </Item6> 99 99 </RequiredPackages> 100 <Units Count="2 7">100 <Units Count="28"> 101 101 <Unit0> 102 102 <Filename Value="LazFuck.lpr"/> … … 249 249 <IsPartOfProject Value="True"/> 250 250 </Unit26> 251 <Unit27> 252 <Filename Value="Target\UTargetJavascript.pas"/> 253 <IsPartOfProject Value="True"/> 254 </Unit27> 251 255 </Units> 252 256 </ProjectOptions> -
trunk/UCore.lfm
r102 r107 3 3 OnDestroy = DataModuleDestroy 4 4 OldCreateOrder = False 5 Height = 4336 HorizontalOffset = 7937 VerticalOffset = 4448 Width = 5099 PPI = 1 445 Height = 361 6 HorizontalOffset = 661 7 VerticalOffset = 370 8 Width = 424 9 PPI = 120 10 10 object ApplicationInfo: TApplicationInfo 11 11 Identification = 1 … … 25 25 RegistryRoot = rrKeyCurrentUser 26 26 License = 'CC0' 27 left = 10828 top = 2 427 left = 90 28 top = 20 29 29 end 30 30 object CoolTranslator1: TCoolTranslator 31 31 POFilesFolder = 'Languages' 32 left = 10833 top = 10832 left = 90 33 top = 90 34 34 end 35 35 object LastOpenedList: TLastOpenedList 36 36 MaxCount = 10 37 left = 10838 top = 1 9237 left = 90 38 top = 160 39 39 end 40 40 object PersistentForm1: TPersistentForm 41 41 MinVisiblePart = 50 42 42 EntireVisible = False 43 left = 10844 top = 2 7643 left = 90 44 top = 230 45 45 end 46 46 object ImageListMain: TImageList 47 left = 3 7248 top = 2 447 left = 310 48 top = 20 49 49 Bitmap = { 50 4C691 C000000100000001000000000000000000000000000000000000000000050 4C691D0000001000000010000000000000000000000000000000000000000000 51 51 0000000000000000000000000000000000000000000000000000000000000000 52 52 000000000000000000000000000000000000000000FF000000FF000000FF0000 … … 944 944 0000000000000000000000000000000000000000000000000000000000000000 945 945 000000000000F3FFF515DCD3DA58DCD3DA57F3FFF61400000000000000000000 946 0000000000000000000000000000 946 0000000000000000000000000000A8EDF8FFA8EDF8FFA8EDF8FFA8EDF8FFA8ED 947 F8FFA8EDF8FFA8EDF8FFA8EDF8FFA8EDF8FFA8EDF8FFA8EDF8FFA8EDF8FFA8ED 948 F8FFA8EDF8FFA7EDF8FFCDF5FBFF4DDBF0FF4DDBF0FF4DDBF0FF4DDBF0FF4DDB 949 F0FF4DDBF0FF4DDBF0FF4DDBF0FF4DDBF0FF4DDBF0FF4DDBF0FF4DDBF0FF4DDB 950 F0FF4DDBF0FF4BDAF0FF99EAF6FF4FDBF0FF4FDBF0FF4FDBF0FF4FDBF0FF4FDB 951 F0FF4FDBF0FF4FDBF0FF4FDBF0FF4FDBF0FF4FDBF0FF4FDBF0FF4FDBF0FF4FDB 952 F0FF4FDBF0FF4DDBF0FF9AEAF6FF4FDBF0FF4FDBF0FF4FDBF0FF4FDBF0FF4FDB 953 F0FF4FDBF0FF4FDBF0FF4FDBF0FF4FDBF0FF4FDBF0FF4FDBF0FF4FDBF0FF4FDB 954 F0FF4FDBF0FF4DDBF0FF9AEAF6FF4FDBF0FF4FDBF0FF4FDBF0FF4FDBF0FF4FDB 955 F0FF4FDBF0FF4FDBF0FF4FDBF0FF4FDBF0FF4FDBF0FF4FDBF0FF4FDBF0FF4FDB 956 F0FF4FDBF0FF4DDBF0FF9AEAF6FF4FDBF0FF4FDBF0FF4FDBF0FF4FDBF0FF4FDB 957 F0FF4FDBF0FF4FDBF0FF4FDBF0FF4FDBF0FF4FDBF0FF4FDBF0FF4FDBF0FF4FDB 958 F0FF4FDBF0FF4DDBF0FF9AEAF6FF4FDBF0FF4FDBF0FF4FDBF0FF4FDBF0FF4FDB 959 F0FF4FDBF0FF4FDBF0FF4FDBF1FF4FDBF0FF4FDBF0FF4FDDF2FF4FDBF0FF4FDB 960 F0FF4FDDF2FF4DDBF0FF9AEAF6FF4FDBF0FF4FDBF0FF4FDBF0FF4FDBF0FF4FDB 961 F0FF4FDBF0FF4FD8EDFF41919CFF439AA6FF4FDBEFFF46ACBBFF3B7077FF3C75 962 7DFF48B6C6FF4DDBF0FF9AEAF6FF4FDBF0FF4FDBF0FF4FDBF0FF4FDBF0FF4FDB 963 F0FF4FDBF0FF4ED7EBFF385D61FF3B6E75FF4BC4D6FF344B4DFF386166FF3860 964 65FF3F858EFF4DD9EEFF9AEAF6FF4FDBF0FF4FDBF0FF4FDBF0FF4FDBF0FF4FDB 965 F0FF4FDBF0FF4ED7EBFF385F64FF3B7178FF49BBCCFF323E3FFF408993FF4CCA 966 DDFF4ED6EAFF4DDBF0FF9AEAF6FF4FDBF0FF4FDBF0FF4FDBF0FF4FDBF0FF4FDB 967 F0FF4FDBF0FF4ED7EBFF385F64FF3B6F76FF4ED4E9FF3D7880FF323C3CFF375A 968 5EFF45A7B5FF4DD9EFFF9AEAF6FF4FDBF0FF4FDBF0FF4FDBF0FF4FDBF0FF4FDC 969 F1FF4FDDF3FF4ED8EDFF385F64FF3B6E75FF4FDDF2FF4ED5EAFF46A8B6FF385F 970 64FF334345FF47B9CAFF9AECF8FF4FDBF0FF4FDBF0FF4FDBF0FF4FDCF1FF4BC3 971 D5FF4398A4FF4ABDCEFF365357FF3C757DFF49BACBFF3F848EFF4BC3D5FF45A3 972 B0FF313A3AFF43A6B5FF9AEDF9FF4FDBF0FF4FDBF0FF4FDBF0FF4FDDF2FF47AE 973 BDFF34484AFF344648FF334546FF46A8B6FF48B7C7FF355053FF344849FF3345 974 46FF385E62FF4AC8DBFF9AEBF7FF4EDBF0FF4EDBF0FF4EDBF0FF4EDBF0FF4EDA 975 EFFF49BDCEFF44A3B1FF48B9CAFF4ED9EEFF4FDCF1FF4BC7DAFF45A7B5FF45A8 976 B7FF4CCBDEFF4DDBF1FF9AEAF6FF64DFF2FF64DFF2FF64DFF2FF64DFF2FF64DF 977 F2FF64E1F3FF64E2F5FF64E1F4FF64DFF2FF64DFF2FF64E0F3FF64E2F5FF64E2 978 F5FF64E0F3FF62DFF1FFA6ECF7FF 947 979 } 948 980 end 949 981 object ScaleDPI1: TScaleDPI 950 982 AutoDetect = False 951 left = 3 72952 top = 1 20983 left = 310 984 top = 100 953 985 end 954 986 object ThemeManager: TThemeManager 955 left = 3 62956 top = 209987 left = 302 988 top = 174 957 989 end 958 990 end -
trunk/UCore.pas
r96 r107 54 54 UFormMain, Forms, LazFileUtils, 55 55 // Targets 56 UTargetInterpretter, UTargetFPC, UTargetJava, UTargetDelphi, 56 UTargetInterpretter, UTargetFPC, UTargetJava, UTargetDelphi, UTargetJavascript, 57 57 UTargetPHP, UTargetC, UTargetPython, UTargetCSharp; 58 58 … … 77 77 Targets.Add(TTargetPython.Create); 78 78 Targets.Add(TTargetCSharp.Create); 79 Targets.Add(TTargetJavascript.Create); 79 80 80 81 {$IFDEF Linux} -
trunk/UTarget.pas
r106 r107 411 411 'compiled' + DirectorySeparator + Name + DirectorySeparator + 412 412 ExtractFileNameOnly(ProjectFileName) + SourceExtension; 413 ForceDirectories UTF8(ExtractFilePath(CompiledFile));413 ForceDirectories(ExtractFilePath(CompiledFile)); 414 414 with TStringList.Create do 415 415 try … … 459 459 if not FileExistsUTF8(ExecutorPath) then 460 460 raise Exception.Create(Format(SExecutorNotFound, [ExecutorPath])); 461 if FileExists UTF8(CompiledFile) then461 if FileExists(CompiledFile) then 462 462 try 463 463 Process := TProcess.Create(nil);
Note:
See TracChangeset
for help on using the changeset viewer.