// 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();