function SelectAllFormText: Boolean;
SelectAllFormText 包装了 PDFium 的
FORM_SelectAllText 入口点。该 PDFium API 已在单元级别
绑定,但直到 v1.23.0 才拥有高级访问器;此方法让应用程序获得
控件内 Ctrl+A 手势,而无需子类化视图
当进行了选择(即聚焦的控件至少有一个字符)时返回 True,
否则返回 False。当视图不活动、文档不带 AcroForm 或没有控件
聚焦时,安全地返回 False
与 GetSelectedFormText 的经典配对是
全选复制菜单项:SelectAllFormText 高亮聚焦控件内的每个字符,
然后 GetSelectedFormText 将这些字符作为 WString 返回以放入剪贴板
FormField[i] := FormField[i]; — PDFium 会在值更改时将选区折叠为插入符
procedure TForm1.miSelectAllClick(Sender: TObject);
begin
if PdfView1.SelectAllFormText then
sbInfo.SimpleText := 'Form text selected'
else
sbInfo.SimpleText := 'No focused form widget';
end;
// 全选复制模式
procedure TForm1.miCopyAllClick(Sender: TObject);
begin
if PdfView1.SelectAllFormText then
Clipboard.AsText := string(PdfView1.GetSelectedFormText);
end;