随笔 - 51  文章 - 0 评论 - 36 阅读 - 77693
< 2025年4月 >
30 31 1 2 3 4 5
6 7 8 9 10 11 12
13 14 15 16 17 18 19
20 21 22 23 24 25 26
27 28 29 30 1 2 3
4 5 6 7 8 9 10

摘要: type PTCsRc = ^TCsRc; TCsRc = record ID:Word; Count:Integer; end; TForm1 = class(TForm) Memo1: TMemo; Button1: TButton; procedure FormCreate(Sender: T 阅读全文
posted @ 2020-04-21 17:40 一笑如风 阅读(238) 评论(1) 推荐(0)
点击右上角即可分享
微信分享提示