Jump to content

Kazantsev Alexey

Members
  • Content Count

    25
  • Joined

  • Last visited

  • Days Won

    2

Everything posted by Kazantsev Alexey

  1. Kazantsev Alexey

    FmxLinux and GTK

    Press [Update Local File Cache] in SDK Manager after libgtk-3-dev installed.
  2. Kazantsev Alexey

    FMX TListView Item color change runtime

    type TForm1 = class(TForm) ListView1: TListView; procedure FormCreate(Sender: TObject); procedure ListView1UpdateObjects(const Sender: TObject; const AItem: TListViewItem); procedure FormDestroy(Sender: TObject); private FCustomItem : TListViewItem; FBitmap : TBitmap; public { Public declarations } end; var Form1: TForm1; implementation {$R *.fmx} procedure TForm1.FormCreate(Sender: TObject); begin for var i := 1 to 25 do ListView1.Items.Add.Text := Format('item #%u', [i]); FCustomItem := ListView1.Items[4]; FCustomItem.Text := 'Custom Background Item'; var c := TAlphaColorRec.Orangered; TAlphaColorRec(c).A := 64; FBitmap := TBitmap.Create(8, 8); FBitmap.Clear(c); end; procedure TForm1.FormDestroy(Sender: TObject); begin FBitmap.Free; end; procedure TForm1.ListView1UpdateObjects(const Sender: TObject; const AItem: TListViewItem); begin if AItem = FCustomItem then begin var Bkgnd := TListItemImage.Create(nil); Bkgnd.ScalingMode := TImageScalingMode.Stretch; Bkgnd.OwnsBitmap := False; Bkgnd.Bitmap := FBitmap; AItem.View.Insert(0, Bkgnd); end; end; custom_bkgnd_item.zip
  3. Kazantsev Alexey

    Items of custom managed records

    program Project1; {$APPTYPE CONSOLE} uses System.Rtti; type TvatIndividual = record DocumentNumber: string; TurnoverDate: TDate; PaymentDate: TDate; DocumentType: string; Year: integer; TurnoverDescription: string; TurnoverAmount: Currency; end; begin for var f in TRttiContext.Create.GetType(TypeInfo(TvatIndividual)).GetFields do WriteLn(f.ToString); ReadLn; end.
  4. You need to specify parameters --libpath and --syslibroot. Values can find in SDK Manager.
  5. Kazantsev Alexey

    Font size in macOS app

    You can register your own IFMXSystemFontService.
  6. Kazantsev Alexey

    Delphi Parser/Compiler Limitation?

    Use ampersand operator, Luke. program Project2; {$APPTYPE CONSOLE} uses System.TypInfo; {$SCOPEDENUMS ON} type TEnums = (&TRY, &SHR, &XOR, &IS, &AS); begin WriteLn(GetEnumName(TypeInfo(TEnums), Ord(TEnums.SHR))); WriteLn(GetEnumValue(TypeInfo(TEnums), 'shr')); ReadLn; end. Output: SHR 1
  7. Kazantsev Alexey

    How can I allocate memory without raising exceptions ?

    You can use SysGetMem, SysReallocMem, SysFreeMem.
  8. Kazantsev Alexey

    How many people use Delphi?

    Sorry for dirty adaptation spritz_bench.zip
  9. Kazantsev Alexey

    How many people use Delphi?

    Two cent about compilers performance by the example of spritz-c stream cipher implementation: 1. Delphi 11, Windows x86_64 (classic compiler), release 2. Delphi 11, Linux x86_64 (nextgen, LLVM based compiler), release 3. FreePascal 3.3.1, Linux x86_64, release
  10. Kazantsev Alexey

    What the Delphi 11 version number after november patch ?

    Try to check file version of your delphide280.bpl (or just run Delphi only, not RAD Studio)
  11. Kazantsev Alexey

    What the Delphi 11 version number after november patch ?

    Some about build numbers: https://blogs.embarcadero.com/rad-studio-11-2-alexandria-patch-1-available/#Final_Note_The_Patch_is_Listed_in_the_About_Box
  12. You don't need mac to compile units. Just use command line compiler to compile this unit: unit def; interface implementation {$if defined(MACOS)} {$message hint 'MACOS defined'} {$endif} end.
  13. Kazantsev Alexey

    10.4.1+ Custom Managed Records usable?

    https://quality.embarcadero.com/browse/RSP-35397
  14. Kazantsev Alexey

    Binary size, how-to make it smaller?

    The same example on 10.4.2: 1770kb, 1279kb, 456kb
  15. Kazantsev Alexey

    Binary size, how-to make it smaller?

    For XE2 you need explicitly rebuild the three files (for latest versons need some more rtl files be rebuilded): system.pas (with key -Y) system.sysutils.pas (with key -V-) system.variants.pas (with key -V-) (search path should include rtl sources) When project building seach path should include your own custom rtl dcus, and rtl sources after it.
  16. Kazantsev Alexey

    Binary size, how-to make it smaller?

    library rtltest; //{$weaklinkrtti on} uses system.classes; begin TMemoryStream.Create.Free; end. Delphi XE2, x86_64, Release: default - 547840 bytes + weaklinkrtti on - 505344 bytes + custom rtl build with minimal rtti - 256000 bytes
  17. Kazantsev Alexey

    Your RAD Studio 10.4 Sydney issues

    The error is not in the implementation of the custom initializer. A custom initializer is available for the “TRec” type, but an initialization error is in the “TData” type, which does not have a custom initializer, but has a field of a managed type. In the code example, you can replace the custom initializer with any other custom management operator (finalizer, assign), and you will get the same error.
  18. Kazantsev Alexey

    Your RAD Studio 10.4 Sydney issues

    Codegen bug https://quality.embarcadero.com/browse/RSP-29299
  19. Kazantsev Alexey

    Code Completion Colours (Twilight)

    5.5. It also makes sense to change the clHighlightText color for better look of some IDE parts (ObjectInspector, Options Dialogs, New Items dialog).
  20. Kazantsev Alexey

    Code Completion Colours (Twilight)

    1. Run any resource editor (ResourceHacker, for example) and open ModernTheme260.bpl 2. Extract resource "WIN10IDE_LIGHT" to file *.vsf 3. Open saved file in the Bitmap Style Designer ($(BDSBIN)\BitmapStyleDesigner.exe) 4. In the tree-structure "Objects" find node "SysColors" and item "clHighlight" 5. Change the "clHighlight" to you prefered color 6. Save modified style and close Style Designer 7. Using resource editor replace resource "WIN10IDE_LIGHT" in ModernTheme260.bpl by the modified style file. p.s. This issue planed to fix soon.
  21. Kazantsev Alexey

    Code Completion Colours (Twilight)

    Export is not required, it's the same theme. Changed the drawing method.
  22. Kazantsev Alexey

    Code Completion Colours (Twilight)

    Your can extract WIN10IDE_LIGHT resource from ModernTheme260.bpl, change SysColors.clHighlight by the BitmapStyleDesigner.exe and replace the style resource. https://i.imgur.com/lrod4rO.png But it will affects on the some other UI elements, M main menu items, for example. https://i.imgur.com/sTV5O83.png
  23. Kazantsev Alexey

    Code Completion Colours (Twilight)

    Set "Dark" IDE Theme.
  24. Kazantsev Alexey

    Install Android SDK manually?

    Run Android Tools and select following packages to install: 1. [x] Android SDK Platform-Tools 2. [x] Android SDK Build-tools 28.0.2 3. Android 8.0.0 (API 26) [x] SDK Platform
×