Jump to content

Lars Fosdal

  • Content Count

  • Joined

  • Last visited

  • Days Won


Everything posted by Lars Fosdal

  1. We need a truly immutable typed const.
  2. @Fr0sT.Brutal - Same for records. {$WRITEABLECONST OFF} const TypedConst: xlt = (no:'Norsk'; se: 'Svensk'; en:'English'); type pxlt = ^xlt; procedure TForm1.TestTypedConst; procedure Show(const aConst: xlt); begin Memo1.Lines.Add(aConst.no +', '+ aConst.se +', '+ aConst.en); end; begin Show(TypedConst); pxlt(@TypedConst)^.se := 'Deutsch'; Show(TypedConst); end; Output Norsk, Svensk, English Norsk, Deutsch, English So, the answer is a definitive no. Edit: Note that with WRITEABLECONST OFF TypedConst.se := 'Deutsch'; gives a [dcc32 Error]: E2064 Left side cannot be assigned to while it compiles with WRITEABLECONST ON.
  3. That last point would a major concern. Source code is necessary for third party libs. Are they wrapping some DLL or ActiveX class that is shared across the supported platforms?
  4. I've butted my head against this, and sadly there currently is no way to pass a typed const to an attribute. There are reports for problems with typed consts - so please vote. https://quality.embarcadero.com/browse/RSP-13921 likewise, for dynamic arrays https://quality.embarcadero.com/browse/RSP-32488
  5. https://www.nsoftware.com/ipworks/iot/ supports AMQP 1.0 and 0.9.1 Doc for Delphi: https://cdn.nsoftware.com/help/IOF/dlp/ I haven't tried it. @jeroenp - Did you find a AMQP 1.0 compatible lib elsewhere?
  6. Lars Fosdal

    TJSONObject.Format bug

    That sounds likely. I stumbled on similar problems with formatting of json strings in other languages when I googled.
  7. Lars Fosdal

    TJSONObject.Format bug

    Not sure why it would barf on %, but you can replace % with \u0025 (Unicode escape) See also https://stackoverflow.com/questions/19176024/how-to-escape-special-characters-in-building-a-json-string/27516892 What happens if you put a double %% or %25 (Similar to \u0025) or \%
  8. Lars Fosdal

    TListView filled by Thread = Freeze

    I usually do this as a two pass operation. I first start a thread that fills a memory structure. Once the thread is done, I trigger an update in the main thread that fills the UI from the memory structure. I have nothing but negative experiences with doing UI updates directly from threads.
  9. Your English is fine. Most of the APIs we use, require OAuth 2.0, hence my question.
  10. OAuth 1.0 only?
  11. Lars Fosdal

    AllocHwnd + TTimer = lag?

    That is waaay to familiar. As a developer, you never run out of chances to own yourself.
  12. Lars Fosdal

    AllocHwnd + TTimer = lag?

    I've had issues with having multiple allocated hWnds and messaging. Ended up with a single allocated hWnd and a custom message broker/router for my user messages.
  13. Lars Fosdal

    Delphi 11 Announced

  14. Lars Fosdal

    Delphi 64 bit Registration Tools for Windows Apps

    A company that offers registration tools i.e. licensing tools for developers?
  15. Lars Fosdal

    Drawing bug with VCL Styles

    Still unable to reproduce (10.4.2).
  16. Lars Fosdal

    Alfabetical order of a letter

  17. Assuming the Tag value of each checkbox can be set to the ordinal of it's enum, you could walk the enums and check if you find a checkbox under Filters for each of them. If you don't find it - you change the caption of "Filters: to "Filters is INCOMPLETE" or log it or whatever. But - it would be runtime, preferably in the debug code. Likewise, you could easily take a set of enum values to get or set the states of the check boxes. It is a little inconvenient to do this in Generics, since we don't have a constraint for enumerated types - which means we can't really use Low, High or Ord, but it is possible.
  18. Lars Fosdal

    Create hyperlink inside code

    Very thin description. Are we talking design time in source code?
  19. Link rot - the scourge of the internet 😛
  20. Originally a comment to I find Attributes to be an excellent feature of Delphi. Saves me a lot of variations of init code which instead is done with attributes.
  21. Lars Fosdal

    Using Attributes in class declarations

    I see that I've cut off the source I pasted. If you had the full source, you would have seen that the numbers are the default widths in pixels. This is the initial default value. I.e. those you need before you have a config to load. The same default as you would define in a constructor or design in the form editor. Likewise, with the type of the field, there is a default alignment which can be overridden with the attribute. These are indeed presentation properties and they are defaults explicitly bound to each instance of a field. The idea is to keep the default properties together with the field declarations instead of having them spread out through the code or defined in the .dfm. Unfortunately, I cannot use record constants to initialize the titles or specify the secondary sorting columns due to limitations in the language.
  22. Lars Fosdal

    Using Attributes in class declarations

    The grid sets are multipurpose. I can create gridsets dynamically from an SQL query, or dynamically from records or objects, or I can specify the design as in the example. All the actual grids have the same features, look and feel and the same behaviour. Visual inheritance is a nightmare. Just the same way as values in a constructor or in a designtime form are hardcoded. Except - the values are in code, right next to the declaration. Please elaborate? Where and how? As for torture of fingers. It is not like you need a huge amount of square brackets and using them is no different from when using them for arrays. [InitField(50, hcLeftJustify), UniqueField, DefaultSortField, ReadOnlyField] GlobalLocId: TFieldInteger; Anyways... Don't be blinded by one man's implementation in a specific context tailored for his needs. Attributes can be very useful and applied for a wide range of purposes.
  23. Lars Fosdal

    Delphi compatibility with Windows 11?

    AWS and Azure already have virtual TPMs for VMs.
  24. Lars Fosdal

    Delphi compatibility with Windows 11?

    Well, every other piece of hardware is virtual in a VM, so why not the TPM?