6g下载网
当前位置主页 > TAG标签 > delphi
  • delphi代码实现Widestring类型转换为字符数组方法

    下面给大家介绍delphi代码实现Widestring类型转换为字符数组方法,希望能给大家提供帮助。 代码如下: procedureCopyWideToBuf(varbuf:buffer;varStart:Longword;WideMsg:Widestring); var giWideLen:Byte; i:longword; giWideC...

    分类:编程开发 点击:0 日期:2016-01-07
  • delphi实现int整型转换为byte4方法

    下面给大家介绍delphi实现int整型转换为byte4方法,希望能给大家提供帮助。 代码如下: functioninttobyte4(n1:Longword):byte4; vari:LongWord; temp:byte4; begin for I: = 3 downto0do begin temp[i] : = n1 mod256; n1 n1: =n1DIV...

    分类:编程开发 点击:0 日期:2016-01-07
  • delphi代码实现截取字符串中前70个汉字方法

    下面给大家介绍delphi代码实现截取字符串中前70个汉字方法,希望能给大家提供帮助。 //截取字符串中前70个汉字 FunctionGetChn70(str:string):string; begin Result: = CutChnStr (str,70); end; //截取字符串指定长...

    分类:编程开发 点击:0 日期:2016-01-07
  • delphi代码实现计算字符串中文字数的个数方法

    下面给大家介绍delphi代码实现计算字符串中文字数的个数方法,希望能给大家提供帮助。 方法参数说明: //str: string 要查找和统计的字符串 代码如下: functionChnNumber(str:string):integer; var i,ChnN...

    分类:编程开发 点击:0 日期:2016-01-07
  • delphi代码实现字符在字符串的位置及个数方法

    下面给大家介绍delphi代码实现字符在字符串的位置及个数方法,希望能给大家提供帮助。 参数说明: //c, str: string; //C是查找的字符;str是被查找的字符串; //Num: Integer //计数器 functionCharPosStr(c...

    分类:编程开发 点击:0 日期:2016-01-07
  • delphi代码实现判断一个字符串是否是日期类型方法

    下面给大家介绍delphi代码实现判断一个字符串是否是日期类型方法,希望能给大家提供帮助。 代码如下: functionStrDateInvalid(Year,Mon,Day:string):Boolean; var tempDate:TDateTime; Str:string; begin Result : = Fals...

    分类:编程开发 点击:0 日期:2016-01-07
  • delphi代码实现判断一个串是否为数字串方法

    下面给大家介绍delphi代码实现判断一个串是否为数字串方法,希望能给大家提供帮助。 代码如下: ///*判断一个串是否为数字串*/ functionIntStrInvalid(str:string):Boolean; var tempInt:Integer; begin Result :...

    分类:编程开发 点击:0 日期:2016-01-07
  • delphi代码实现加密解密方法

    下面给大家介绍delphi代码实现加密解密方法,希望能给大家提供帮助。 加密解密类申明: TEncrypt = class private {Privatedeclaraction} FKey:string; public {Publicdeclaraction} constructorCreate; destructorDestroy;overri...

    分类:编程开发 点击:0 日期:2016-01-07
  • delphi代码实现获取当前星期几的第几天方法

    下面给大家介绍delphi代码实现获取当前星期几的第几天方法,希望能给大家提供帮助。 //获取当前星期几的第几天,星期日是第7天。 代码如下: functionGetWeekDay:Integer; var sWeek:string; begin sWeek...

    分类:编程开发 点击:0 日期:2016-01-07
  • delphi代码实现判断输入的串是否只包含数字字符方法

    下面给大家介绍delphi代码实现判断输入的串是否只包含数字字符方法,希望能给大家提供帮助。 // 判断输入的串是否只包含数字字符 // 参数str : 进行判断的串。 // 返回 :如果只包含数字字符...

    分类:编程开发 点击:0 日期:2016-01-07
  • delphi代码实现数字全部转换为大写或小写中文数字方法

    下面给大家介绍delphi代码实现数字全部转换为大写或小写中文数字方法,希望能给大家提供帮助。 //说明:给定任意串,将串中的数字全部转换为大写或小写中文数字 //参数:uppercase_flag 为T...

    分类:编程开发 点击:0 日期:2016-01-07
  • delphi代码实现整数转换为字符数组方法

    下面给大家介绍delphi代码实现整数转换为字符数组方法,希望能给大家提供帮助。 定义字符数组: buffer = array [1..32768]ofchar; 代码如下: functionCopyIntToBuf(varBuf:Buffer;Start,Value,NumType:integer):intege...

    分类:编程开发 点击:0 日期:2016-01-07
  • delphi代码实现字符串转换为字符数组方法

    下面给大家介绍delphi代码实现字符串转换为字符数组方法,希望能给大家提供帮助。 定义字符数组: buffer = array [1..32768]ofchar; 代码如下: functionCopyStrToBuf(varBuf:buffer;Start:integer; sContent:string;C...

    分类:编程开发 点击:0 日期:2016-01-07
  • delphi代码实现字符数组转换为字节方法

    下面给大家介绍delphi代码实现字符数组转换为字节方法,希望能给大家提供帮助。 定义字符数组: buffer = array [1..32768]ofchar; 代码如下: functionGetByteFromBuf(buf:buffer;varStart:integer):Byte; begin Result...

    分类:编程开发 点击:0 日期:2016-01-07
  • DELPHI代码实现字符数组转换成整数方法

    下面给大家介绍DELPHI代码实现字符数组转换成整数方法,希望能给大家提供帮助。 定义buf字符数组: buffer = array [1..32768]ofchar; 转换代码如下: functionGetIntFromBuf(Buf:buffer;varStart:integer):longWord;...

    分类:编程开发 点击:0 日期:2016-01-07
  • delphi从字符数组中获取固定长度字符串代码方法

    下面给大家介绍delphi从字符数组中获取固定长度字符串代码方法,希望能给大家提供帮助。 定义字符数组代码: buffer = array [1..32768]ofchar; 从字符数组中获取固定长度字符串代码: functionGetSt...

    分类:编程开发 点击:0 日期:2016-01-07
  • delphi代码实现十六进制转换为二进制方法

    下面给大家介绍delphi代码实现十六进制转换为二进制方法,希望能给大家提供帮助。 代码如下 : functionHexToByte(aHex:string):ByteArray; var i,len:integer; RetByte:ByteArray; begin len: = length (aHex)div2; setlength...

    分类:编程开发 点击:0 日期:2016-01-07
  • delphi获取十六进制值的方法

    下面给大家介绍delphi获取十六进制值的方法,比如字母A就等于10,字母B就等于11,以此类推。希望能给大家提供帮助。 代码如下: functionGetHexValue(aHex:char):byte; begin caseaHexof '1' :result: = 1 ; '2'...

    分类:编程开发 点击:0 日期:2016-01-07
  • delphi代码实现二进制转换为十六进制代码方法

    下面给大家介绍delphi代码实现二进制转换为十六进制代码方法,希望能给大家提供帮助。 functionByteToHex(aMsg:ByteArray):string; var i:integer; RetStr:string; begin RetStr: = '' ; for i: = low (aMsg)toHigh(aMsg)do begin...

    分类:编程开发 点击:0 日期:2016-01-07
  • delphi代码判断一个串是否是小于等于70个字方法

    下面给大家介绍delphi代码判断一个串是否是小于等于70个字的方法,可以通过Len参数设置判断字的个数。希望能给大家提供帮助。 代码如下: FunctionIsLessSomeWordFromStr(Str:String;Len:Integer):Boolean;...

    分类:编程开发 点击:0 日期:2016-01-07
  • Delphi代码实现获取固定长度字符串的方法

    下面给大家介绍Delphi代码实现获取固定长度字符串的方法,希望能给大家提供帮助。 代码如下: FunctionGetSomeWordFromStr(VarStr:String;Len:Integer):String; Var WordCount,Index,StrLen:Integer; Begin //获取字符串的...

    分类:编程开发 点击:0 日期:2016-01-07
  • delphi连接SQLSERVER2000数据库两种方法

    下面给大家介绍delphi连接SQLSERVER2000数据库两种方法,希望能给大家提供帮助。 方法一: FunctionConnectDataBase(ADOConnection:TADOConnection;ServerName,DataBaseName,UserName,UserPassWord:String):Boolean; Begin WithADOConn...

    分类:编程开发 点击:0 日期:2016-01-07
  • delphi代码调整本机时间与数据库服务器时间一致方法

    下面给大家介绍delphi代码调整本机时间与数据库服务器时间一致方法,希望能给大家提供帮助。 代码如下: FunctionAdjustLocalDate:Boolean; Var ADOQuery:TADOQuery; SqlStr:String; GetSystemTime:TSystemTime; Begin Re...

    分类:编程开发 点击:0 日期:2016-01-07
  • delphi显性执行Sql语句和隐性执行Sql语句方法

    delphi程序员经常要显性执行Sql语句和隐性执行Sql语句,下面给大家介绍delphi显性执行Sql语句和隐性执行Sql语句方法。 代码如下: //显性执行Sql语句 FunctionExecSqlStr(VarADOQuery:TADOQuery;DBConnectionStr...

    分类:编程开发 点击:0 日期:2016-01-07
  • delphi获取数据库时间方法

    delphi如何获取数据库时间,很多delphi程序员朋友经常要获取数据库时间,下面代码将实现获取数据库时间: //获取数据库的时间 FunctionGetDBDateTime(DBConnectionString:String):TDateTime; Var ADOQuery:TADOQuer...

    分类:编程开发 点击:0 日期:2016-01-07