NewDataJRStegano1.UseCryptService = true JRStegano1.UserPasswort = Trim$(Text2(0).Text) JRStegano1.NewData |
JR-Stegano Activex Example |
NewDataJRStegano1.UseCryptService = true JRStegano1.UserPasswort = Trim$(Text2(0).Text) JRStegano1.NewData |