How can I get just the expiry date of a domain name using Indy in Delphi 10.3.3 Pro?

Question

How can I get just the expiry date of a domain name using Indy's TIdWhois component?

I don't want to get the full WHOIS data, but only the expiry date.

I used this code:

IdWhois1.Host:= edit1.Text;
memo1.Lines.Text := IdWhois1.WhoIs (edit2.Text);

This show the full WHOIS data.

Answer 1

You can't: the WHOIS protocol stores data in a human-readable format, which is why you only have text and can't specifically query a date and then even get it in a non-text type.

Parse the text yourself: find the line that matches most of what you expect, then convert the date from text into your favorite datatype. Expect WHOIS results that have no or an empty expiry line.

Answer 2

Function RegExMatch( aInput : string; aPattern : string; 
                      aInversed : Boolean) : String');
writeln(RegExMatch(IdWhois1.WhoIs('domain ibm.com'), 
                     '.*Registry Expiry Date.*', false));