Jump to content

Nigel Thomas

Members
  • Content Count

    93
  • Joined

  • Last visited

Everything posted by Nigel Thomas

  1. This is the Delphi 12.1 (and as far back as 10.1 at least, but not in D2007) definition of ShellExecuteInfoW (the A version has the same issue): _SHELLEXECUTEINFOW = record cbSize: DWORD; fMask: ULONG; Wnd: HWND; lpVerb: LPCWSTR; lpFile: LPCWSTR; lpParameters: LPCWSTR; lpDirectory: LPCWSTR; nShow: Integer; hInstApp: HINST; { Optional fields } lpIDList: Pointer; lpClass: LPCWSTR; hkeyClass: HKEY; dwHotKey: DWORD; case Integer of 0: ( hIcon: THandle); 1: ( hMonitor: THandle; hProcess: THandle;); end; According to the definition in MSDN, the hProcess Handle is not part of the union: typedef struct _SHELLEXECUTEINFOW { DWORD cbSize; ULONG fMask; HWND hwnd; LPCWSTR lpVerb; LPCWSTR lpFile; LPCWSTR lpParameters; LPCWSTR lpDirectory; int nShow; HINSTANCE hInstApp; void *lpIDList; LPCWSTR lpClass; HKEY hkeyClass; DWORD dwHotKey; union { HANDLE hIcon; HANDLE hMonitor; } DUMMYUNIONNAME; HANDLE hProcess; } SHELLEXECUTEINFOW, *LPSHELLEXECUTEINFOW; Does that mean that the Delphi translation is faulty?
  2. Nigel Thomas

    Migrating Delphi to new device

    @cupboy Reply back and threaten them with action from whatever comsumer rights legislation you have in your country. In the UK it's Trading Standards. Refer them to this blog from their General Manager, particularly the "Policy Update" section; https://blogs.embarcadero.com/from-the-gm-new-updates-and-changes-to-the-registration-bumps-policy/ It really irks me when Embarcadero try to weasel out of their contractual responsibilities. When we purchase their product the licence is "lifetime" - the subscription element is an add-on that can allow you to keep updated at a lower price than buying new licences, but it is in no way mandatory. What is mandatory is that the lifetime licence for the product you purchased is honoured. Registration limits are there to prevent you from installing more than x installations at any one time. They should not (and in most jurisdictions, cannot) be used to stop one from migrating an installation to a new system.
  3. Nigel Thomas

    Migrating Delphi to new device

    Contact Sales. They are obliged to provide a download link to the software you have purchased. They did for me when I needed to re-install D10.1 Berlin. Although I did make sure I stored a copy of that installer in a safe place for the next time I need it! Nigel
  4. Nigel Thomas

    Two CE Versions on same PC

    I have Delphi CE 11.3 and Delphi CE 12.1 installed and running on the same machine with no issues.
  5. https://fastspring.com/consumer-support-form/
  6. Nigel Thomas

    Microsoft Trusted Signing service

    My Microsoft account already uses 2FA (Microsoft Authenticator). I've been browsing Azure to see if I need to do anything else, but not found anything yet. Rather hope I'm covered and there are no additional costs. I've not received an email about this yet.
  7. Nigel Thomas

    Microsoft Trusted Signing service

    https://azure.microsoft.com/en-us/blog/announcing-mandatory-multi-factor-authentication-for-azure-sign-in/
  8. Nigel Thomas

    CreateleOleObject not working/undeclared

    Check your spelling?
  9. Hi, Updated my installation of ICS 9 from Subversion today, now when I compile the OverbyteIcsHttpRestTst sample compilation fails with undeclared identifiers in OverbyteIcsWSocket, in this function: function TX509Base.GetX509PubKeyTB: TBytes; { V9.1 } var ABio : PBIO; PubKey: Pointer; begin if NOT Assigned(FX509) then begin SetLength(Result, 0); Exit; end; ABio := BIO_new(BIO_s_mem); if Assigned(ABio) then try PubKey := X509_get_X509_PUBKEY(FX509); if PubKey = Nil then Exit; if i2d_X509_PUBKEY_bio(ABio, PubKey) = 0 then Exit; Result := IcsReadTBBio(ABio, 0); finally bio_free(ABio); end; end; Nigel
  10. Hi, The following access violation occurs when running the "HTTP Dowload List of Files" snippet with the program compiled as 64Bit: HTTP Error - Access violation at address 000000000090E55F in module 'OverbyteIcsSnippets.exe'. Read of address 0000000000000004 It works seamlessly with no errors when the program is compiled as 32Bit. Using latest svn version of ICS 9.1, compiled using D11.3 CE running on Windows 10 and on Windows 11. Full diagnostic attached. Is this issue duplicatable or just something to do with my setup? diag.txt
  11. Using Delphi D2007. I'm trying to do the following: type FileSig = record Offset: Integer; arrSig: array of byte; end; const sig1: FileSig = (Offset: 10; arrSig: array [0..2] of byte = ($00,$01,$02); ) But I can't: E2029 ')' expected but ',' found In D10+ I can do: const sig1: FileSig = (Offset: 10; arrSig: [$00,$01,$02]; ) Is there a way I can do similar in D2007?
  12. Thanks. I've worked around it by declaring FileSig.arrSig as a fixed array, e.g: array [0..4] of byte, then I can set the const array using padding where necessary e.g. arrSig: ($00, $01, $02, $00, $00); By adding a SigLength to the FileSig type I will know what padded bytes I can remove when I come to using the array.
  13. E2010 incompatible types: 'dynamic array' and 'Set'
  14. Nigel Thomas

    Looking for a couple of good "starter" Delphi books

    Don't get hooked up on just books. There is a lot of useful visual material on the Net that is targeted at Delphi beginners. Embarcadero's Helpful Resources for New Users has some good links to both books and visual resources.
  15. Nigel Thomas

    Can't complete installation of RAD 10.4

    Check where the GetIt server is pointing and try an alternative. In the registry key HKCU\Software\Embarcadero\BDS\21.0\CatalogRepository look at the value for "ServiceUrl". If it isn't already, change this to https://getit.embarcadero.com and retry the installation. That's the url my copy of D10.4 (CE) is pointing at, and the GetIt Package Manager seems to connect fine.
  16. Nigel Thomas

    Do I really need a certificate?

    I've used FileZilla for some time. I've just checked my latest installation: Version 3.66.5 Signature: VirusTotal: As @Vincent Parrettsuggests, the installer referenced by the OP may indeed bundle "sponsorship" software. Each time FileZilla updates it shows a sponsorship screen stating who sponsored the latest update - but it's only shown the once and is not intrusive.
  17. Nigel Thomas

    Do I really need a certificate?

    That's not a code-signing certificate, that's just a time-stamped certificate. A code-signing certificate looks like this:
  18. Ask yourself if you really need an alternative to what is already built into your Windows OS - Windows Defender. It's always-on, it's updated several times a day as new threats emerge, it's as built-in to the OS as any AV can be, it's configurable - and it's free. Edit to add: I rely far more on disk image backups to protect against malware occurrences (and other issues like hardware failure), and would recommend such as the first line of defence. No anti-malware program can protect you against the next 0-day, until many systems - maybe yours, maybe mine - have already been compromised.
  19. Nigel Thomas

    GetIt Package Manager Delphi 11.3 Timeout

    And, I'm pleased to say, the GetIt server is once again available in Delphi 11.3 CE. My cyniscism was misplaced.
  20. Nigel Thomas

    GetIt installation does not work

    Is it cynical to suggest that Embarcadero won't bother repairing getit servers for earlier versions? They don't seem to like having to support any version other than the current.
  21. Bite the bullet. Download and install Delphi CE 11.3 (the current available CE edition). When you register for it, you'll get a new key. Migrate your project to the new version - I doubt it will need much changing to work as-is. Frankly, it's not as if you have much choice unless you want to pay for a Professional version (which does give you licences for previous versions). One word of caution: I'd hang back for a few days before downloading/installing CE 11.3 until Embarcadero have all their servers working properly again.
  22. Nigel Thomas

    Reinstall Old Version

    Nobody told me ..shrug..
  23. Nigel Thomas

    Reinstall Old Version

    https://altd.embarcadero.com//download/radstudio/10.3/delphicbuilder10_3_2_496593b.iso
  24. Nigel Thomas

    Konopka and Parnassus for Delphi 12?

    You should be able to check here: https://getitnow.embarcadero.com/ Edit to add: although unless the listing description mentions Delphi 12, I'm not sure it helps for determining if any particular component has been updated to support the latest.
  25. start ms-settings:display
×