基德船长

博客园 首页 新随笔 联系 订阅 管理

随笔分类 -  Delphi

摘要:1.SHIFT+鼠标左键 先选中任一控件,按键后可选中窗体(选中控件后按Esc效果一样) 2.Shift+F8 调试时弹出CPU窗口。3.Shift+F10 等于鼠标右键(Windows快捷键)。4.Shitf+箭头 选择5.shift +F12 快速查找窗体并打开6.F7 (步进式调试同时追踪进入子过程)7.F8 (步进式调试不进入子过程)8.F9 运行9.F12 切换EDITOR,FORM10.Alt+F4 关闭所有编辑框中打开的源程序文件,但不关闭项目11.ALT+鼠标左键 可以块选代码,用来删除对齐的重复代码非常有用12.Ctrl+F9 编译13.Ctrl+shift+N(n=1,2. 阅读全文
posted @ 2012-05-23 10:05 基德船长

摘要:{方法一:}uses ComObj,clipbrd;function ToExcel(sfilename:string; ADOQuery:TADOQuery):boolean;const xlNormal=-4143;var y : integer; tsList : TStringList; s,filename :string; aSheet :Variant; excel :OleVariant; savedialog :tsavedialog;begin Result := true; try ex... 阅读全文
posted @ 2012-05-23 09:42 基德船长