Jump to content

david_navigator

Members
  • Content Count

    153
  • Joined

  • Last visited

Everything posted by david_navigator

  1. I think I might need some help here then. The colleague that wrote this function is on furlough for at least the next four months due to Covid, so I have to address the problematic code myself and I'm not sure I understand why it's done like this to be able to refactor it correctly. The function is passed a set along with the sizeof(the set) This is the original function (with the array of bytes set at the original wrong value of 8 bytes, rather than I believe the correct value of 32 bytes) function GetSetCardinality(const aSet; aLen: Word): Word; { Sample call would be: count := GetSetCardinality(SomeSet, sizeof(SomeSet)); } var B, i: Integer; abyte: Byte; bytes: array [0 .. 7] of Byte absolute aSet; begin result := 0; for B := 0 to aLen - 1 do begin abyte := bytes[B]; for i := 0 to 7 do if (abyte and (1 shl i)) <> 0 then Inc(result); end; end;
  2. Thanks for the replies. The programmer's comment above the code indicates that the function is supposed to return the number of elements in a set. If I'm not mistaken I believe delphi allows up to 256 elements which are represented as 256 bits (rather than encoded in to 8 bytes), which I assume means that bytes: array [0 .. 7] of Byte absolute aSet; should actually be bytes: array [0 .. 31] of Byte absolute aSet; The rest of the code simply counts the number of bits set in each abyte which it returns as the result.
  3. david_navigator

    Delphi 10.4 unusably slow.

    Just upgraded to D10.4 but it's unusable. The editor has a 2 second delay & now 27 mins after loading a project, the IDE is still chugging along doing something. Tried a Windows reboot. Also look at memory footprint compared to 10.1 for the same project. <Later> Very weird, even with a simple "Hello World" app delphi is using 43% processor. I'm guessing this is some badly behaved design time package. Is there anyway to diagnose, other than removing them one by one (very, very laborious) ?
  4. david_navigator

    Delphi 10.4 unusably slow.

    @Stano this is 10.4.1 with latest patches. I keep forgetting to call it 10.4.1 rather than just 10.4 @Uwe Raabe it's a Virtual machine, but it thinks that it's 2 processors of 1 core each. The real machine is i7 4 core. Very weirdly. Atter two and a half hours it suddenly started working correctly. D10.1 had no issues, so I don't think it was Windows doing something. Currently seems to be OK - fingers crossed it continues that way.
  5. david_navigator

    Crash starting delphi 10.4.3

    Just installed GExperts 1.3.17 in Embarcadero® Delphi 10.4 Version 27.0.37889.9797 i.e Sydney with Patch 3. Starting Delphi now throws the following error. Tried uninstalling & reinstalling (same issue). Tried manually running the ExpertManager.exe - gives same error. --------------------------- Expertmanager: ExpertManager.exe - Entry Point Not Found --------------------------- The procedure entry point @Deskform@TDesktopForm@AdjustLastLoadedBounds$qqrv could not be located in the dynamic link library C:\Program Files (x86)\GExperts for RAD Studio 10.4\GExpertsRS104.dll. --------------------------- OK ---------------------------
  6. david_navigator

    Code Librarian

    What do others do to keep track of their useful code snippits ? I use Gexperts Code Librarian but I'm finding the inability to import and export folders and snippets a bit restrictive, plus I believe I can't open the same librarian file in two different IDE's at the same time. Other than that, it does do everything I need. Are there alternatives ?
  7. david_navigator

    Code Librarian

    I'm not really using it as a library of reusable code, more a reminder of how to do things e.g I can never remember how to iterate through the nodes of an XML document - something I might need to code every couple of years, so I just want to be able to pull up an example bit of code to refresh my memory.
  8. david_navigator

    Crash starting delphi 10.4.3

    Upgraded and all working now 🙂
  9. david_navigator

    Crash starting delphi 10.4.3

    Been using Delphi since day 1 of D1 and only found this site a few weeks ago. Is there a reason that it's not indexed by Google ?
  10. david_navigator

    Crash starting delphi 10.4.3

    Thanks. Nothing on the update page - maybe because I installed from ISO rather than Web ? Found download on https://my.embarcadero.com/ - thanks (of course how was I supposed to know that even existed !!)
  11. david_navigator

    Crash starting delphi 10.4.3

    Thanks. Doesn't appear in Getit or here http://cc.embarcadero.com/myreg/new/delphi - I have a valid subscription. Should I be looking elsewhere ?
  12. david_navigator

    Crash starting delphi 10.4.3

    It seems I had wrongly assumed that this was 10.4.3 - are you telling me this is 10.4.0.3 and that there's a 10.4.1 available (somewhere ???)
  13. david_navigator

    Crash starting delphi 10.4.3

    Thanks. Is there a version for 10.4.3 (which I believe is the latest IDE available) in the pipeline ?
  14. david_navigator

    Thinfinity VirtualUI - cloud-based conversion

    What were you thinking of instead of a menu ?
  15. david_navigator

    Thinfinity VirtualUI - cloud-based conversion

    What about CALs or are you running on Azure ?
  16. david_navigator

    Thinfinity VirtualUI - cloud-based conversion

    What Microsoft licensing is required to use Thinfinity to provide an app as a SaaS solution ? Cybelesoft tell me that I don't need a CAL or an RDS license due to the way it works, but reading the Microsoft licensing I can't work out how they come to that conclusion. Are any of you Thinfinity users using it to provide a service to outside users and if so, what have you done licensing wise ?
  17. david_navigator

    SMTP Server -> Client

    I have an old app that we use frequently that only support sending SMTP emails via an unauthenticated connection on port 25. Of course these days no ISP allows this kind of connection. Is my simplest solution to write an app that it can connect to to send any emails, (acting as an SMTP server) and then send the email on (acting as an SMTP client) using modern connection techniques ? I was thinking of Indy (SMTP Server -> SMTP Client), but maybe there's some components that already do this or even better an off the shelf (cheap) solution ? Cheers David
  18. david_navigator

    SMTP Server -> Client

    Brilliant. That sounds idea. WIll check it out. No problem, my current development environment is Sydney.
  19. david_navigator

    SMTP Server -> Client

    I am rewriting it slowly with current components (there's just too much work getting the old ones to work - one suite was such spaghetti code, it was impossible), but I need a "quick fix" solution to the email. I'll have a look at your samples. I'm guessing you have a sample SMTP server and sample SMTP client demo to get me started ?
  20. david_navigator

    SMTP Server -> Client

    The app is an old D5 one with loads of components that are no longer available. I no longer have a D5 development environment, so I think that creating a new Vmware machine, finding a D5 install, setting it up with all the original components and then updating it to use SMTPS (if there is a D5 version) would take longer than writing an intermediate app ?
×