-
Content Count
102 -
Joined
-
Last visited
Everything posted by Nigel Thomas
-
ICS V9.4 announced
Nigel Thomas replied to Angus Robertson's topic in ICS - Internet Component Suite
Hi Angus, if you have an up-to-date licence for the latest does this not apply for you? https://www.embarcadero.com/products/delphi/previous-versions Or, have you run out of activations for your D2010 licence and Embaracero are being shits about bumping it? -
I was in a similar situation, with Berlin 10.1 installed. When I installed CE 11.3 it was missing the option to install for other platforms, only Windows 32bit and 64bit. I messaged Marco Cantu who looked into it, and said this was by design. If a licenced copy exists on the same system then the CE versions will not allow installation of the other platforms. When I installed the CE version in a clean VM those platforms were available. Edit to add: Mac OS was also available with Berlin installed, as well as Windows; so as per the OP Android, IOS and Linux are not. More edit: I've now had a chance to review my correspondence with Marco Cantu and he did not say this was "by design", I didn't mean to misrepresent his comments. Rather, he informed me that this was a licence conflict. My experience goes back to installing CE 10.4, which is when I wrote to Marco. Our correspondence ended then as there was no fix offered, just " we have seen similar scenarios ".
-
Documentation links on indyproject.org not working
Nigel Thomas replied to alan finiti's topic in Indy
DropBox link -
Documentation links on indyproject.org not working
Nigel Thomas replied to alan finiti's topic in Indy
I've recreated the zipfile using Winzip 14.5, opens fine with Windows 11 Explorer. Too large to upload here (11.9MB), let me know if you'd like me to email it to you or upload it somewhere else. -
Blogged : Code Signing with Inno Setup and Signotaur
Nigel Thomas replied to Vincent Parrett's topic in Delphi Third-Party
Note that Azure Trusted Signing does not provide EV certificates, only OV: -
Getit Fails to Install Fast Reports D12.1
Nigel Thomas replied to Mike Warren's topic in Delphi IDE and APIs
I don't see FastReport using D12.1 CE. Perhaps they moved it to subscription only? -
record functions with parameters?
Nigel Thomas posted a topic in Algorithms, Data Structures and Class Design
Using D12.1 CE. I can do this: TMyRec = record private function ConvertStrAToNum: Integer; . function ConvertStrNToNum: Integer; public StrA: string; . StrN: string; property IntA: Integer read ConvertStrAToNum; . property IntN: Integer read ConvertStrNToNum; end; function TMyRec.ConvertStrAToNum: Integer; begin Result := StrToInt(StrA); end; . function TMyRec.ConvertStrNToNum: Integer; begin Result := StrToInt(StrN); end; What I'd like to be able to do: TMyRec = record private function ConvertStrToInt(const StrToConvert: string): Integer; public StrA: string; . StrN: string; property IntA: Integer read ConvertStrToInt(StrA); . property IntN: Integer read ConvertStrToInt(StrN); end; function TMyRec.ConvertStrToInt(const StrToConvert: string): Integer; begin Result := StrToInt(StrToConvert); end; But I can't. Context: I'm reading strings into the record, as that is how they are read from a datafile. I could just parse the string data into integers as I read the file, but I thought the above option might be more elegant, as the conversion would only be done if later in the app I require the integer representation of the string data. -
record functions with parameters?
Nigel Thomas replied to Nigel Thomas's topic in Algorithms, Data Structures and Class Design
It is now apparent to me that checking the documentation more often would be time well spent! Thanks all. -
Hi All, Is it still possible to access the GetIt server from Delphi D10.1 Berlin? With ServiceURL set to the installed default for D10.1 (https://getit.embarcadero.com) I just get the error message: The Embarcadero GetIt server could not be reached If I change the ServiceUrl to https://getit-olympus.embarcadero.com I connect to the GetIt server but I only get a small subset (11) of packages available to download. No filters are set. GetIt is configured to work online.
-
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?
-
@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.
-
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
-
I have Delphi CE 11.3 and Delphi CE 12.1 installed and running on the same machine with no issues.
-
pdf version of 'Delphi in Depth: FireDAC' by Cary Jensen
Nigel Thomas replied to Ruud's topic in Databases
https://fastspring.com/consumer-support-form/ -
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.
-
https://azure.microsoft.com/en-us/blog/announcing-mandatory-multi-factor-authentication-for-azure-sign-in/
-
Check your spelling?
-
Undeclared identifiers X509_get_X509_PUBKEY, i2d_X509_PUBKEY_bio
Nigel Thomas posted a topic in ICS - Internet Component Suite
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 -
ICSSnippets sample Access Violation running as 64Bit
Nigel Thomas posted a topic in ICS - Internet Component Suite
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 -
D2007: Initialise byte array in const record
Nigel Thomas posted a topic in Algorithms, Data Structures and Class Design
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? -
D2007: Initialise byte array in const record
Nigel Thomas replied to Nigel Thomas's topic in Algorithms, Data Structures and Class Design
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. -
D2007: Initialise byte array in const record
Nigel Thomas replied to Nigel Thomas's topic in Algorithms, Data Structures and Class Design
E2010 incompatible types: 'dynamic array' and 'Set' -
Looking for a couple of good "starter" Delphi books
Nigel Thomas replied to t2000kw's topic in General Help
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. -
Can't complete installation of RAD 10.4
Nigel Thomas replied to Luis Enrique's topic in General Help
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. -
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.