自定义博客皮肤VIP专享

*博客头图:

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

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

博客底图:

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

栏目图:

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

主标题颜色:

RGB颜色,例如:#AFAFAF

Hover:

RGB颜色,例如:#AFAFAF

副标题颜色:

RGB颜色,例如:#AFAFAF

自定义博客皮肤

-+
  • 博客(5)
  • 论坛 (8)
  • 收藏
  • 关注

原创 有关字符的加密与解密

   本人在日常的MIS的开发中常用到的些口令处理中常用的个字符处理过程现在帖在这里请大家多提意见!function CryptStr(const S:String; sType: DWord):String;var  i: Integer;  FKey: Integer;begin  result:=;  case sType of  0:       SetPass;    beg

2000-12-17 20:54:00 684

原创 在Delphi中实现任意形状的窗体

Form的TEXT:object Form1: TForm1  Left = 192  Top = 107  BorderStyle = bsNone  Caption = Form1  ClientHeight = 348  ClientWidth = 536  Color = clBtnFace  Font.Charset = DEFAULT_CHARSET  Font.Color =

2000-12-15 14:54:00 770

原创 AccesS密码的打击

 type  TForm1 = class(TForm)    Button1: TButton;    Chk2000: TCheckBox;    Edit1: TEdit;    Button2: TButton;    Edit2: TEdit;    OpenDialog1: TOpenDialog;    Button3: TButton;    Label1: TLabel;  

2000-12-15 09:55:00 611

原创 移动没有CAPTION的窗体

procedure WMMOVE(VAR Message: TWMNCHITTEST); Message WM_NCHITTEST;procedure TForm1.WMMOVE(VAR Message: TWMNCHITTEST);begin  Message.Result := HTCAPTION;end;

2000-12-13 12:04:00 533

原创 OICQ中用户图标选择的实现

unit Unit1;interfaceuses  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,  StdCtrls;type  TForm1 = class(TForm)    List1: TComboBox;    Button1: TButton;    procedure B

2000-12-13 11:19:00 632

空空如也

MSDATGRD.OCX在WinME下报错,请大侠拉一把!

发表于 2001-11-22 最后回复 2001-11-22

jbuilder发布EJB问题!

发表于 2001-10-31 最后回复 2001-10-31

欢迎进入DELPHI高级应用论谈!

发表于 2001-09-28 最后回复 2001-09-28

好消息!!!!!!!!!!!!!!!!!

发表于 2001-09-22 最后回复 2001-09-23

好消息!!!!!!!!!!!!!!!!!!

发表于 2001-09-22 最后回复 2001-09-22

仲爱‘RUP软件工程’的朋友出来说说话!-----》》

发表于 2001-07-09 最后回复 2001-07-10

图形算法问题!(人机接口问题)

发表于 2001-02-02 最后回复 2001-02-03

各位大侠好呀!!!高分呀

发表于 2000-11-07 最后回复 2000-11-08

空空如也

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

TA关注的人 TA的粉丝

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