onlyou13

  博客园  :: 首页  :: 新随笔  :: 联系 :: 订阅 订阅  :: 管理
上一页 1 2 3 4 5 6 ··· 10 下一页

2023年4月17日

摘要: def _read_urls(self): filename = 'd:\\youtube.txt' with open(filename, 'r', encoding='utf-8') as f: urls = f.readlines() count = 0 age_limit_count = 0 阅读全文
posted @ 2023-04-17 17:50 onlyou13 阅读(38) 评论(0) 推荐(0) 编辑

2023年3月25日

摘要: unit Unit1; interface uses Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics, Vcl.Controls, Vcl.Forms, V 阅读全文
posted @ 2023-03-25 17:19 onlyou13 阅读(79) 评论(0) 推荐(0) 编辑

2023年2月27日

摘要: A: f1_urls = ['a', 'b'] f2_urls = ['a', 'c'] python3 中获取存在于f1_urls 而不在f2_urls的项目 Q: f1_urls = ['a', 'b'] f2_urls = ['a', 'c'] # 将列表转换为集合 f1_set = set( 阅读全文
posted @ 2023-02-27 18:03 onlyou13 阅读(27) 评论(0) 推荐(0) 编辑

2023年2月16日

摘要: 问1: 如何用delphi调用ChatGPT接口 答1: uses IdHTTP, System.JSON; function GetChatGPTResponse(const Query: string): string; var IdHTTP: TIdHTTP; begin IdHTTP := 阅读全文
posted @ 2023-02-16 21:42 onlyou13 阅读(1675) 评论(0) 推荐(0) 编辑

摘要: library GlobalHooks; uses Windows; {$R *.res} const WH_KEYBOARD_LL = 13; WH_MOUSE_LL = 14; type TKeyboardHook = record Hook: HHOOK; Callback: function 阅读全文
posted @ 2023-02-16 21:25 onlyou13 阅读(245) 评论(0) 推荐(0) 编辑

摘要: 问1: curl "https://api.m.afreecatv.com/station/video/a/view" ^ -H "authority: api.m.afreecatv.com" ^ -H "accept: application/json, text/plain, */*" ^ - 阅读全文
posted @ 2023-02-16 20:56 onlyou13 阅读(265) 评论(0) 推荐(0) 编辑

2023年2月10日

摘要: //版本一:吃完一个就结束了。unit Unit1; interface uses Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics, Vcl.Control 阅读全文
posted @ 2023-02-10 15:49 onlyou13 阅读(284) 评论(0) 推荐(0) 编辑

摘要: uses System.Rtti, System.JSON; type TPerson = class public Name: string; Age: Integer; end; function ObjectToJSON(AObject: TObject): string; var Conte 阅读全文
posted @ 2023-02-10 15:26 onlyou13 阅读(116) 评论(0) 推荐(0) 编辑

摘要: uses Classes, SyncObjs; type TItem = class Data: Integer; end; TProducer = class(TThread) private FQueue: TThreadedQueue<TItem>; protected procedure E 阅读全文
posted @ 2023-02-10 15:24 onlyou13 阅读(581) 评论(0) 推荐(0) 编辑

摘要: uses SysUtils, Classes, DateUtils; const LineBreak = #13#10; type TSubtitle = record Start, Stop: TDateTime; Text: string; end; function ParseASS(cons 阅读全文
posted @ 2023-02-10 15:13 onlyou13 阅读(111) 评论(0) 推荐(0) 编辑

上一页 1 2 3 4 5 6 ··· 10 下一页