TynSerial基本数据类型序列(还原)
TynSerial基本数据类型序列(还原)
procedure TForm1.ToolButton17Click(Sender: TObject); var serial: TynSerial; begin serial := TynSerial.Create; //序列 serial.WriteString('str', '字符串'); serial.WriteInteger('int', 123); serial.WriteFloat('float', 12.3); serial.WriteBool('bool', True); serial.WriteDateTime('datetime', Now); //还原 serial.ReadString('str'); serial.ReadInteger('int'); serial.ReadFloat('float'); serial.ReadBool('bool'); serial.ReadDateTime('datetime'); serial.Free; end;
本文来自博客园,作者:{咏南中间件},转载请注明原文链接:https://www.cnblogs.com/hnxxcxg/p/10972473.html