摘要: unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs;type TForm1 = class(TForm) procedure FormMouseMove(Sender: TObject; Shift: TShiftState; X... 阅读全文
posted @ 2010-11-19 17:53 巅枫 阅读(28902) 评论(0) 推荐(0)