URL传值有特殊字符 如#
摘要：
今天做毕设时 传值时 如：1#101 ，传到后台值变成了1 #号后的值都没了，最后上网查找，原来#号是特殊字符，用一种方法解决了。之前是XXXX修改后 ... 阅读全文
posted @ 2015-04-25 16:24 @冰糖 阅读(520) 评论(0) 推荐(0) 编辑
媒体播放器
摘要：
unit Uni_musicPlayer;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, MPlayer, StdCtrls, ExtCtrls, ... 阅读全文
posted @ 2015-01-20 15:55 @冰糖 阅读(184) 评论(0) 推荐(0) 编辑
Sql 存储过程 @strSQl 子句的应用
摘要：
SELECT * FROM dbo.YHZH --删除外键ALTER TABLE [dbo].[JHFKDMX1] drop FK_YHZH_JHFKDMX1 ALTER TABLE [dbo].[XHSKDMX1] drop FK_YHZH_XHSKDMX1 ALTER TABLE [db... 阅读全文
posted @ 2015-01-19 11:44 @冰糖 阅读(708) 评论(0) 推荐(0) 编辑
Delphi 彩票抽奖机
摘要：
unit Uni_pick;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ExtCtrls, jpeg;type TForm... 阅读全文
posted @ 2015-01-08 14:15 @冰糖 阅读(433) 评论(0) 推荐(0) 编辑
Delphi dll的使用
摘要：
DLL定义library SUM;{ Important note about DLL memory management: ShareMem must be the first unit in your library's USES clause AND your project's (sele... 阅读全文
posted @ 2015-01-07 19:37 @冰糖 阅读(179) 评论(0) 推荐(0) 编辑
存储过程插入100 条数据
摘要：
create proc ppas declare @n intset @n=1while @n<=100begininsert into student values('11341101320'+LTRIM(@n),'Jack'+ltrim(@n),'男',22,'上海','18272986984... 阅读全文
posted @ 2014-12-29 16:31 @冰糖 阅读(546) 评论(0) 推荐(0) 编辑
SQL 查询 之 union ,case ,group
摘要：
union alluse myDBSELECT '大于20' as scope,count(*) as 人数FROM student where age>=60union all SELECT '小于20' as scope ,count(*) as 人数FROM student where ag... 阅读全文
posted @ 2014-12-17 16:47 @冰糖 阅读(275) 评论(0) 推荐(0) 编辑
Delphi 打印杨辉三角
摘要：
program yanghui1;{$APPTYPE CONSOLE}uses SysUtils; var i,j,t,n:Integer; a:array[0..14,0..14] of Integer; begin write('请输入行数：'); readln(n); for i... 阅读全文
posted @ 2014-12-16 10:32 @冰糖 阅读(524) 评论(0) 推荐(0) 编辑
SQL 基础1
摘要：
1 use myDB; 2 insert into student values('1134110116','Tom','男',22,'上海','18272986984','上海'); 3 insert into student values('1134110117','Tom1','男',... 阅读全文
posted @ 2014-12-11 20:09 @冰糖 阅读(232) 评论(0) 推荐(0) 编辑
Delphi 控制台程序
摘要：
新建控制台程序： File--> New -->Other --> console Application 1 program Project1; 2 3 {$APPTYPE CONSOLE} 4 5 uses 6 SysUtils; 7 var 8 a,b,sum:Integer; 9 ... 阅读全文
posted @ 2014-12-10 13:43 @冰糖 阅读(391) 评论(0) 推荐(0) 编辑
