How to disable copying of Text

Hi Mick!

I'm a bit astonished? What's your problem?
Please read in the samples section and have a look in the reference.
You asked this already and there's an answer, too?
But again: Yes, you can do this. First use "permission" and then "encrypt".
Have a look in the online reference i fear you can't avoid this ;-)

Cheers, Ingo

Mick!

You don't need a sample. The library has over 500 functions.
I can't imagine that you want a sample for each function?
Your a developer... You know how to create, unlock, load and free...
and between load and free you can call the functions.

Here's a partly sample from my app:

// First the create and unlock and LoadFromFile then
// . . .
// in my app you can select which security stuff
// and encryption level you want ...
   p5 := 9;
   If Pos('40', Trim(seclev.Text))  > 0 Then p5 := 0;
   If Pos('128', Trim(seclev.Text)) > 0 Then p5 := 1;
   If Pos('AES', Trim(seclev.Text)) > 0 Then p5 := 2;
   If Trim(print.Text)    = 'Yes'        Then p6 := 1  else p6 := 0;
   If Trim(copy.Text)     = 'Yes'        Then p7 := 1  else p7 := 0;
   If Trim(change.Text)   = 'Yes'        Then p8 := 1  else p8 := 0;
   If Trim(field.Text)    = 'Yes'        Then p9 := 1  else p9 := 0;
   If Trim(comment.Text)  = 'Yes'        Then p10 := 1 else p10 := 0;
   If Trim(access.Text)   = 'Yes'        Then p11 := 1 else p11 := 0;
   If Trim(assemb.Text)   = 'Yes'        Then p12 := 1 else p12 := 0;
// . . .
// few security settings only work with 128 bit encryption so ...
   If p5 = 0 Then
   begin
      p9  := 0;
      p11 := 0;
      p12 := 0;
   end;
// . . .
// now you create the permission string ...
   perm := QPL.EncodePermissions(p6, p7, p8, p10, p9, p11, p12, 0);
// . . .
// let the userpassword be a ''. That's better ;-)
   QP.EncryptFile(oldfilename, newfilename, mainpassword, userpassword, p5, perm);
// . . .
// a Free ... and that's it ;-)

Cheers, Ingo

Thanks Ingo,

Thank God. I began going crazy ;-)
BTW: If it's working now you should post your code in the samples-section for the next.

Cheers, Ingo