自定义博客皮肤VIP专享

*博客头图:

格式为PNG、JPG,宽度*高度大于1920*100像素,不超过2MB,主视觉建议放在右侧,请参照线上博客头图

请上传大于1920*100像素的图片!

博客底图:

图片格式为PNG、JPG,不超过1MB,可上下左右平铺至整个背景

栏目图:

图片格式为PNG、JPG,图片宽度*高度为300*38像素,不超过0.5MB

主标题颜色:

RGB颜色,例如:#AFAFAF

Hover:

RGB颜色,例如:#AFAFAF

副标题颜色:

RGB颜色,例如:#AFAFAF

自定义博客皮肤

-+
  • 博客(4)
  • 资源 (1)
  • 收藏
  • 关注

原创 摇奖机是按照金字塔的原理设计的

摇奖机是按照金字塔的原理设计的 摇奖机是按照金字塔的摇奖机是按照金字塔的原理设计的 摇奖机是按照金字塔的原理设计的 众所周知,摇奖机其实就是一台人工控制的计算机。双色球单次的销量如果不超过3000万元左右的话。开不开一等奖或开几注一等奖是由人给计算机发出指令。再由计算机根据事先设定好的程序。在当期的销售号码中。选出一注或几注既有一部分人中奖,彩票中心又不赔钱的号码。再由一个识别器读取计算机事先算好

2009-10-14 09:20:00 7185

原创 delphi string类型转integer时出错的检测

procedure TForm1.Button1Click(Sender: TObject);Var  Num: Integer;Begin  Try    Num:=StrToInt(Edit1.Text);    Edit2.Text:=IntToStr(Num*Num);  Except    On EConvertError Do   ShowMessage(Edit1.Text+无法转

2009-10-14 09:06:00 2588

原创 delphi BYTE 转字符串

BYTE 转字符串 procedure TForm3.FormCreate(Sender: TObject);begin  Self.Paint;end;function ByteToHex(Src: Byte): String;begin  SetLength(Result, 2);  asm    MOV         EDI, [Result]    MOV         E

2009-10-07 21:32:00 6186

转载 (Delphi) TStringList的用法 构造简单数据库

TStringList的用法(Delphi)2007-05-07 16:47确实很有用,但是这个怎么把空格也默认为分割符了呢,谁知道怎样把空格不认为是分割符的??TStrings是一个抽象类,在实际开发中,是除了基本类型外,应用得最多的。常规的用法大家都知道,现在来讨论它的一些高级的用法。先把要讨论的几个属性列出来:1、CommaText2、Delimiter

2009-10-07 21:16:00 1302

lzw 压缩 单元 压缩 单元 压缩 单元 压缩 单元

lzw 压缩 单元 压缩 单元 压缩 单元 压缩 单元

2009-03-25

空空如也

TA创建的收藏夹 TA关注的收藏夹

TA关注的人

提示
确定要删除当前文章?
取消 删除