Jump to content

Attila Kovacs

Members
  • Content Count

    2053
  • Joined

  • Last visited

  • Days Won

    26

Everything posted by Attila Kovacs

  1. 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.
  2. Attila Kovacs

    a pair of MM test

    @Dany Marmur Just look it up:
  3. 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?
  4. 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.
  5. 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.
  6. Attila Kovacs

    Securing your data over time

    http://ollydbg.de/Paperbak/
  7. 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;
  8. 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;
  9. 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;
  10. Attila Kovacs

    August 2020 GM Blog post

    That one with the FireDAC is more interesting. We will definitely need more moderators 😛
  11. 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
  12. 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
  13. Attila Kovacs

    RansomWare blues

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

    RansomWare blues

    I'm afraid you have to pay with bitcoins for this info 😛
  15. 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)
  16. 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)
  17. Attila Kovacs

    Translation of C headers.

    btw. in the header and also on the screenshot from Mahdi the first parameters are PCWSTR (LPCWSTR) (const) and not always PWSTR (LPWSTR). this however makes no difference, at least at the moment, as they are defined the same in delphi
  18. Attila Kovacs

    Translation of C headers.

    opacity : single := 0.5; Element.SetAttributeValue('opacity', D2D1_SVG_ATTRIBUTE_POD_TYPE_FLOAT, @opacity, SizeOf(opacity)); where element = 'svg' if this was the question
  19. Attila Kovacs

    Translation of C headers.

    @pyscripter yup, was just playing around, it's also RGBA so the original 1, 0, 0, 0 did also not make much sense, mentioned that already earlier
  20. Attila Kovacs

    Translation of C headers.

    @Kas Ob. is right. With his order this works too: Element.SetAttributeValue('fill', D2D1_SVG_ATTRIBUTE_STRING_TYPE_SVG, '#FF0000');
  21. Attila Kovacs

    Translation of C headers.

    @Kas Ob. your version AV's here, I get the recoloring 😄 what now hm, sorry, it works, so declare in reverse order?
  22. Attila Kovacs

    Translation of C headers.

    @pyscripter d2missing again without the reformatting, sorry 😉 D2DMissing.7z btw. he is using IDA btw2. RecolorSubtree(Root, D2D1ColorF(1, 0, 0, 0)); should be the other way, 0,0,0,1, rgba
×