摘要：
线程B向线程A发送消息，SendMessage(线程A句柄, msg, wParam参数, lParam参数); 线程A重写WndProc(var Message: TMessage); 阅读全文
摘要：
用Delphi编写的exe，vista系统及以上系统，启动exe需要管理员权限只要添加uac，xp系统不支持uac，需要判断是否是管理员身份启动。 1 var 2 mutex: HWND; 3 4 begin 5 if not GetProcessIsAdmin() then //判断是否以管理员启 阅读全文
摘要：
用inno打包service老外已经把这块代码封装好，我们只要引用就行了。 注意：inno setup有两版本一个是Unicode编码一个是ansi编码，这里必须用Unicode编码打包。不然写进Windows service时会乱码。 区分：打开inno带u的是unicode编码。 service 阅读全文
摘要：
说明：CreateRoundRectRgn(R.Left, R.Top, R.Right, R.Bottom, arc1, arc2); 阅读全文
摘要：
设置以下属性即可实现透明窗体显示文字： 设置窗体属性： BorderStyle 属性设置为 bsNoneColor 属性设置为 clWhite（白色：窗体背景色）TransparentColor 属性设置为 trueTransparentColorValue 属性设置为 clWhite（白色：透明颜 阅读全文
摘要：
题意：给你 n 个正整数以及整数s，求出总和不小于 s 的连续子序列的长度最小值。若无则输出 0 ；题解：枚举 + 二分； 1 #include 2 #include 3 #include 4 #include 5 #include 6 #include 7 #include 8 #i... 阅读全文
摘要：
题意：在给定的高度和初速度，任意抛使得它水平距离最远。题解：我们可以很容易的推出length = v*cos(x)*( sqrt( 2.0*h*g + v*v*sin(x)*sin(x) ) + v*sin(x) ) / g; 然后对 [ 0, π/2 ] 之间的弧度三分查找（凸线图形一般用三分） ... 阅读全文
摘要：
题意：求n！的位数题解：斯特林数:log10(n!)=1.0/2*log10(2*pi*n)+n*log10(n/e)。 1 #include 2 #include 3 #include 4 #include 5 #define E 2.71828182 6 #define PI acos(... 阅读全文
摘要：
题意：已知求f（n）。题解：可以转为f（n） = 1！*2！*3！... *n！。这题数很大，要小心内存和时间。我们可以只存f（0）f（10）f（20）...f（10000000）,这样可以解决时间问题，内存我们可以将存的这些数都除以10，然后这题就OK了。 1 #include 2 #inclu... 阅读全文
摘要：
题意：给定 n 个区间，问最多重复的子区间？题解：（离散化思想）讲所有的数都排个序，将区间的左值定为 1 ，右值定为 -1 ，这样对所有的数搜一遍过去找最大的值即可 1 #include 2 #include 3 #include 4 #include 5 #include 6 #incl... 阅读全文