Using WPTools 8 and wPDF V4 ist is now possible to create text fields in PDF files.
Example:
Create a simple edit field
with WPRichText1.InputTextFieldName('FORMEDITFIELD') do
begin
Source := FieldName.Text;
Params := SFieldText.Text + '@@HINT@@' + SHintText.Text;
end;
Create a edit field based on a TWPObject class:
Here it is also possible to create multi line fields.
var obj : TWPTextObj;
begin
if Multiline.Checked then
obj := WPRichText1.TextObjects.InsertClass('TWPOEditControl', 360*5, 260*5 )
else obj := WPRichText1.TextObjects.InsertClass('TWPOEditControl', 360*5, 260 );
if obj.IsImage then
begin
obj.ObjRef.ObjName := AFieldName.Text;
(obj.ObjRef as TWPOEditControl).Text.Text := TextEdit.Text;
(obj.ObjRef as TWPOEditControl).Hint := HintEdit.Text;
(obj.ObjRef as TWPOEditControl).PDFFont := TWPOEditControlPDFFont( FontSelect.ItemIndex );
if not AutoSize.Checked then
(obj.ObjRef as TWPOEditControl).PDFOptions :=
(obj.ObjRef as TWPOEditControl).PDFOptions - [wpecAutosizeFont];
(obj.ObjRef as TWPOEditControl).Multiline := Multiline.Checked;
if Multiline.Checked then (obj.ObjRef as TWPOEditControl).FontSize := 10;
end;
end;