摘要：
unit mainformunit; {$mode objfpc}{$H+} interface uses Classes, SysUtils, Forms, Controls, Graphics, Dialogs, StdCtrls; type ITest = interface function 阅读全文
posted @ 2021-01-28 22:25 jjw 阅读(344) 评论(0) 推荐(0)
摘要：
在delphiXE中，可以使用匿名方法，线程中用起来比较方便，lazarus目前不支持匿名方法，在不继承线程的情况下，使用匿名线程或TThread.ExecuteInThread时，需要单独写两个方法：一个给TThread.ExecuteInThread用，另一个给同步用。感觉比较麻烦，并且可读性略 阅读全文
posted @ 2021-01-27 17:03 jjw 阅读(520) 评论(0) 推荐(1)
摘要：
用法：不要手工添加heaptrc单元，应该在编译选项中勾选 Using heaptrc in Lazarus To enable this in your Lazarus project: Go to Project Options/Linking and in the Debugging sect 阅读全文
posted @ 2021-01-26 21:56 jjw 阅读(252) 评论(0) 推荐(0)
摘要：
简单的封装了一下，有很多不完善的地方，很多细节未考虑进去。 client代码 unit ClientMainFormUnit; interface uses Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, Syst 阅读全文
posted @ 2021-01-22 20:56 jjw 阅读(134) 评论(0) 推荐(0)
摘要：
console.log(Object.__proto__ Function.prototype);//true console.log(Function.__proto__ Function.prototype);//true console.log(Object.__proto__ Functio 阅读全文
posted @ 2020-11-26 20:24 jjw 阅读(105) 评论(0) 推荐(0)
摘要：
<!DOCTYPE html> <html lang="en"> <head> <meta charset="UTF-8"> <meta name="viewport" content="width=device-width, initial-scale=1.0"> <title>Document< 阅读全文
posted @ 2020-11-21 16:37 jjw 阅读(105) 评论(0) 推荐(0)
摘要：
body { font: 12px/1.5 或 font: 12px/36px } 1.5是当前元素字体的1.5位 阅读全文
posted @ 2020-11-21 16:10 jjw 阅读(89) 评论(0) 推荐(0)
摘要：
<!DOCTYPE html> <html lang="en"> <head> <meta charset="UTF-8"> <meta name="viewport" content="width=device-width, initial-scale=1.0"> <title>Document< 阅读全文
posted @ 2020-11-21 15:49 jjw 阅读(554) 评论(0) 推荐(0)
摘要：
async play() { let upload = document.getElementById("file1"); let f = upload.files[0]; var ctx = new AudioContext(); var source = ctx.createBufferSour 阅读全文
posted @ 2020-11-08 21:53 jjw 阅读(85) 评论(0) 推荐(0)
摘要：
methods: { async upfile() { let upload = document.getElementById("file1"); let f = upload.files[0]; let size = 1024 * 100; let start = 0, end = 0; let 阅读全文
posted @ 2020-11-08 16:40 jjw 阅读(183) 评论(0) 推荐(0)
浙公网安备 33010602011771号