Ok here's a solution
instead of using a field.create I used fielddefs
heres the code snippets
RESLT1 := Tbufdataset.Create(self);
RESLT1.Name := RESLTName;
RESLT1.FieldDefs.Add('RS_Number',ftString,20);
RESLT1.FieldDefs.Add('Delta',ftString,20);
RESLT1.CreateDataset;
RESLT1.Active := True;
Ain't coding FUN!!!!!