Jump to content

FredS

Members
 View Profile  See their activity

  • Content Count

    408

  • Joined

  • Last visited

  • Days Won

    4

Posts posted by FredS

  1. Posted

    1 hour ago, Darian Miller said:

    No. The systems are synchronized internally and we refer to both but there is no current way of surfacing a link between the old and new systems.

    Wasn't another point to finally merge those internal and external issues.. now all external ones have become internal..

     

  4. Posted · Edited by FredS
    Verified

    4 hours ago, gkobler said:

    After Install D12.1 it looks like ok, but all win64 path settings are lost

     

    Was just going to look at that.. one 'good' thing EMBT has taught me is to generate a snapshot before attempting any installation..

     

    DId a registry compare and it wiped out the path and the Win64 Library Path..

  9. Posted

    44 minutes ago, Brian Evans said:

    Removes any collaboration between users. Also, without knowing if something is already reported hard to put in the effort to create a good report or find an uncomplicated way to reproduce - no idea if the effort will be wasted.

     

    Sending Reports to a black box.. sounds productive..

  17. Posted

    15 hours ago, pyscripter said:

    It turns out that the causes of LSP failure were more complex than I originally thought.

    Little has changed since Godzilla, or maybe some of that is back again.

     

    I still use a clean bat when switching between 'Build Configurations', that limits the problem even today. What it does is delete all DCUs which exist from all but the current 'Build Configuration'.

     

  18. Posted

    4 hours ago, PawelPepe said:

    But, this can not send mail with default client... so the best is to run any app with normal user privileges.

    Not so simple then, I've not seen running code that executes with identical integrity, tokens and access..
    A few posts on SO claim to have solved it but the Scheduler works so I've found no need to retest all for that..

      

    ShellRun('Open', 'Schtasks', '/Create /F /SC ONCE /TN taskname /TR "<cmd>" /ST 00:00', swHide);
ShellRun('Open', 'Schtasks', '/Run /TN taskname', swHide);
ShellRun('Open', 'Schtasks', '/Delete /F /TN taskname', swHide);

    Add some error checking and it works..

     

    • Thanks 1

  20. Posted

    11 minutes ago, Fr0sT.Brutal said:

    MSBuild doesn't expand $(..)-

     

    This is how I compile with older versions of controls.. might help you get started.
    The CMD file is in the project root and changes directory to Source: 

    @ECHO OFF
::
:: How to Redirect to an older Version of VCL
:: Since no IDE is required this will work for NON installed versions of any VCL controls
:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::

::
:: Redirect DX, to compile with source we need to update all these
:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
REM @SET DXVCL=%VCL%\DevExpress VCL\20.2.8 (26-May-2021) for PA2-R12
REM IF NOT Exist "%DXVCL%" (
        REM echo."%DXVCL%", Directory does not exist
        REM Pause )
REM CALL :SetEnvVar "DXLibs"
REM CALL :SetEnvVar "DXSources"
REM SET DX
REM pause

::
:: Redirect UNI, to compile with source we need to update all these
:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
REM @SET UNIVCL=%VCL%\UniDAC\9.0.1 (14-Sep-2021)
REM IF NOT Exist "%UNIVCL%" (
        REM echo."%UNIVCL%", Directory does not exist
        REM Pause )
REM CALL :SetEnvVar "UNILIB"
REM CALL :SetEnvVar "UniSources"
REM SET Uni
REM pause

::
:: Environmental Vars declared in the IDE must be redeclared 
:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
@SET CompilerV=28
@SET ProductVersion=22.0
@SET IDEVER=11.0.2
::
:: Now expand those with rsVars.bat
:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
call "C:\Program Files (x86)\Embarcadero\Studio\22.0\bin\rsvars.bat"
::
:: Reset the rsVars.bat defaults
:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
@SET BDSCOMMONDIR=D:\Embarcadero Studio\22.0
::
::  Add the location of cmd.exe
:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
@SET PATH=%WINDIR%\System32;%PATH%

cd source
:: Recomended in 10.4 Release Notes..
MSBuild APP.dproj /t:clean

REM TIMEOUT /T 10
MSBuild APP.dproj /t:build /v:q /p:Config=Release /p:platform=Win64
cd ..

::  View any output notices
pause

 :: ========== FUNCTIONS ==========
EXIT /B

:: Read a Value from Environment
:: Param 1: Name of output variable.
:: Param 2: SubKey.
:RegQueryEnv 
@ECHO OFF
SET KEY="HKLM\SYSTEM\CurrentControlSet\Control\Session Manager\Environment"
:: Remove the double quotes
Set SUBKEY=%~2
FOR /F "skip=2 tokens=2,*" %%A IN ('reg.exe query %KEY% /v "%SUBKEY%"') DO (
    set %1=%%B )
EXIT /B

:: Expand any EnvVars in the Text
:: Param 1: Name of output variable.
:: Param 2: Text to Expand (%UNIVCL%\Lib\Delphi$(CompilerV))
:ExpandEnvVar
@ECHO OFF
set %1=%~2
REM echo.ExpandEnvVar=%Text% 
EXIT /B

:: Combines RegQuery and ExpandEnvVar then uses @SET
:: Param 1: SubKey.
:SetEnvVar
@ECHO OFF
CALL :RegQueryEnv Value %1
CALL :ExpandEnvVar Value "%Value%"
@SET %~1=%Value%

     

    • Thanks 1
×