Esiste un altro modo per ottenere i checkconstraints da codice, come spiegava gibra al punto 1.
Crei un progetto nuovo. Metti un TAdoConnection sulla form e lo colleghi al database.
Poi metti un TAdoDataset e imposti solo la proprietà Connection puntando a AdoConnection1
Lega una TDataSource al AdoDataset1 e una TDBGrid a DataSource1
Infine, con un TButton, al click utilizzerai questo codice:
procedure TForm1.Button1Click(Sender: TObject);
begin
AdoConnection1.Connected := true;
AdoConnection1.OpenSchema(siCheckConstraints, EmptyParam, EmptyParam, AdoDataset1);
end;
Nella Griglia vedrai tutte le informazioni relative ai CheckConstraint.
OpenSchema restituisce un recordset contenente le informazioni del database relative al tipo di schema a cui accedi
In ADODB.pas è dichiarato TSchemaInfo, che puoi usare per ottenere diverse informazioni.
TSchemaInfo = (siAsserts, siCatalogs, siCharacterSets, siCollations,
siColumns, siCheckConstraints, siConstraintColumnUsage,
siConstraintTableUsage, siKeyColumnUsage, siReferentialConstraints,
siTableConstraints, siColumnsDomainUsage, siIndexes, siColumnPrivileges,
siTablePrivileges, siUsagePrivileges, siProcedures, siSchemata,
siSQLLanguages, siStatistics, siTables, siTranslations, siProviderTypes,
siViews, siViewColumnUsage, siViewTableUsage, siProcedureParameters,
siForeignKeys, siPrimaryKeys, siProcedureColumns, siDBInfoKeywords,
siDBInfoLiterals, siCubes, siDimensions, siHierarchies, siLevels,
siMeasures, siProperties, siMembers, siProviderSpecific);
Ora hai un sacco di informazioni in più. Divertiti