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;
// Copy-all pattern
procedure TForm1.miCopyAllClick(Sender: TObject);
begin
if PdfView1.SelectAllFormText then
Clipboard.AsText := string(PdfView1.GetSelectedFormText);
end;