[SOLVED]TBufDataset insert data(string Type) no disp no dbgrid lazarus / 16-Databases ---------------------------------------------------------------------- loadymf · 2023-11-10 03:10 when I use TBufDataset insert data(string Type) no disp no dbgrid. Only disp ID,other field not disp?How to fix it ? code is under Quoteprocedure TForm1.Button1Click(Sender: TObject); var     F:TFieldDef; begin      cds.Close;    cds.FieldDefs.Clear;       F:= cds.FieldDefs.AddFieldDef;    f.Name:='id';    f.Required:=true;    f.DataType:=ftinteger;    F:= cds.FieldDefs.AddFieldDef;    f.Name:='QuanGuoXueJiHao';    f.Required:=false;    f.DataType:=ftString;       F:= cds.FieldDefs.AddFieldDef;    f.Name:='ShiLingErTongXingMing';    f.Required:=true;    f.DataType:=ftString;    cds.CreateDataset;    cds.Append;     cds.FieldByName('ID').AsInteger:=1;      cds.FieldByName('QuanGuoXueJiHao').AsAnsiString:='ymf2';     cds.FieldByName('ShiLingErTongXingMing').AsString:='ymf';     cds.Open; ---------------------------------------------------------------------- cdbc · 2023-11-10 06:53 Hi At least, you need a "Post" in there, to store the data, something like this:Code: Pascal  [Select][+][-]window.onload = function(){var x1 = document.getElementById("main_content_section"); if (x1) { var x = document.getElementsByClassName("geshi");for (var i = 0; i    cds.Append;    cds.FieldByName('ID').AsInteger:=1;     cds.FieldByName('QuanGuoXueJiHao').AsAnsiString:='ymf2';    cds.FieldByName('ShiLingErTongXingMing').AsString:='ymf';    cds.Post; // <--- This one    cds.Open; Regards Benny ---------------------------------------------------------------------- loadymf · 2023-11-12 01:00 I SOLVED it   cds.FieldDefs.Add('ID', ftinteger);//this disp OK,The length of the int type is fixed   cds.FieldDefs.Add('QuanGuoXueJiHao', ftstring, 20);//TBufDataset use buf size , String type length is not fixed, if undefined, the length is zero and is not displayed   cds.FieldDefs.Add('ShiLingErTongXingMing', ftstring, 12);   cds.post ;//Not required in debug mode