| | | | |

2015年2月5日

摘要： SCREEN.WIDTHSCREEN.HEIGHT 阅读全文

posted @ 2015-02-05 17:06 零·红蝶阅读(131) 评论(0) 推荐(0)

摘要： 1 procedure TForm1.FormClick(Sender: TObject);2 var3 P: TPoint;4 begin5 GetCursorPos(P);6 Self.Caption := Format('X: %d, Y: %d',[P.X, P.Y]);7 en... 阅读全文

posted @ 2015-02-05 17:04 零·红蝶阅读(118) 评论(0) 推荐(0)

不存在的主窗体（自始至终隐藏）

摘要：最近做一个小程序没有固定的主窗体，流程随机性比较大所以找寻相应的方案解决方法如下 1 program Project1; 2 3 uses 4 Forms, 5 Unit1 in 'Unit1.pas' {Form1}, 6 Unit2 in 'Unit2.pas' {Form2}; ... 阅读全文

posted @ 2015-02-05 10:12 零·红蝶阅读(207) 评论(0) 推荐(0)

2015年2月5日

公告