akelpad
*******

Akelpad est un notepad avancé qui comporte de nombreuses fonctions pour le développement (coloration synthaxique, explorateur windows, de code, ...)

Lors de l'installation il peut remplacer le notepad classique de windows.

Il ne nécessite que 4Mo de mémoire

Les plugins utilisés sont:

* Coder::AutoComplete
* Coder::CodeFold
* Coder:::Higlight
* Exit::Main
* Explorer::Main
* LineBoard::Main
* Scripts::Main
* Session::Main
* Templates::Main
* Toolbar::Main
* LogView::Main et ::Settings

un clic droit sur la barre de menu permet de modifier cette dernière. Vous pouvez trouver :download:`ici <data/toolbar_akelpad_after.txt>` une toolbar customizé ( :download:`ici <data/toolbar_akelpad_before.txt>` la toolbar initiale)

vous trouvez dans le répertoire d'installation de akelpad:

* un repertoire contenant les templates
* les scripts


un scripts simple écrit en vbs est **load.vbs** (permet de lancer un fichier)


.. code-block:: none

    '''' VBScript test file
    
    'Defines
    Const WM_COMMAND=273
    Const WM_USER=1024
    Const OD_ADT_BINARY_ERROR=&H1
    Const OD_ADT_REG_CODEPAGE=&H2
    Const OD_ADT_DETECT_CODEPAGE=&H4
    Const OD_ADT_DETECT_BOM=&H8
    
    'See AkelDLL.h
    IDM_FILE_NEW=4101
    AKD_PASTE=(WM_USER + 170)
    
    pFile=AkelPad.GetEditFile(0)
    Set oFSO = CreateObject("Scripting.FileSystemObject")
    Set oFl = oFSO.GetFile(pFile)
    set WshShell = createObject("WScript.shell")
    WshShell.CurrentDirectory = oFl.ParentFolder
    Wshshell.run pFile


si toute fois l'installation en mode "remplace nootepad" ne fonctionne pas vous pouvez utiliser ce code (ne pas oublier de copier coller le répertoire akelpad contenant plugin, ....)
dans C:/windows/system32

.. code-block:: bash

    echo.
    echo Confirm to apply? (Press Ctrl-C and answer Y to terminate)
    pause
    echo.
    echo.
    
    if exist %Systemroot%\notepad.original.exe goto exist_Akelpad_already
    if exist %Systemroot%\System32\notepad.original.exe goto exist_Akelpad_already
    takeown /f %Systemroot%\notepad.exe
    takeown /f %Systemroot%\System32\notepad.exe
    icacls %Systemroot%\notepad.exe /grant "%username%":f
    icacls %Systemroot%\System32\notepad.exe /grant "%username%":f
    IF EXIST %SYSTEMROOT%\SysWOW64 (bcdedit.exe -set loadoptions    "DDISABLE_INTEGRITY_CHECKS")
    copy %Systemroot%\notepad.exe %Systemroot%\notepad.original.exe
    copy %Systemroot%\System32\notepad.exe %Systemroot%\System32\notepad.original.exe  
    echo.
    echo Original notepad.exe has been renamed to "notepad.original.exe" in its original folder.
    echo.
    copy "C:\Program Files\AkelPad\"akelpad.exe %Systemroot%\notepad.exe /y
    copy "C:\Program Files\AkelPad\"akelpad.exe %systemroot%\System32\notepad.exe /y
    echo.
    echo Akelpad installation is completed. 
    echo If no error occurred, Akelpad will now replace all Notepad functions.
    echo.
    pause
    exit
    
    :exist_Akelpad_already
    echo.
    echo INSTALLED Akelpad  ALREADY!.
    echo.
    pause
    exit