星辰日月00

摘要： 在 uses 引用 shlobj,ActiveX,ComObj 1 在 uses 引用 shlobj,ActiveX,ComObj 2 3 procedure AddLink; 4 var 5 tmpObject : IUnknown; 6 tmpSLink : IShellLink; 7 tmpPFile : IPersistFile; 8 PIDL : PItemIDList; 9 StartupDirectory : array[0..MAX_PATH] of Char;10 LinkFilename : WideString;11 linkshort... 阅读全文

摘要： 子程序包括过程和函数。这里的所谓函数是指用户自定义函数。从pl/sql程序设计的角度，也可以把子程序认为是pl/sql命名块，它存放在数据字典中，可以在应用程序中进行多次调用。子程序存放在数据库服务器中，以编译方式运行，执行速度快。子程序一般是完成特定功能的pl/sql程序块，具有一定的通用性，可以被不同应用程序多次调用，这样就简化了应用程序的开发与维护，并能提高应用程序的性能。让用户程序通过调用子程序访问数据库，而不是让用户程序直接访问数据库，这样做可以确保数据库的安全。一、过程如果在用户应用中经常要执行某些操作，那么就可以将这些操作构造为一个过程。默认情况下，用户定义的过程为该用户所拥有， 阅读全文

摘要： 一、Owner和Parent的区别： Parent属性是指构件的包容器，构件只能在此范围内显示和移动。举例子如下： (1)在Form1的窗体上，放一个Panel1,并将Panel1拉大， (2)在Panel1上放一Button1； (3)在Form1上放一Button2。 现在如果移动Panel1,则Button1随着Panel1移动，这是因为Button1的Parent是Panel1。现在将Button2移到Panel1上，再次移动Panel1,Button2并不跟着移动，这是因为Button2的Parent是Form1。除在窗体设计中，应注意构件的Parent是谁外，在... 阅读全文

摘要： 集合类型表示一组值，该组值由集合所依据的有序类型定义。定义集合的常用有序类型不多，一般为枚举类型或子界类型。如果子界类型取值为 1..3，那么基于它的集合类型值可以是 1、或 2、或 3、或 1 和 2、或 1 和 3、或 2 和 3、或取所有 3 个数、或一个数也没有。//定义type Uppercase = 'A'..'Z'; Letters = set of Uppercase; //基于子界定义 TBorderIcon = (biSystemMenu, biMinimize, biMaximize, biHelp); TBorderIcons = set 阅读全文

摘要： Chr //将一个有序数据转换为一个 ANSI 字符Ord //将一个有序类型值转换为它的序号Round //转换一个实型值为四舍五入后的整型值Trunc //转换一个实型值为小数截断后的整型值Int //返回浮点数的整数部分IntToStr //将数值转换为字符串IntToHex //将数值转换为十六进制数字符串StrToInt //将字符串转换为一个整型数，如字符串不是一个合法的整型将引发异常StrToIntDef //将字符串转换为一个整数，如字符串不合法返回一个缺省值Val //将字符串转换为一个数字（传统 Turbo Pascal 例程用于向后兼容）Str //将数字转换为格式化字符 阅读全文

摘要： 'BORLAND' { BORLAND }'You''ll see' { You'll see }'''' { ' }'' { 空串 }' ' { 空格 }#89#111#117 { You }#89'Y'#89 { YYY }#89 + 'Y' + #89 { YYY }#13#10 { 换行 } 阅读全文

摘要： 子界：如果我们定义一个变量为integer型，那么它的取值范围一般为-32768～32767。而事实上，每个程序中所用的变量的值都有一个确定的范围。 例如，人的年龄一般为1到120岁，一年中的月数为1到12月，一月中的天数为1到31天等等。 如果能在程序中对所用的变量的值域作具体规定，就便于检查出那些不合法的数据，这就能更好地保证程序运行的正确性且在一定程度上节省内存空间。//定义type Ten = 1..10; OverHundred = 100..1000; Uppercase = 'A'..'Z'; //TMonth = Jan..Dec;------- 阅读全文

摘要： 枚举：它用于声明一组命名的常数，当一个变量有几种可能的取值时，可以将它定义为枚举类型。//定义type Colors = (Red, Yellow, Green, Cyan, Blue, Violet); Suit = (Club, Diamond, Heart, Spade);--------------------------------------------------------------------------------//举例：type Colors = (Red, Yellow, Green, Cyan, Blue, Violet);var C: Colors;be... 阅读全文

摘要： 分类范围字节备注简单类型序数整数Integer-2147483648 .. 21474836474有符号32位Cardinal0 .. 42949672954无符号32位Shortint-128 .. 1271有符号8位Smallint-32768 .. 327672有符号16位Longint-2147483648 .. 21474836474有符号32位Int64-263 .. 2638有符号64位Byte0 .. 2551无符号8位Word0 .. 655352无符号16位Longword0 .. 42949672954无符号32位字符AnsiChar(Char)ANSI字符集8位Wide 阅读全文

摘要： 存在测试IN、NOT IN、EXISTS、NOT EXISTS例：SELECT * FROM SC WHERE SNO IN(SELECT SNO FROM STUDENT WHERE SSEX=’女’);同：SELECT * FROM SC WHERE EXISTS(SELECT * FROM STUDENT WHERE SSEX=’女’ AND SC.SNO=SNO);返回所有女生的成绩例：SELECT * FROM SC WHERE SNO NOT IN (SELECT SNO FROM STUDENT WHERE SSEX=’女’);同：SELECT * FROM SC WHERE N 阅读全文