Delphi中取某整数的某位的位状态的小函数

Delphi中取某整数的某位的位状态的小函数的相关文章

• 
  delphi中的split函数

  标签：编程语言 网络编程

  //根据字符串，拆分字符串，相当于vb中的split函数 function SplitString(const Source,ch:string):TStringList; var   temp:String;   i:Integer; begin   Result:=TStringList.Create;   //如果是空自符串则返回空列表   if Source=''   then exit;   temp:=Source;   i:=pos(ch,Source);   wh...[ 查看全文 ]

  baby也许累了

  411
• 
  检测整数和长整数的函数

  标签：ASP

    经常见到cint和clng的溢出出错，如果有检测函数就不会出这个问题，下面这两个函数是应朋友要求写的，看一下吧 '检测字符串是否是整数 function Is_Int(a_str)    if not isnumeric(a_str) or len(str) 5 then       Is_Int = false       exit function    elseif len(str) < 5 then   ...[ 查看全文 ]

  微商仔

  11
• 
  Delphi 3.0中的函数调用模式

  标签：Delphi

    在用Delphi 3.0开发软件时，出现了硬件驱动程序(DLL)中的函数和过程不能正常调用的问题，该硬件由英国Schlumberger公司生产，驱动程序用汇编语言编写的。其《编程指南》给出的Microsoft C的示范程序均能正常运行。但运行此软件时现出的错误提示为： Access violation at address ×××××××× in module…… 经仔细分析，才发现问题出现在函数调用模式上。 Delphi 3.0支持五种调用...[ 查看全文 ]

  玖零后潮流使馆

  281
• 
  Delphi中API编程－－在Delphi中调用API函数

  标签：Delphi

    Delphi作为一种面向对象的可视化开发工具，以其开发程序的高速度和编译代码的高效率越来越受到广大编程人员的喜爱。尽管Delphi已经提供了非常强大的开发组件（VCL），但灵活使用API函数一定可以使你的程序增色不少。 状态键的检查 当今不少流行软件的编辑窗口（包括Delphi的代码编辑窗口）的底部都有一个状态条用来显示一些状态信息，比如当前光标的位置等。通常键盘的状态键...[ 查看全文 ]

  再不飞就老了

  511
• 
  Delphi3.0中的函数调用模式

  标签：Delphi

    在用Delphi30开发软件时，出现了硬件驱动程序 (DLL)中的函数和过程不能正常调用的问题，该硬件由英国Schlumberger公司生产，驱动程序用汇编语言编写的。其《编程指南》给出的 Microsoft C的示范程序均能正常运行。但运行此软件时现出的错误提示为： Access violation at address ×××××××× in module…… 经仔细分析，才发现问题出现在函数调用模式上。 Delphi30支持五种调...[ 查看全文 ]

  十年之约嫁给我

  71
• 
  在Delphi中如何维护COM+的状态信息

  标签：编程语言 网络编程

  在Delphi中如何维护COM+的状态信息？xml:namespace prefix = o ns = "urn:schemas-microsoft-com:office:office" /> 刘晓明（cipherliu） 问题是这样开始的：我需要写一个COM+，用来连接不同的数据库。有的朋友可能会说，应该为每个数据库建立一个COM+，但是在我的系统里不能这样。我们在做一个教育辅助系统，用户是学校（当然包括学校里的老师、学生、家长），我们为每个学校建一个数据库，这些数据库...[ 查看全文 ]

  大云南旅游

  31
• 
  Delphi中RichEdit的奥妙

  标签：Delphi

    一、如何得知当前行号 用RichEdit（或者memo）控件制作文本编辑器时，通过访问linescount属性可以得到总行数，但是若想知道光标当前所在行的行号就麻烦了，因为delphi没有提供这个属性。要实现这个编辑器必备功能，就须调用em_ LineFromChar。请试试下面的程序。 先在窗口中布置一个RichEdit或者memo（命名为editor），以及一个button。在button的onclick事件中写入下列代码。 var...[ 查看全文 ]

  呆呆呆传的故事

  1101
• 
  回调函数与Delphi的事件模型

  标签：Delphi

    回调函数： 回调函数是这样一种机制：调用者在初始化一个对象（这里的对象是泛指，包括OOP中的对象、全局函数等）时，将一些参数传递给对象，同时将一个调用者可以访问的函数地址传递给该对象。这个函数就是调用者和被调用者之间的一种通知约定，当约定的事件发生时，被调用者（一般会包含一个工作线程）就会按照回调函数地址调用该函数。 这种方式，调用者在一个线程，被调用者在另一个...[ 查看全文 ]

  夏琳儿110

  591
• 
  用Delphi检测特殊键状态

  标签：Delphi

    在编程中，三个特殊键(NUM LOCK键、CAPS LOCK键、SCROLL LOCK键)是可以通过键盘控制操作的。但有时在应用程序中需要切换大小写输入、数字键输入等功能,这就需要在程序中加入自动判别这些键状态和切换这些键状态的功能。笔者用Delphi4.0编制了一个检测和切换这些特殊键的程序。 一、创建含有如下控件的窗体： 控件 Caption form1 用Delphi检测Num Lock键，Caps Lock键，Scroll Lo...[ 查看全文 ]

  糖出水芙蓉

  501
