commonunit.pas

来自「DELPHI编程实现的对端口通讯的封装。比较有参考意义。」· PAS 代码 · 共 15 行

unit CommonUnit;

interface
  
type
  PDataBlock = ^TDataBlock;
  TDataBlock = record
    Len: Integer;
    Content: array [0..100] of Char;
  end;

implementation

end.