This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| uses | |
| iPub.Rtl.Refit; // https://github.com/viniciusfbb/ipub-refit | |
| type | |
| TLogMessageLevel = (Info, Warning, Error); | |
| TLogMessage = record | |
| Dt: TDateTime; | |
| Level: TLogMessageLevel; | |
| &Message: string; |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| unit StrokePathGradient; | |
| interface | |
| uses | |
| System.UITypes, Skia; | |
| procedure DrawPathEndSmothing(const ACanvas: ISkCanvas; const APath: ISkPath; | |
| const APaint: ISkPaint; const AInnerColor, AOuterColor: TAlphaColor; | |
| AStart, AStop: Single; const AInterpolations: Integer); |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| @echo off | |
| REM Call from Delphi/RAD Studio IDE with the following parameters | |
| REM $PATH($EXENAME) $NAMEONLY($PROJECT) | |
| echo ============================================================= | |
| echo Be sure you Compile Android 64 and Deploy [Shift-Ctrl-Alt-F9] | |
| echo. | |
| echo Also set <application android:resizeableActivity="true"> in AndroidManifest.template.xml | |
| echo ============================================================= | |
| echo Path: %1 | |
| set apk=%2\bin\%2.apk |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| unit DeviceModel.iOS; | |
| interface | |
| function GetDeviceModelName: string; | |
| function GetDeviceModelPrettyName: string; | |
| implementation | |
| uses |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| #!/bin/bash | |
| # | |
| # Download and execute with the following: | |
| # curl -L https://embt.co/SetupUbuntu4Delphi22 | bash | |
| # | |
| echo "Updating the local package directory" | |
| sudo apt update | |
| echo "Upgrading any outdated pacakges" | |
| sudo apt full-upgrade -y | |
| echo "Install new packages necessary for Delphi & FMXLinux" |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| import sys | |
| import subprocess | |
| import csv | |
| def describe_ucrt_lib(platform): | |
| lib_path = "windows-10-sdk/Lib/10.0.10240.0/ucrt/{}/ucrt.lib".format(platform) | |
| output = subprocess.check_output(["nm", lib_path]) | |
| output = output.decode("utf-8") | |
| # Output (x86 32-bit) looks like: |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| private const matrix:Array = [ | |
| 0.3, 0.59, 0.11, 0, 0, | |
| 0.3, 0.59, 0.11, 0, 0, | |
| 0.3, 0.59, 0.11, 0, 0, | |
| 0, 0, 0, 1, 0]; | |
| private const zero:Point = new Point(); | |
| grayscale.bitmapData.applyFilter(image.bitmapData, image.getRect(image), zero, new ColorMatrixFilter(matrix)); |
NewerOlder