• 
  C++中的运算符重载函数基础及其值返回状态

  标签：编程语言 网络编程

         运算符重载是C++的重要组成部分，它可以让程序更加的简单易懂，简单的运算符使用可以使复杂函数的理解更直观。 对于普通对象来说我们很自然的会频繁使用算数运算符让他们参与计算，但是对于自定义类的对象来说，我们是无论如何也不能阻止写出像下面的代码一样的程序来的。 例子如下： C++ 代码  class Test  {      ...[ 查看全文 ]

  abc安于现状111

  31
• 
  Delphi学习:2个不错的通配符比较函数

  标签：Delphi

    近日在和朋友讨论 MaskMatch 时偶得2个不错的算法。 函数1 只支持'*','?'模糊匹配。速度比采用递归算法的快近2倍，比TMask方法快很多。 函数2 完全支持正规表达式。速度于之前的相同。(不会正规表达式的朋友慎用) // =========================== // Function 1 // =========================== // Check if the string can match the wildcard. It can be use...[ 查看全文 ]

  阳光的深深深深

  231
• 
  Javascript中的数学函数

  标签：Web开发

  在Javascript中，数学方法可以分成以下几类： constans（常数）、power functions（乘方函数）、trigonometic functions（三角函数）、rounding functions（舍入函数）、random numbers（随机数字） 常数和乘方函数 Math.E 自然对数的底(为常数) 2.718 Math.LN10 10的自然对数 2.302 Math.LN2 2的自然对数 0.693 Math.PI 圆周率 3.1415 Math.SQRT1_2 1/2的平方根 0.707 Math.SQRT2 2的平方根 1.414 Math.s...[ 查看全文 ]

  ILYouHK

  41
• 
  javascript中的有名函数和无名函数

  标签：Web开发

  看个例子： 1  代码如下： function a(){      alert("我是脚本之家");  }  2   代码如下： var a = function(){      alert("我是脚本之家");  }         1和2的方法是等价的，1是有名函数，而2只是让一个变量指向一个无名函数而已，而1和2...[ 查看全文 ]

  q200912951

  21
• 
  Delphi控制并行端口位操作

  标签：Delphi

  一、并口读写 在汇编语言中，可以用 in、out 指令操作并口，而在Delphi中并没有相对应的函数、方法可对并口进行读写，幸运的是Delphi可以嵌入汇编程序，通过直接嵌入汇编指令 in、out 可方便地对并口进行读写。我们还可以通过调用 Windows API 函数或第三方提供的DLL、VXD来访问并口，但通过使用嵌入汇编的方法对并口进行读写更方便、快捷。 使用下面的 ReadPort 函数和 WritePort 过程...[ 查看全文 ]

  松花江_黑水

  151
• 
  Delphi中TApplication类的巧用

  标签：Delphi

    ---- Delphi是一种面向对象的编程语言，由于它采用完全集成OOP的优点，因此使它成为目前十分流行的Windows开发工具。在Delphi包含的众多类中，TApplication是一个有着十分重要作用的类。TApplication类是用于描述Delphi编制的应用程序的一个类。通过对这个类的灵活应用可以编制许多有特点的程序。下面我们就举几个这方面的例子。  ---- 1 检测当前Windows程序是否被激活：&n...[ 查看全文 ]

  大佳11

  11
• 
  构造函数中的this指针

  标签：C语言教程 C语言函数

  构造函数中的this指针 作者：温昱 说明：感谢网页C++ FAQ Lite的作者Marshall Cline和译者申旻；感谢《C++语言核心》一书的作者Gregory Satir和Doug Brown及译者张铭泽 -------------------------------原理------------------------------- 某些人认为不应该在构造函数中使用this指针，因为这时this对象还没有完全形成。 但是，只要小心，是可以在构造...[ 查看全文 ]

  丽江玛咖种植批

  11
• 
  Delphi中的Access技巧集

  1.DELPHI中操作ACCESS数据库(建立.mdb文件,压缩数据库)  以下代码在WIN2K,D6,MDAC2.6下测试通过,  编译好的程序在WIN98第二版无ACCESS环境下运行成功. //在之前uses ComObj,ActiveX //声明连接字符串 Const SConnectionString = 'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=%s;' +'Jet OLEDB:Database Password=%s;'; //============================================================...[ 查看全文 ]

  year放荡不羁i

  81
• 
  Delphi中易混淆的概念

  标签：Delphi

    一、Owner和Parent的区别： Parent属性是指构件的包容器，构件只能在此范围内显示和移动。举例子如下： (1)在Form1的窗体上，放一个Panel1,并将Panel1拉大， (2)在Panel1上放一Button1； (3)在Form1上放一Button2。 现在如果移动Panel1,则Button1随着Panel1移动，这是因为Button1的Parent是Panel1。现在将Button2移到Panel1上，再次移动Panel1,Button2并不跟着移动，...[ 查看全文 ]

  阿亞灬承

  81
• 
  几个常用的小函数

  标签：ASP

  //函数名：chkemail //功能介绍：检查是否为Email Address //参数说明：要检查的字符串 //返回值：0：不是 1：是 function chkemail(a) { var i=a.length; var temp = a.indexOf('@'); var tempd = a.indexOf('.'); if (temp 1) { if ((i-temp) 3){ if ((i-tempd)0){ return 1; } } } return 0; } //函数名：fucCheckNUM //功能介绍：检查是否为数字 //参数说明：要检查的数字 //返回值：1为是数字，0为...[ 查看全文 ]

  Sola_秀

  221
• 
  php中rename()函数的妙用

  标签：PHP

  大家都知道，rename()函数可以对文件或目录进行重命名的操作。其实它还可以做很多事情。 熟悉unix的朋友应该知道shell命令mv，它相当与win32的移动，而且移动的同时可进行重命名。我发现，php的rename()函数就相当于mv，它不仅仅只有简单的重命名的功能，同样可以改变文件甚至整个目录的路径。 例如： $oldpath ----文件或目录原来路径 $newpath ----新定义路径 那么 rename($oldpa...[ 查看全文 ]

  永远的火箭love

  71