Posted by jpluimers on 2018/01/30
A while ago, I found out that [WayBack] Toon Krijthe made a [Archive.is] Delphi 2009 syntax sample which is a great complement to the DelphiAST parser given that Borland/CodeGear/Embarcadero/Idera never published one in the 22+years that Delphi is alive.
–jeroen
Posted in Delphi, Delphi 2009, Development, Software Development | 6 Comments »
Posted by jpluimers on 2018/01/25
After years of (peer) pressure, Embarcadero finally did some client-side [WayBack] HTTP Protocol Related Improvements in Delphi 10.2.2.
The fixes add some features to THTTPClient that have been available in Indy since version 9 (which however requires 1.0.2 OpenSSL binaries support the required functionality):
We have added a new enumeration,
THTTPSecureProtocolwith the values (SSL2, SSL3, TLS1, TLS11, TLS12).THPPTClientand related classes have now aSecureProtocolsproperty which is a set based on that enumeration.
References:
SecureProtocols (yet?)–jeroen
Posted in Delphi, Development, Software Development | 2 Comments »
Posted by jpluimers on 2018/01/25
Interesting repository https://github.com/davidheff/DelphiProjectCompileMode in a response to
[WayBack] I’m trying to use Pre-/Post-Build-Events (Delphi 10.1 Berlin, if that matters). Is there a variable, parameter, option etc to distinguish between a “make” and a “build”… – Achim Kalwa – Google+
This requires an expert as Delphi doesn’t do it out of the box, so I was glad this expert solves that: davidheff/DelphiProjectCompileMode: Delphi IDE add in that sets an environment variable to indicate which compile mode (make, build, etc.) was used to start a compile action
It sets the DelphiProjectCompileMode variable to a value depending on the TOTACompileMode:
cmOTAMake -> Make
cmOTABuild -> Build
cmOTACheck -> Check
cmOTAMakeUnit -> MakeUnit
otherwise -> Unrecognised
–jeroen
Posted in Delphi, Development, Software Development | Leave a Comment »
Posted by jpluimers on 2018/01/23
Via[WayBack] The mother lode of well-known SIDs – The Old New Thing this great source of information [WayBack] [MS-DTYP]: Well-Known SID Structures from which I got the table below.
Later on, I found many more links with this information, for instance:
2.4.2.4 Well-Known SID Structures
Well-known SID structures are a group of SIDs that identify generic users or generic groups. Their values remain constant across all operating systems.
The <root-domain> identifier represents the three sub-authority values associated with the root domain, which is the first domain that is created in an Active Directory forest infrastructure. The <domain> identifier represents the three sub-authority values associated with any domain, and the <machine> identifier represents the three sub-authority values associated with a specific machine. Root domain–based groups like the Enterprise and Schema administrators have forestwide permissions.
For example, given a SID defined in the table below as S-1-5-21-<domain>-513, and the actual instance of the domain having the three sub authority values of 1, 2, and 3:
S-1: Indicates a revision or version 1 SID.
5: SECURITY_NT_AUTHORITY, indicates it’s a Windows specific SID.
21: SECURITY_NT_NON_UNIQUE, indicates a domain id will follow.
1-2-3: The next three SubAuthority arrays contain 32-bit random numbers to uniquely identify the domain.
RID: Indicates a unique object ID within the domain.
The actual constructed SID would be S-1-5-21-1-2-3-513.
The following table lists well-known SID structure values and their matching descriptions.
Constant/value Description NULL S-1-0-0
No Security principal. EVERYONE S-1-1-0
A group that includes all users. LOCAL S-1-2-0
A group that includes all users who have logged on locally. CONSOLE_LOGON S-1-2-1
A group that includes users who are logged on to the physical console. This SID can be used to implement security policies that grant different rights based on whether a user has been granted physical access to the console.<5> CREATOR_OWNER S-1-3-0
A placeholder in an inheritable access control entry (ACE). When the ACE is inherited, the system replaces this SID with the SID for the object’s creator. CREATOR_GROUP S-1-3-1
A placeholder in an inheritable ACE. When the ACE is inherited, the system replaces this SID with the SID for the primary group of the object’s creator. OWNER_SERVER S-1-3-2
A placeholder in an inheritable ACE. When the ACE is inherited, the system replaces this SID with the SID for the object’s owner server.<6> GROUP_SERVER S-1-3-3
A placeholder in an inheritable ACE. When the ACE is inherited, the system replaces this SID with the SID for the object’s group server.<7> OWNER_RIGHTS S-1-3-4
A group that represents the current owner of the object. When an ACE that carries this SID is applied to an object, the system ignores the implicit READ_CONTROL and WRITE_DAC permissions for the object owner. NT_AUTHORITY S-1-5
A SID containing only the SECURITY_NT_AUTHORITY identifier authority. DIALUP S-1-5-1
A group that includes all users who have logged on through a dial-up connection. NETWORK S-1-5-2
A group that includes all users who have logged on through a network connection. BATCH S-1-5-3
A group that includes all users who have logged on through a batch queue facility. INTERACTIVE S-1-5-4
A group that includes all users who have logged on interactively. LOGON_ID S-1-5-5-x-y
A logon session. The X and Y values for these SIDs are different for each logon session and are recycled when the operating system is restarted. SERVICE S-1-5-6
A group that includes all security principals that have logged on as a service. ANONYMOUS S-1-5-7
A group that represents an anonymous logon. PROXY S-1-5-8
Identifies a SECURITY_NT_AUTHORITY Proxy.<8> ENTERPRISE_DOMAIN_CONTROLLERS S-1-5-9
A group that includes all domain controllers in a forest that uses an Active Directory directory service. PRINCIPAL_SELF S-1-5-10
A placeholder in an inheritable ACE on an account object or group object in Active Directory. When the ACE is inherited, the system replaces this SID with the SID for the security principal that holds the account. AUTHENTICATED_USERS S-1-5-11
A group that includes all users whose identities were authenticated when they logged on. RESTRICTED_CODE S-1-5-12
This SID is used to control access by untrusted code. ACL validation against tokens with RC consists of two checks, one against the token’s normal list of SIDs and one against a second list (typically containing RC – the “RESTRICTED_CODE” token – and a subset of the original token SIDs). Access is granted only if a token passes both tests. Any ACL that specifies RC must also specify WD – the “EVERYONE” token. When RC is paired with WD in an ACL, a superset of “EVERYONE”, including untrusted code, is described. TERMINAL_SERVER_USER S-1-5-13
A group that includes all users who have logged on to a Terminal Services server. REMOTE_INTERACTIVE_LOGON S-1-5-14
A group that includes all users who have logged on through a terminal services logon. THIS_ORGANIZATION S-1-5-15
A group that includes all users from the same organization. If this SID is present, the OTHER_ORGANIZATION SID MUST NOT be present.<9> IUSR S-1-5-17
An account that is used by the default Internet Information Services (IIS) user. LOCAL_SYSTEM S-1-5-18
An account that is used by the operating system. LOCAL_SERVICE S-1-5-19
A local service account. NETWORK_SERVICE S-1-5-20
A network service account. ENTERPRISE_READONLY_DOMAIN_CONTROLLERS S-1-5-21-<root domain>-498
A universal group containing all read-only domain controllers in a forest. COMPOUNDED_AUTHENTICATION S-1-5-21-0-0-0-496
Device identity is included in the Kerberos service ticket. If a forest boundary was crossed, then claims transformation occurred.<10> CLAIMS_VALID S-1-5-21-0-0-0-497
Claims were queried for in the account’s domain, and if a forest boundary was crossed, then claims transformation occurred.<11> ADMINISTRATOR S-1-5-21-<machine>-500
A user account for the system administrator. By default, it is the only user account that is given full control over the system. GUEST S-1-5-21-<machine>-501
A user account for people who do not have individual accounts. This user account does not require a password. By default, the Guest account is disabled. DOMAIN_ADMINS S-1-5-21-<domain>-512
A global group whose members are authorized to administer the domain. By default, the DOMAIN_ADMINS group is a member of the Administrators group on all computers that have joined a domain, including the domain controllers. DOMAIN_ADMINS is the default owner of any object that is created by any member of the group. DOMAIN_USERS S-1-5-21-<domain>-513
A global group that includes all user accounts in a domain. DOMAIN_GUESTS S-1-5-21-<domain>-514
A global group that has only one member, which is the built-in Guest account of the domain. DOMAIN_COMPUTERS S-1-5-21-<domain>-515
A global group that includes all clients and servers that have joined the domain. DOMAIN_DOMAIN_CONTROLLERS S-1-5-21-<domain>-516
A global group that includes all domain controllers in the domain. CERT_PUBLISHERS S-1-5-21-<domain>-517
A global group that includes all computers that are running an enterprise certification authority. Cert Publishers are authorized to publish certificates for User objects in Active Directory. SCHEMA_ADMINISTRATORS S-1-5-21-<root-domain>-518
A universal group in a native-mode domain, or a global group in a mixed-mode domain. The group is authorized to make schema changes in Active Directory. ENTERPRISE_ADMINS S-1-5-21-<root-domain>-519
A universal group in a native-mode domain, or a global group in a mixed-mode domain. The group is authorized to make forestwide changes in Active Directory, such as adding child domains. GROUP_POLICY_CREATOR_OWNERS S-1-5-21-<domain>-520
A global group that is authorized to create new Group Policy Objects in Active Directory. READONLY_DOMAIN_CONTROLLERS S-1-5-21-<domain>-521
A global group that includes all read-only domain controllers. CLONEABLE_CONTROLLERS S-1-5-21-<domain>-522
A global group that includes all domain controllers in the domain that can be cloned. PROTECTED_USERS S-1-5-21-<domain>-525
A global group that are afforded additional protections against authentication security threats. <12> For more information, see [MS-APDS] and [MS-KILE]. RAS_SERVERS S-1-5-21-<domain>-553
A domain local group for Remote Access Services (RAS) servers. Servers in this group have Read Account Restrictions and Read Logon Information access to User objects in the Active Directory domain local group. BUILTIN_ADMINISTRATORS S-1-5-32-544
A built-in group. After the initial installation of the operating system, the only member of the group is the Administrator account. When a computer joins a domain, the Domain Administrators group is added to the Administrators group. When a server becomes a domain controller, the Enterprise Administrators group also is added to the Administrators group. BUILTIN_USERS S-1-5-32-545
A built-in group. After the initial installation of the operating system, the only member is the Authenticated Users group. When a computer joins a domain, the Domain Users group is added to the Users group on the computer. BUILTIN_GUESTS S-1-5-32-546
A built-in group. The Guests group allows users to log on with limited privileges to a computer’s built-in Guest account. POWER_USERS S-1-5-32-547
A built-in group. Power users can perform the following actions:
- Create local users and groups.
- Modify and delete accounts that they have created.
- Remove users from the Power Users, Users, and Guests groups.
- Install programs.
- Create, manage, and delete local printers.
- Create and delete file shares.
ACCOUNT_OPERATORS S-1-5-32-548
A built-in group that exists only on domain controllers. Account Operators have permission to create, modify, and delete accounts for users, groups, and computers in all containers and organizational units of Active Directory except the Built-in container and the Domain Controllers OU. Account Operators do not have permission to modify the Administrators and Domain Administrators groups, nor do they have permission to modify the accounts for members of those groups. SERVER_OPERATORS S-1-5-32-549
A built-in group that exists only on domain controllers. Server Operators can perform the following actions:
- Log on to a server interactively.
- Create and delete network shares.
- Start and stop services.
- Back up and restore files.
- Format the hard disk of a computer.
- Shut down the computer.
PRINTER_OPERATORS S-1-5-32-550
A built-in group that exists only on domain controllers. Print Operators can manage printers and document queues. BACKUP_OPERATORS S-1-5-32-551
A built-in group. Backup Operators can back up and restore all files on a computer, regardless of the permissions that protect those files. REPLICATOR S-1-5-32-552
A built-in group that is used by the File Replication Service (FRS) on domain controllers. ALIAS_PREW2KCOMPACC S-1-5-32-554
A backward compatibility group that allows read access on all users and groups in the domain.<13> REMOTE_DESKTOP S-1-5-32-555
An alias. Members of this group are granted the right to log on remotely.<14> NETWORK_CONFIGURATION_OPS S-1-5-32-556
An alias. Members of this group can have some administrative privileges to manage configuration of networking features.<15> INCOMING_FOREST_TRUST_BUILDERS S-1-5-32-557
An alias. Members of this group can create incoming, one-way trusts to this forest.<16> PERFMON_USERS S-1-5-32-558
An alias. Members of this group have remote access to monitor this computer.<17> PERFLOG_USERS S-1-5-32-559
An alias. Members of this group have remote access to schedule the logging of performance counters on this computer.<18> WINDOWS_AUTHORIZATION_ACCESS_GROUP S-1-5-32-560
An alias. Members of this group have access to the computed tokenGroupsGlobalAndUniversal attribute on User objects.<19> TERMINAL_SERVER_LICENSE_SERVERS S-1-5-32-561
An alias. A group for Terminal Server License Servers.<20> DISTRIBUTED_COM_USERS S-1-5-32-562
An alias. A group for COM to provide computer-wide access controls that govern access to all call, activation, or launch requests on the computer.<21> IIS_IUSRS S-1-5-32-568
A built-in group account for IIS users. CRYPTOGRAPHIC_OPERATORS S-1-5-32-569
A built-in group account for cryptographic operators.<22> EVENT_LOG_READERS S-1-5-32-573
A built-in local group. Members of this group can read event logs from the local machine.<23> CERTIFICATE_SERVICE_DCOM_ACCESS S-1-5-32-574
A built-in local group. Members of this group are allowed to connect to Certification Authorities in the enterprise.<24> RDS_REMOTE_ACCESS_SERVERS S-1-5-32-575
A group that allows members use of Remote Application Services resources. RDS_ENDPOINT_SERVERS S-1-5-32-576
A group that enables member servers to run virtual machines and host sessions. RDS_MANAGEMENT_SERVERS S-1-5-32-577
A group that allows members to access WMI resources over management protocols (such as WS-Management via the Windows Remote Management service). HYPER_V_ADMINS S-1-5-32-578
A group that gives members access to all administrative features of Hyper-V. ACCESS_CONTROL_ASSISTANCE_OPS S-1-5-32-579
A local group that allows members to remotely query authorization attributes and permissions for resources on the local computer. REMOTE_MANAGEMENT_USERS S-1-5-32-580
Members of this group can access Windows Management Instrumentation (WMI) resources over management protocols (such as WS-Management [DMTF-DSP0226]). This applies only to WMI namespaces that grant access to the user. WRITE_RESTRICTED_CODE S-1-5-33
A SID that allows objects to have an ACL that lets any service process with a write-restricted token to write to the object. NTLM_AUTHENTICATION S-1-5-64-10
A SID that is used when the NTLM authentication package authenticated the client. SCHANNEL_AUTHENTICATION S-1-5-64-14
A SID that is used when the SChannel authentication package authenticated the client. DIGEST_AUTHENTICATION S-1-5-64-21
A SID that is used when the Digest authentication package authenticated the client. THIS_ORGANIZATION_CERTIFICATE S-1-5-65-1
A SID that indicates that the client’s Kerberos service ticket’s PAC contained a NTLM_SUPPLEMENTAL_CREDENTIAL structure (as specified in [MS-PAC]section 2.6.4). If the OTHER_ORGANIZATION SID is present, then this SID MUST NOT be present. <25> NT_SERVICE S-1-5-80
An NT Service account prefix. USER_MODE_DRIVERS S-1-5-84-0-0-0-0-0
Identifies a user-mode driver process. LOCAL_ACCOUNT S-1-5-113
A group that includes all users who are local accounts.<26> LOCAL_ACCOUNT_AND_MEMBER_OF_ADMINISTRATORS_GROUP S-1-5-114
A group that includes all users who are local accounts and members of the administrators group.<27> OTHER_ORGANIZATION S-1-5-1000
A group that includes all users and computers from another organization. If this SID is present, THIS_ORGANIZATION SID MUST NOT be present.<28> ALL_APP_PACKAGES S-1-15-2-1
All applications running in an app package context. ML_UNTRUSTED S-1-16-0
An untrusted integrity level. ML_LOW S-1-16-4096
A low integrity level. ML_MEDIUM S-1-16-8192
A medium integrity level. ML_MEDIUM_PLUS S-1-16-8448
A medium-plus integrity level. ML_HIGH S-1-16-12288
A high integrity level. ML_SYSTEM S-1-16-16384
A system integrity level. ML_PROTECTED_PROCESS S-1-16-20480
A protected-process integrity level. AUTHENTICATION_AUTHORITY_ASSERTED_IDENTITY S-1-18-1
A SID that means the client’s identity is asserted by an authentication authority based on proof of possession of client credentials.<29> <30> SERVICE_ASSERTED_IDENTITY S-1-18-2
A SID that means the client’s identity is asserted by a service.<31> <32> FRESH_PUBLIC_KEY_IDENTITY S-1-18-3
A SID that means the client’s identity is asserted by an authentication authority based on proof of current possession of client public key credentials.<33> KEY_TRUST_IDENTITY S-1-18-4
A SID that means the client’s identity is based on proof of possession of public key credentials using the key trust object.<34> KEY_PROPERTY_MFA S-1-18-5
A SID that means the key trust object had the multifactor authentication (MFA) property.<35> KEY_PROPERTY_ATTESTATION S-1-18-6
A SID that means the key trust object had the attestation property.<36>
–jeroen
Posted in .NET, Delphi, Development, Software Development, The Old New Thing, Windows Development | Leave a Comment »
Posted by jpluimers on 2018/01/23
Maybe one day the Object Inspector gets a real overhaul and hopefully the first thing is someone fixing the F11 behaviour that – in the early days of real Delphi productivity – toggled between designer and object inspector.
Lets digress to that one first as it’s much related to Object Inspector productivity.
Like F12 (that toggles between designer and code editor) it was a predictive two way toggle that never lost it’s state (since around Delphi 7 it’s a four stage toggle: designer -> object inspector -> code editor -> object inspector -> designer) but:
A long time before that (I forgot in which time frame, as in the beta-D1..D3 era, productivity enhancements were rapidly succeeding each other): when you start to type in the name column, it will select the property or event (depending on the tab you’re on).
At first that feature wasn’t documented at all for a very long time, not even in the [WayBack] Delphi 2007 Object Inspector documentation around 10 years after this feature was introduced. So it became part of a lot of “Delphi productivity” conference sessions (I think Delphi “conference” productivity shortcuts will find you some).
Around Delphi 2010, it got documented in [Archive.is] Object Inspector Keyboard Shortcuts – RAD Studio:
Tab+<letter> Jumps directly to the first property or event beginning with the letter.
Five more years later, the documentation got finally changed to use the “incremental search” coined in [WayBack] Malcolm Groves — Incremental Searching in the Delphi Object Inspector.
Delphi Seattle documentation [WayBack] Object Inspector Keyboard Shortcuts – RAD Studio:
Tab+<letter> Starts an incremental search on the Name column of properties and events. Use the backspace key to delete characters of your search pattern.
Early 2012 and later that year, Uwe Schuster wrote two blog posts that are now only in the WayBack machine as his site vanished:
The most important features were
The cool thing on the filter implementation is that it search both the properties and sub properties. Which made it very easy to edit the Color sub-property of a Font by just typing “color” (the filtering was insensitive too).
Later I found there is also a beta 6 on DropBox downloads saved from his site via [WayBack] What bugs me ;-) about the new Communities is that you first have to join in …: [WayBack] Dropbox – Uwe Schuster
Some screenshots are at [WayBack] TDelphiBlog: Revised Object Inspector для Delphi 2010-XE3 от Uwe Schuster. Обзор.
Two and a half years ago, [WayBack and Archive.is] Coming Soon to RAD Studio … Enhanced Designer Experience! – Community Blogs – Embarcadero Community suggested improvements for the Object Inspector. I was hoping it would mach or improve the Object Inspector Expert – as hinted a [WayBack] Open Delphi, select a component, move to the Object Inspector, select the filter box, and start typing… (Coming soon, among other Object Inspector improvements… – Marco Cantù – Google+ – but it didn’t:
Slightly more a year ago there was an interesting thread [WayBack] I always wanted an object inspector where i can tell, first item always ‘name’ second to Xth, left, top, width, height, etc… then the rest, i wouldn’t… – Attila Kovacs – Google+
David Hoyle – of OTA fame – responded, so basically this post is a reminder to see if by now he or someone else has come up with something better than Embarcadero did.
–jeroen
Posted in Delphi, Development, QC, Software Development | Leave a Comment »
Posted by jpluimers on 2018/01/18
Seems very OK for a first pass in a C to Delphi conversion:
[WayBack] Hi, I’ve created a C to Delphi converter.Because it’s been so useful to me that I’ve decided to share it.It converts C code as-you-type, and it keep… – Wouter van Nifterick – Google+
Source is on GitHub: https://github.com/WouterVanNifterick/C-To-Delphi
–jeroen
Posted in C, Delphi, Development, Software Development | Leave a Comment »
Posted by jpluimers on 2018/01/16
Just in case I ever need to do heavy Delphi 2007 magic to change the component class of an object instance:
[WayBack] Quite unusual compiler behaviour (for older compilers) as seen here:http://stackoverflow.com/questions/41181767/patching-instance-class-requires-base-… – David Heffernan – Google+
References:
–jeroen
Source: Quite unusual compiler behaviour (for older compilers) as seen here: http://…
Posted in Delphi, Delphi 2007, Development | Leave a Comment »
Posted by jpluimers on 2018/01/10
As a by-effect, this article seems to one of the few that shows where Delphi uses the
.dresfile extension introduced around Delphi XE.
Recently I had to play some notification sounds in a Windows Delphi application where the application deployment should be as easy as possible: preferable copying the EXE around.
Playing a sound file seems easy, especially if it is a [WayBack] WAV file: just use the [WayBack] PlaySound or the (older) [WayBack] sndPlaySound API functions.
But if you start searching on the internet, you see lots of curious implementations for playing WAV resources through sndPlaySound.
The actual implementation is really really easy though, just make sure you follow the steps right and nothing can go wrong.
[WayBack] The full source code is on my BeSharp.net repository, here is how to to it step by step:
The steps depend on the
MMSystemunit, so most of the code translates back to [WayBack] Turbo Pascal for Windows (yes, the 16-bit Pascal days when theMMSystemunit was introduced) with the exception of theSND_SENTRYflag.The thing that more recent Delphi versions made a lot easier is embedding
WAVfiles asWAVEresources, more on that further on. Read the rest of this entry »
Posted in Borland Pascal, Delphi, Delphi 2, Delphi 2005, Delphi 2006, Delphi 2007, Delphi 2009, Delphi 2010, Delphi 3, Delphi 4, Delphi 5, Delphi 6, Delphi 7, Delphi XE, Delphi XE2, Delphi XE3, Delphi XE4, Delphi XE5, Development, Pascal, Software Development, Turbo Pascal | Leave a Comment »
Posted by jpluimers on 2018/01/10
One of my main gripes about lots of RTL/VCL/FMX code: conventions are often lacking.
Which means one of the below functions starts with Ansi (but does a Unicode operation) and the other has the parameters in reverse.
var
Comp: function(const s1, s2: string): Boolean;
begin
if CheckBox1.Checked then
Comp := ContainsText
else
Comp := AnsiStartsText;
end;
–jeroen
source: [WayBack] Damned ! var Comp : function(const s1, s2: string): Boolean; begin if CheckB… – Paul TOTH +
Posted in Delphi, Development, Software Development | 2 Comments »
Posted by jpluimers on 2018/01/10
Interesting idea:
[WayBack] Wouldn’t it be nice if Delphi has an attribute that automatically registers your class for you? – Lennart Aasenden – Google+
Source at [WayBack] Autoregister attribute for Delphi | Jon L. Aasenden
–jeroen
Posted in Delphi, Development, Software Development | Leave a Comment »
The Wiert Corner - irregular stream of stuff 