说三道四技术文摘-感悟人生的经典句子
说三道四 > 文档快照

用Delphi 设 计 拨 动、 跳 线 开 关 组 件

HTML文档下载 WORD文档下载 PDF文档下载
用Delphi 设 计 拨 动、 跳 线 开 关 组 件

---- 计 算 机 测 控 系 统 中 常 使 用 各 种 计 算 机 测 试 板 卡, 在 这 些 板 卡 上 多 设 有 各

种 编 码 和 跳 线 开 关。 在 编 写 与 之 配 用 的 测 控 程 序 时, 常 需 编 写 这 些 开 关 操

作 时 的 相 应 程 序, 如 果 有 一 个 编 码 或 跳 线 开 关 组 件 是 十 分 有 帮 助 的。 以 下

是 我 用Delphi 编 写 的 一 个BiSwitch 控 件。

---- 此 控 件 由TGraphicControl 继 承 而 来, 具 有 常 用 的 属 性, 如Enabled、Tag、Hint 等, 此 外

新 增 加 了State

Color 属 性。 对 于 编 码 和 跳 线 开 关, 只 有 两 个 状 态(ON 和OFF), 在 预

先 编 辑 好 的 资 源 文 件 中 存 有 开 关 在 不 同 状 态 下 的 图 片, 当 开 关 改 变 状 态 时

将 相 应 的 图 形 显 示 出 来, 开 关 在 屏 幕 上 就 能 被“ 拨 动” 了。Color 属 性 用 于 开 关

的 背 景 与 窗 口 背 景 颜 色 配 合, 取 红 色 有 较 好 的 视 觉 效 果, 绿 色 和 黄 色 是 电

路 板 常 用 的 保 护 漆 色, 当Form 被 模 拟 成 电 路 板 时 这 会 有 所 帮 助( 通 过 修 改 资

源 文 件 可 以 得 到 你 想 要 的 开 关 颜 色 和 形 状)。

---- DIP 封 装 的 编 码 开 关 有4 位、8 位、12 位 等 规 格, 跳 线 开 关 则 可 以 任 意 数 量 使

用。 将BiSwitch 组 合 使 用 就 可 以 满 足 不 同 位 数 的 要 求, 所 附 的SWITCH 程 序 中 就

有 一 个8 位 编 码 开 关 的 例 子, 效 果 如 图。 下 面 以 双 诺 公 司 的AC1032 数 字I/O 卡 上

的SW1 开 关 说 明 使 用 方 法,SW1 用 于 设 定 测 试 卡 在 计 算 机 中 的 基 址, 其 开 关

SW1 的 位2 确 定 基 址 的 位10, 开 关 位8 确 定 基 址 的 位4, 基 址 位10 以 上 接 地, 位4 以

下 供 测 试 卡 自 用, 基 址 调 节 范 围 从210H-7F0H。 为 了 使 编 码 开 关 的 拨 动 与 基 址

对 应 起 来, 将 每 一 个BiSwitch 的Tag 属 性 赋 值 为 相 应 基 址 位 的 数 值, 如 开 关 位8 的

Tag 值 为4, 开 关 位1 未 使 用Tag 为0。 在 每 一 个BiSwitch 的OnClick 事 件 中 都 调 用doSwitch 来

响 应。

Procedure doSwitch

var

bs : TBiSwitch;

begin

bs := (Sender as TBiSwitch);

{改变开关的显示状态 }

bs.State := not bs.State;

{根据Tag的值确定新的基址 }

if bs.Tag >0 then

begin

{ HiByte

LoByte为窗体的私有变量作

为中间变量计算基址 }

if bs.Tag >7 then HiByte.SetBit( bs.Tag-8 )

else LoByte.SetBit( bs.Tag );

end;

{将新的基址赋值给测试卡 }

pc1032.SetAddress(HiByte.FValue * 256 + LoByte.FValue);

{在窗体中显示新的地址 }

lbAddress.Caption := Format

('BaseAddress is %xH'

[pc1032.GetAddress]);

end;

