Changeset 107 for trunk


Ignore:
Timestamp:
May 6, 2019, 1:40:27 PM (6 years ago)
Author:
chronos
Message:
  • Added: Javascript target.
Location:
trunk
Files:
2 added
5 edited

Legend:

Unmodified
Added
Removed

  • trunk/Forms/UFormTargetCode.pas

    r106 r107  
    88  Classes, SysUtils, FileUtil, SynEdit, SynHighlighterAny, SynHighlighterPas,
    99  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;
    1212
    1313type
    … …  
    9494  else if SourceExt = '.php' then SynEditTarget.Highlighter := TSynPhpSyn.Create(nil)
    9595  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);
    9798end;
    9899

  • trunk/LazFuck.lpi

    r102 r107  
    9898      </Item6>
    9999    </RequiredPackages>
    100     <Units Count="27">
     100    <Units Count="28">
    101101      <Unit0>
    102102        <Filename Value="LazFuck.lpr"/>
    … …  
    249249        <IsPartOfProject Value="True"/>
    250250      </Unit26>
     251      <Unit27>
     252        <Filename Value="Target\UTargetJavascript.pas"/>
     253        <IsPartOfProject Value="True"/>
     254      </Unit27>
    251255    </Units>
    252256  </ProjectOptions>

  • trunk/UCore.lfm

    r102 r107  
    33  OnDestroy = DataModuleDestroy
    44  OldCreateOrder = False
    5   Height = 433
    6   HorizontalOffset = 793
    7   VerticalOffset = 444
    8   Width = 509
    9   PPI = 144
     5  Height = 361
     6  HorizontalOffset = 661
     7  VerticalOffset = 370
     8  Width = 424
     9  PPI = 120
    1010  object ApplicationInfo: TApplicationInfo
    1111    Identification = 1
    … …  
    2525    RegistryRoot = rrKeyCurrentUser
    2626    License = 'CC0'
    27     left = 108
    28     top = 24
     27    left = 90
     28    top = 20
    2929  end
    3030  object CoolTranslator1: TCoolTranslator
    3131    POFilesFolder = 'Languages'
    32     left = 108
    33     top = 108
     32    left = 90
     33    top = 90
    3434  end
    3535  object LastOpenedList: TLastOpenedList
    3636    MaxCount = 10
    37     left = 108
    38     top = 192
     37    left = 90
     38    top = 160
    3939  end
    4040  object PersistentForm1: TPersistentForm
    4141    MinVisiblePart = 50
    4242    EntireVisible = False
    43     left = 108
    44     top = 276
     43    left = 90
     44    top = 230
    4545  end
    4646  object ImageListMain: TImageList
    47     left = 372
    48     top = 24
     47    left = 310
     48    top = 20
    4949    Bitmap = {
    50       4C691C0000001000000010000000000000000000000000000000000000000000
     50      4C691D0000001000000010000000000000000000000000000000000000000000
    5151      0000000000000000000000000000000000000000000000000000000000000000
    5252      000000000000000000000000000000000000000000FF000000FF000000FF0000
    … …  
    944944      0000000000000000000000000000000000000000000000000000000000000000
    945945      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
    947979    }
    948980  end
    949981  object ScaleDPI1: TScaleDPI
    950982    AutoDetect = False
    951     left = 372
    952     top = 120
     983    left = 310
     984    top = 100
    953985  end
    954986  object ThemeManager: TThemeManager
    955     left = 362
    956     top = 209
     987    left = 302
     988    top = 174
    957989  end
    958990end

  • trunk/UCore.pas

    r96 r107  
    5454  UFormMain, Forms, LazFileUtils,
    5555  // Targets
    56   UTargetInterpretter, UTargetFPC, UTargetJava, UTargetDelphi,
     56  UTargetInterpretter, UTargetFPC, UTargetJava, UTargetDelphi, UTargetJavascript,
    5757  UTargetPHP, UTargetC, UTargetPython, UTargetCSharp;
    5858
    … …  
    7777  Targets.Add(TTargetPython.Create);
    7878  Targets.Add(TTargetCSharp.Create);
     79  Targets.Add(TTargetJavascript.Create);
    7980
    8081  {$IFDEF Linux}

  • trunk/UTarget.pas

    r106 r107  
    411411    'compiled' + DirectorySeparator + Name + DirectorySeparator +
    412412    ExtractFileNameOnly(ProjectFileName) + SourceExtension;
    413   ForceDirectoriesUTF8(ExtractFilePath(CompiledFile));
     413  ForceDirectories(ExtractFilePath(CompiledFile));
    414414  with TStringList.Create do
    415415  try
    … …  
    459459  if not FileExistsUTF8(ExecutorPath) then
    460460    raise Exception.Create(Format(SExecutorNotFound, [ExecutorPath]));
    461   if FileExistsUTF8(CompiledFile) then
     461  if FileExists(CompiledFile) then
    462462  try
    463463    Process := TProcess.Create(nil);
Note: See TracChangeset for help on using the changeset viewer.