02 2024 档案

摘要:Byte 与 字符串(AnsiString、WideString) 相互转换 代码 String转Byte procedure TForm1.Button1Click(Sender: TObject); var buf: TBytes; I: Integer; begin //ANSI编码 buf 阅读全文
posted @ 2024-02-28 19:08 txgh 阅读(904) 评论(0) 推荐(0) 编辑
摘要:Byte 与 AnsiChar、WideChar 相互转换 代码 AnsiChar、WideChar转Byte procedure TForm1.Button1Click(Sender: TObject); var ac: AnsiChar; wc: WideChar; bys: TBytes; b 阅读全文
posted @ 2024-02-24 11:16 txgh 阅读(183) 评论(0) 推荐(0) 编辑
摘要:GUID相关操作 代码 procedure TForm1.Button1Click(Sender: TObject); var GUID1, GUID2: TGUID; begin //创建GUID if CreateGUID(GUID1) <> 0 then Memo1.Lines.Add('创建 阅读全文
posted @ 2024-02-06 14:02 txgh 阅读(296) 评论(0) 推荐(0) 编辑
摘要:SQLServer 游标简单使用 示例 简单使用 --定义变量 Declare @ID int, @Code varchar(10) --定义游标 Declare _cur CURSOR FOR Select ID, Code from tceshi WHERE ID < 100 --打开游标 OP 阅读全文
posted @ 2024-02-02 14:45 txgh 阅读(59) 评论(0) 推荐(0) 编辑

点击右上角即可分享
微信分享提示