几十亿美元当头,你现实世界信息是否还会安全? 华为V3服务器挑战小型机,多路高端市场汹涌 迟到的祝福:Ruby生日快乐!编程快乐! 无缘CEO Stephen Elop将执掌微软硬件业务部门 又一API聚集地 3scale成立API Codex 你应该放弃的八大设计元素 Tropo与华为达成合作 Tropo API首次可供中国电信客户使用 抢先看:2014即将召开的Web Design大会 小米盒子2视频推送测试及解决播放优酷视频卡的问题 《近匠》UPYUN——从开发者变为服务者 移动开发者必须了解的10大跨平台工具 不差钱:30+收购案,170亿美元投资,IBM再度出手收购Cloudant 微软反击谷歌:Windows授权费降七成+硬件要求减少一半 [测试] 你的HTML5知识够金质吗? 基于OpenStack的虚拟机在线迁移 当64bit遇上8核心:高通发布Snapdragon 615 深圳Maker Faire创客市集:国内外创客组团来参展 腾讯正式发布QQ浏览器微信版 摩托罗拉今年推智能手表,有望提高续航能力 众筹未来必拥抱众智 果合报告:iOS趋势及手游开发六大核心策略 无视OpenStack的前车之鉴,SAP等毅然支持Cloud Foundry 轻松搞定TB级数据,开源GraphLab突破人类图计算“极限值” 英特尔至强E7 v2处理器:2倍性能提升,3倍内存容量,4倍I/O带宽 著名工业设计师Yves Béhar:“我们并不需要三星智能手表。” 跨平台的.NET运行环境 Mono 3.2.7发布! Google石博盟:抓住全球化和移动化的机遇 ShareSDK针对Unity发布社交化组件 2014 CocoaChina开发者大会将公布触控奖学金等高校合作计划 中低端智能手机热销,未来市场或主打价格战 Facebook开源flint:一个用D语言编写的C++静态代码分析器 数据维护问题,请大家多多帮忙!在线等待! 请问如何取得用户在控制面板的国别设置中所设的国家或地区是什么? SaxException:File "c:\xml\reports.xml"not found MOV large fs:0 1234h是什么东西? 网页上浮动图片怎么做阿?急~~~ 无模对话框 我到底错在哪? 问一个很简单的问题?如何做一个链接到框架页! 这是不是病毒? 新作一系统需要用条形码输入,用asp.net作,需要与条形码输入器的硬件进行交流吗?条形码的硬件选用什么比较好?价格是多少? 请问各位大虾,那里有COM以及COLLECTION对象编程的文章和例程? 一个保存文件对话框的问题 一个很菜的问题,实在不会 sql语句怎么写? 关于服务器端和客户端通信的问题,急,请各位大虾帮忙 error LNK2001: unresolved external symbol "public: char __thiscall bcdtoasc::secondchar(char)" (?secondchar@bcdtoasc@@QAEDD@Z) 文本框的问题 关于 ACCESS 添加记录的问题? 为什么我在数据窗口中的sql语句中使用参数有错误?提示invalid和不完整! 在UNIX下如何编译C++程序 请教一个COM对象创建的问题 如何获取DropDownlist的SelectedItem.Text? lirun(笨笨狗)请进来领分 怎么得到数据库中的id值。 有点痛,不知道是什么病,大家帮忙看看 GOOGLE被中国"冷处理" 请介绍一本好一点的Winsock函数编程的书,电子书或者纸书都可以 关于全局CDatabase; mysqldump备份数据库时总是出错? 谁有http://211.100.6.72的源代码最好有附带的数据库连接说明。200 在2000server上安装oracle的问题,求教! 怎样深层理解delphi的类变量 数据库中日期范围怎么比较? 如何将Access的数据导入SQL-server 散分了,高手请进---.net不能够bug ???怎样在Delphi中对导出到Excel文件单元格进行划线???? 在VB中如何进行程序的数据输入有效性验证? 请上次回答我NT问题的同志进来拿分,上次只给了100 如何学winzip那样,在弹出菜单中增加一个新的项目 英国有好点的软件公司吗? 高分求救水晶报表问题? 从数据库中取最新的第10~第20条纪录的sql语句如何写啊?各位大侠帮忙啊 记录集问题 sco unix下可以运行tcpdump吗? 无法启动X,出现cound not init font path element unix:7100,removing from list...could not open default font 'fixed' 请问是否可以在VC++下编写一个声音程序,如何编写?(只要能发出一个或两个音符就可以了) 程序员今年还可以报吗? 在flash里面,用什麼命令,可以把gif變成矢量圖?? 怎么用TC编写一个显示320*240的16色位图的程序? 用什么函数可以得到msflexgrid的行号(row的值)? 请朋友们帮忙推荐几本PB8的关于B/S和三层结构编程的书 云南是地震多发区吗? 这段作文材料如何理解?阅读下面材料,从中提炼一个有意义的话题,然后围绕话题,写一篇不少于800字的议论问.老酋长病危,找来村中三个年轻人,要他们尽可能爬到神山最高处,回来报告见闻,以 什么口什么词组成什么词语 云南地震频发的原因? 求一篇经典的作文素材,运用范围广的.上语文课前有课前活动,老师让讲作文素材,就是脱稿讲一个素材,然后分析可以从哪些方面写,每个方面简单分析一下.我的语文老师特别挑,我找不到好点 单能组成什么词 求达人说一下这个词的意思 英语翻译我的冬天这个冬天我过得很开心,因为我能做许多我想做的事情,我常常和朋友一起玩电脑游戏,打羽毛球和购物.但是也有很多作业要做,这让我很烦恼.我的朋友帮助我学习英语,我们一 为什么有机肥使用过多也会增加土壤中的硝酸盐含量?我是个新手,没什么可答谢的,只是诚恳的请教您, "牛人,酷,达人,给力 生猛,搞定,"等词是什么意思 一篇作文里角度太大太广算不算好作文比如:题目就为感动,然后写被父母感动,被好人好事感动,被…感动,这样可以吗 做一个效果好的太阳能热水器,选择做集热器的材料最好是什么1·做一个效果好的太阳能热水器,选择做集热器的材料最好是( ).A.塑料 B.玻璃 C.金属 D.陶瓷 达人这个词怎么来的 写一篇广玉兰的短文 请给这个长方形材料配两个圆,使它可以制成一个圆柱,选择什么样的圆?有几种不同的情况? 量体温的温度计的读数——在口腔内的和腋下放置时、读数是否有相应的增减变动?增减多少? 求写一篇作文,叫身边的能人,范围很广,可以是家人,同学等等.老师要求写同学,我们班有一个女生叫陆倩,毛笔字和钢笔字写的都非常好,求大家举几个例子,就是描写她的字写得好体现在哪里,我 小明家有一块长方形铁皮,爸爸想利用这块铁皮做一个圆柱形的桶.为了不浪费铁皮,他应该选择第几号圆形铁长方形的长是 12.56 宽是 5.6 一号直径是2 二号直径4 三号直径是5 求清晰的解题思路. 什么是植物有机活性碱 这个词怎么来的? 一个两个字的词语七个字母的有多少重可能?一共有四个字,前面两个是爱情,后面两个字是七个字母的. 请问古代时的:儿子.怎说?还有爸爸妈妈. 下列物质中,不属于人的排泄废物的是:A尿液 B粪便C汗液D呼出的二氧化碳 分子式为CnH2n+2O的所有醚 拉风是什么意思.和它的由来是什么 有谁知道的请快回答我啊 分子式为CnH2n+2O 的醇类有a种结构 而分子式为CnH2nO2 的羧酸类有b种结构则a和b的关系是A a>b B a=b 拉风的起源是什么拉风这个词的准确含义,来源是什么? 女人在哪里小便 4个3mm白色发光二极管 + 2个3mm红色发光二极管并联 接3.7V 500mah锂电要接多大的电阻? 由来是什么 什么生肖是英雄 酸雨的主要成分是硫酸和硝酸,但是雷雨发庄稼,NO2溶于水生成硝酸,降落到土壤内形成硝酸盐被植物吸收这不是也是有好处的吗? 起源呢?拉风和出风头的不同点是什么? 世界上有多少名人伟人的生肖是属鼠的? 有5只杯口全部向上的杯子,每次将其中4只同时“翻转”,能不能经过若干次翻转,使杯口全部向下,为什么? 海峡两岸的同胞都()祖国早日统一 老师()我们好好学习,将来报效祖国 爸爸出差3天了,我()他早点回来 一代英豪的生肖是什么生肖 机制木炭是先炭化后成型吗? 什么是抗酸成分?什么是抗碱成分例如Na2HPO4--Na3PO4哪个是抗酸成分 请问如果精子与卵子结合了,身体会有感觉么请问如果精子与卵子遇到了,身体会有感觉么 机制木炭怎样炭化 五孔一开关插座怎么接线 墙里有6跟线 3蓝2黄一红开关控制灯的 插座后面总共有6个孔 抗酸抗碱的用英语怎么说形容词啊 急求诗词达人帮忙~~~~~朋友想追一女孩,让我替他作一首诗,诗最好是古典唯美一点的,其中要包含“文芬”二字!谢谢!不要现代诗啊~~~~~ 怎么读温度计的读数啊? 2.人体血浆中最重要的缓冲对是 ,其抗酸成分是 ,抗碱成分是 自由自在 用来形容哪个生肖合适 关于温度计的精确读数玻璃管内径越细和下端玻璃泡的容积比相差越多,由于温度变化而引起玻璃管内液面位置的变化也就越明显,温度计对温度的反应越灵敏请问是为什么呢= =能详细些么不 在CH3COOH-CH3COONa缓冲对中,抗酸成分是 ,抗碱成分是 取100mL 18.3mol/L的硫酸与Zn反应,当Zn完全溶解时,生成气体在标准状况下占有的体积为22.4L,将所得溶液将所得溶液稀释成1L,测得溶液的氢离子浓度为1mol/L,求所生成的气体中二氧化硫与氢气的 云南省是地震多发地吗? 直流降压电路 我想把输出5V 500MA的电源降压到1.5V 300MA的输出应该怎么用什么电的路好配件 请问甲烷在200个大气压、100摄氏度下是什么形态,液体还是固体? 我国西南地区是地质灾害的多发区,在云南贵州于什么等省接壤地带,形成了什么什么什么为主的灾害系统? 一顿石灰石需要多少煤 为了使低层住户的窗户全年都有阳光照射 深圳两幢居民之间的距离应依据()日的楼影来计算我急用 限在今天晚上做出来 云南是地震的多发区么? 什么叫“潮”?这个词是怎么发明的? 月亮被太阳光照射的那面完全暴露出来,这一日,叫什么
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