Jump to content

Attila Kovacs

Members
  • Content Count

    1936
  • Joined

  • Last visited

  • Days Won

    25

Everything posted by Attila Kovacs

  1. Attila Kovacs

    Unit scope names in IDE - possible 2+ lines?

    @Dinar It's not just me! 😉 Well, then just press Ctrl+Alt+ArrowUp or Down 😉
  2. Attila Kovacs

    Unit scope names in IDE - possible 2+ lines?

    @Dinar :)) Sorry, looks like I'm in write only mode 🙂
  3. Attila Kovacs

    Unit scope names in IDE - possible 2+ lines?

    As an alternative:
  4. Attila Kovacs

    Records, Generics and RTTI meets FireDAC

    @Lars Fosdal I heard that several times and I still can't imagine why not a middle tier, why sp's?
  5. Attila Kovacs

    string helpers question

    Mind the declaration of those helper routines. The ones needing a parameter are for sure class methods, thus they will as work with aStr.xyz() as with String.xyz(); In this case the ToLower is non-class method, LowerCase is. Now if you wonder why are they called differently, try boolean.ToString(True); and once you found out what is happening try not to scream.
  6. I'm having problems with importing bmecat_2005.dtd under Berlin U3. There are a couple of definitions like: <!ELEMENT GROUP_NAME (#PCDATA)> <!ATTLIST GROUP_NAME lang %langQUALIFIERS; #IMPLIED> which should be a string with an attribute "lang", like: <GROUP_NAME lang="deu">My Group Name</GROUP_NAME> Now, Delphi creates GROUP_NAME as a class with a single property of "lang", so I can't assign a value ("My Group Name") to this element. Am I missing something or is this built in importer a bit retarded? Is there any better tool to create the Delphi classes? thx Edit: Ahh, "class.Text" is the way to go, I had forgotten it, but now I remember.
  7. Attila Kovacs

    a pair of MM test

    @Dany Marmur Just look it up:
  8. Attila Kovacs

    Best Practices for FireDAC FetchMode/RecordCount Settings

    Ahm, what kind of bull*** is calling a count(*) prior to the actual selection? Who guarantees that the two results will be the same?
  9. Attila Kovacs

    git workflow question

    Maybe "git diff" and "git blame" would show something useful. You are a team of developers and go with "something is messed up" statements? Usually this come from the clients.
  10. Attila Kovacs

    Securing your data over time

    Me too. Also funny one. Especially that you don't understand why would one use an online service to make a complementary/secondary cold-backup in a different geographical location, then you answer your own question in 2 minutes with the burglars.
  11. Attila Kovacs

    Securing your data over time

    http://ollydbg.de/Paperbak/
  12. Attila Kovacs

    Looking for Icon Fonts support in Delphi for High-DPI and Themed app?

    Are you sure that the font has to be installed? I'm loading a custom font from the resources and it's working fine: // Load custom Fonts before creating any forms ResStream := TResourceStream.Create(hInstance, 'MONTSERRAT_MEDIUM', RT_RCDATA); try AddFontMemResourceEx(ResStream.Memory, ResStream.Size, nil, @FontsCount); finally ResStream.Free; end;
  13. Exactly this is the way I would prefer like David says. If you change xVal to something meaningful, you will see why: Result := isDog or isCat or isHorse;
  14. As you are always obfuscating your code with love, I can't imagine why didn't you go with Result := Ord(a) + Ord(b) + Ord(c) + Ord(Result) > 0;
  15. Attila Kovacs

    August 2020 GM Blog post

    That one with the FireDAC is more interesting. We will definitely need more moderators 😛
  16. Attila Kovacs

    RansomWare blues

    usually the credentials are stolen from the client pc's where they are stored antivir's are crap multiple cold backups stored in different geographical locations are backups, everything else is just delusion
  17. Attila Kovacs

    RansomWare blues

    Looks like they are in getit not in the install: https://community.idera.com/developer-tools/b/blog/posts/getit-aqua-light-slate-vcl-style
  18. Attila Kovacs

    RansomWare blues

    How's that? Simple windows share? Or mounted drive?
  19. Attila Kovacs

    RansomWare blues

    I'm afraid you have to pay with bitcoins for this info 😛
  20. you should paint a background to the metafile canvas first, or copy (play) the metafile to its final destination where you already have a background (maybe you already doing that, in this case try to save it to a file and look into it with a wmf viewer, maybe you find something)
  21. good job! coupe of things: D2D1_DRAW_TEXT_OPTIONS_ENABLE_COLOR_FONT is first introduced in Delphi 20.0, maybe you should declare it somewhere with a conditional TOSVersion.Build returns 0 on my system, reporting wrongly that SVG is not supported o.O functions: -SetId() -CreateChild() -IsAttributeSpecified() -RemoveAttribute() -SetAttributeValue() *all -GetAttributeValue() *all? -GetAttributeValueLength() -FindElementById() -CreatePaint() should have LPCWSTR parameters instead of LPWSTR. (just to be pedantic)
×