Got "TTranslateString", expected "TPersistent"
lazarus / 31-LCL

----------------------------------------------------------------------
mrmaxmusterman · 2021-07-13 20:33

Im currently creating an aes en-/decryption program in lazarus. So
far, everything is working fine. The only problem i currently have is
that i want to copy the output to clipboard. I therefore used the
function:

Code: Pascal  [Select][+][-]window.onload = function(){var x1 =
document.getElementById("main_content_section"); if (x1) { var x =
document.getElementsByClassName("geshi");for (var i = 0; i
Clipboard.Assign(Edit.Text)
Note: Under the uses section, "Clipbrd" is set in place

When tryping to compile, i'll get the following error:

"aes_unit.pas(80,40) Error: Incompatible type for arg no. 1: Got
"TTranslateString", expected "TPersistent""

Is there any way that i can convert the translatestring to a normal
string etc. so that i can therefore copy it to my clipboard?

----------------------------------------------------------------------
Bart · 2021-07-13 21:03

Try:
Code: Pascal  [Select][+][-]window.onload = function(){var x1 =
document.getElementById("main_content_section"); if (x1) { var x =
document.getElementsByClassName("geshi");for (var i = 0; i  
ClipBoard.AsText := Edit1.Text;
Bart

----------------------------------------------------------------------
mrmaxmusterman · 2021-07-13 21:09

It works. Thank you so much!