Hi,

we use the clipboard for replacing words in rtf textfields.

Procedure OnClick
integer li_fnr
string ls_ntext
string ls_text
rowid ri_rec
rowid ri_krec
get value of (oForm2(oDbGroup1(self))) item 0 to li_fnr
if li_fnr le 0 begin
procedure_return
end
Move (GetRowId(au_lv.File_Number)) to ri_rec
If (IsNullRowId(ri_rec)) begin
procedure_return
end
get value of (okont_em_ansprech(self)) item 0 to ls_text
trim ls_text to ls_text
if ls_text le "" begin
procedure_return
end
direct_output "Clipboard:"
writeln ls_text
close_output
send paste to (au_lv_vorbem(self))
End_Procedure // OnClick

It works fine.

The same program with the user don´t work. Sometimes it works, sometimes I
must click a few times or it don´t work.
Under VDF11.1 it works (user said). But there are no changes.

Regards Dittmar