MonCertificat is Certificate

// Ouverture du sélecteur de certificat de Windows
MonCertificat = CertificateSelect()

// Annulation ou erreur
IF MonCertificat.Name = "" THEN
	RETURN
END
// Teste si le certificat sélectionné est valide pour signer
IF MonCertificat.ValidForSignature = False THEN
	Info("Le certificat sélectionné ne permet de pas de générer une signature.")
	RETURN
END

// Récupération du buffer contenant la signature
bufSignature is Buffer
bufSignature = CertificateSignString("Chaîne de caractères à signer", MonCertificat)

// Récupération du certificat contenu dans le buffer de la signature
MonCertificatExtrait is Certificate
MonCertificatExtrait = CertificateExtract(bufSignature)

// Gestion des erreurs
IF MonCertificatExtrait = Null THEN
	RETURN
END

// Ouverture de la fenêtre des propriétés du certificat
CertificateOpenProperties(MonCertificatExtrait)