2024年4月25日 星期四

lazarus数据序列为二进制

delphi中间件| 博客园_咏南中间件和开发框架 |21:04:00

procedure TForm1.Button1Click(Sender: TObject); begin UniQuery1.Close; UniQuery1.SQL.Clear; UniQuery1.SQL.Add('select top 2 * from tunit'); UniQuery1.

lazarus数据序列为JSON

delphi中间件| 博客园_咏南中间件和开发框架 |21:01:00

uses DataSet.Serialize, fpjson； var obj:tjsonobject; procedure TForm1.Button1Click(Sender: TObject); begin uniquery1.Close; uniquery1.SQL.clear; uniqu