Ouvrez PowerShell en tant qu’administrateur.
Positionnez vous dans le dossier RTL de Delphi (ajustez le chemin selon votre version).

Code : Sélectionner tout - Visualiser dans une fenêtre à part
cd "C:\Program Files (x86)\Embarcadero\Studio\22.0\Source\RTL"
Exécutez la commande suivante pour rechercher tous les débuts de lignes function ou procedure et enregistrer le résultat :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
Get-ChildItem -Recurse -Filter *.pas |
  Select-String -Pattern '^(function|procedure)\s+' -AllMatches |
  ForEach-Object { $_.Line.Trim() } |
  Out-File -Encoding UTF8  C:\Users\...\Documents\AllDelphi.txt