摘要: 本例功能: 1、获取 StringGrid 的行数、列数; 2、给单元赋值. 运行效果图: //示例代码: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ExtCtrls, Grids... 阅读全文
posted @ 2008-03-04 23:04 万一 阅读(12450) 评论(22) 推荐(1)
摘要: 动画剧本: 通过虚拟屏幕调整窗体运行后的位置; 鼠标对对虚拟屏幕双击放大、再单击会复原; 可以调整对虚拟屏幕的大小; 可以关掉或打开这个虚拟屏幕. 阅读全文
posted @ 2008-03-04 22:38 万一 阅读(6045) 评论(0) 推荐(0)
摘要: //Char 类型与其编码值的转换: var b: Byte; c: Char; begin b := Ord('A'); {返回: 65} b := Ord(#65); {返回: 65} b := Ord($41); {返回: 65} b := Ord(#$41); {返回: 65} b := Byte('A'); {返回: 65} b := ... 阅读全文
posted @ 2008-03-04 11:47 万一 阅读(9949) 评论(16) 推荐(0)
摘要: Windows API 中的字符串对应这 Delphi 的 PChar(PAnsiChar); 在 API 中使用 Delphi 的字符串还是比较灵活的. 先说赋值: //赋值方法1: 给直接量 begin SetWindowText(Handle, '新标题'); end; //赋值方法2: 定义它要的类型 var p: PChar; begin p := '新标题'; ... 阅读全文
posted @ 2008-03-04 00:28 万一 阅读(8375) 评论(13) 推荐(0)