// Output all field values to a memo Memo1.Clear(); Memo1.Lines.Add( Format( 'Form Fields: %d', [ ImageEnView1.PdfViewer.FormFields.Count ])); for i := 0 to ImageEnView1.PdfViewer.FormFields.Count -1 do Memo1.Lines.Add( Format( '%s (%s): %s', [ ImageEnView1.PdfViewer.FormFields[i].Name, PdfFormFieldTypeToStr( ImageEnView1.PdfViewer.FormFields[i].FieldType ), ImageEnView1.PdfViewer.FormFields[i].Value ]));
// Clear all form field values for i := 0 to ImageEnView1.PdfViewer.FormFields.Count -1 do case ImageEnView1.PdfViewer.FormFields[i].FieldType of fftCheckBox : ImageEnView1.PdfViewer.FormFields[i].Checked := False; fftTextField : ImageEnView1.PdfViewer.FormFields[i].Value := ''; else // Default handling ImageEnView1.PdfViewer.FormFields[i].Value := ''; end; ImageEnView1.Update();
// Set all text and checkbox values for i := 0 to ImageEnView1.PdfViewer.FormFields.Count -1 do case ImageEnView1.PdfViewer.FormFields[i].FieldType of fftTextField : ImageEnView1.PdfViewer.FormFields[i].Value := 'ImageEn'; fftCheckBox : ImageEnView1.PdfViewer.FormFields[i].Checked := TRUE; end; ImageEnView1.Update();
// Toggle all checkboxes in the current page for i := 0 to ImageEnView1.PdfViewer.FormFields.Count -1 do if ImageEnView1.PdfViewer.FormFields[i].FieldType = fftCheckBox then ImageEnView1.PdfViewer.FormFields[i].Checked := NOT ImageEnView1.PdfViewer.FormFields[i].Checked; ImageEnView1.Update();
// Delete the first form field from the page ImageEnView1.PdfViewer.FormFields.Remove( 0 ); ImageEnView1.PdfViewer.ReloadPage();
// Remove the highlighted form field from the PDF page ImageEnView1.PdfViewer.FormFields.Remove( ImageEnView1.PdfViewer.FormFields.HighlightedIndex ); ImageEnView1.PdfViewer.ReloadPage();