Howto create TppField in code
I need to create some TppFields run time, and do it like this:
procedure TForm1.SpeedButton2Click(Sender: TObject);
var ppField: TppField;
begin
ppField := TppField.Create(self);
ppField.FieldName := 'Test';
ppField.DataType := dtInteger;
ppJITpipeline.AddField(ppField);
end;
But when the application terminates, I get an Access Violation. Whats
missing?
Carl
procedure TForm1.SpeedButton2Click(Sender: TObject);
var ppField: TppField;
begin
ppField := TppField.Create(self);
ppField.FieldName := 'Test';
ppField.DataType := dtInteger;
ppJITpipeline.AddField(ppField);
end;
But when the application terminates, I get an Access Violation. Whats
missing?
Carl
This discussion has been closed.
Comments
Try seting the TppField.DataPipeline property to your JITPipeline. This
should fix the error.
--
Nico Cizik
Digital Metaphors
http://www.digital-metaphors.com