摘要：
下面是一个支持任意表的 SQL SERVER2000分页存储过程 1 下面是一个支持任意表的 SQL SERVER2000分页存储过程 2 //-----下面是一个支持任意表的 SQL SERVER2000分页存储过程 3 4 //----分页存储过程开始创建----------------------------------------------------------------------------------------------------------- 5 IF EXISTS (SELECT name FROM sysobjects WHERE name = 'P.. 阅读全文
摘要：
1 procedure SetDateTimeFormat; 2 var p: DWORD; //TFormatSettings ; 3 begin 4 SetLocaleInfo(LOCALE_USER_DEFAULT, LOCALE_SSHORTDATE, pchar('yyyy-MM-dd')); //设置短日期格式 5 SetLocaleInfo(LOCALE_USER_DEFAULT, LOCALE_STIMEFORMAT, pchar('H:mm:ss')); 6 //设置时间格式，24小时制 7 SendMes... 阅读全文