Добрый день!
Есть кнопка uniButton1
Производится импорт из Clipboard.
После импорта текст в UniMemo1 показывается правильно но:
UniMemo1.text не выдает текст полностью.
UniMemo1.Lines.Count выдает значение '0'.
procedure TMainForm.UniFormCreate(Sender: TObject);
begin
with uniButton1, JSInterface do
begin
JSCode('async function uniPaste(input) { '+
' const text = await navigator.clipboard.readText(); '+
' in
Добрый день!
Есть кнопка uniButton1
Производится импорт из Clipboard.
После импорта текст в UniMemo1 показывается правильно но:
UniMemo1.text не выдает текст полностью.
UniMemo1.Lines.Count выдает значение '0'.
procedure TMainForm.UniFormCreate(Sender: TObject);
begin
with uniButton1, JSInterface do
begin
JSCode('async function uniPaste(input) { '+
' const text = await navigator.clipboard.readText(); '+
' in