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

用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;

富士康自主研发智能手表 惹苹果发来订单 开发者眼中的iOS 7:重设计过程没想象中那么糟 游戏引擎Unity宣布免费支持Windows Phone 8及Xbox One 蝉游记王益善专访:7人小团队实现App 30万下载量 去除IE 10广告的两种方法 直接拿来用!最火前端开源项目(二) 工作变得简单又高效 试试这八个WebApp 移动周报:生于微信,疯狂猜图的推广经 DataTorrent 将数据分析速度从“实时”提升至“现在时” 华为FusionCube开启全球规模商用 黑暗架构:以最少时间完成系统升级并获客户认可的开发之道 Hadoop Summit 2013见闻:创业与Hadoop 2.0不可阻挡 Facebook的清洁能源改革——革命尚未成功,仍需努力 YARN或将成为Hadoop新发力点 主流编程语言属性一览(多图) 粉碎硬件复杂论:开发者不懂硬件运行的方式怎么可以?! 最新版Chrome OS加入Word和Excel编辑功能 直指微软 传诺基亚将购诺西全部股份,疑为出售手机业务做准备? 优秀技术领导者的修成之道 直接拿来用!最火前端开源项目(三) 第八届开源中国开源世界高峰论坛成功举办 曾经那些主流的API,而今风光已不再! Android 4.3本月9日亮相 新功能汇总 移动游戏的国际化运营技巧 Google的Janus与Facebook的McDipper:将闪存用于数据中心 拥抱开源还是坚守阵地:传统数据库供应商面临抉择 超棒的30款JS类库和工具 立场坚定:惠普仍然密谋回到智能手机市场 6月份浏览器份额:Chrome成市场份额增长最快浏览器 关于PHP的十大误解 你中了几个? 专访西电朱虎明:异构计算硬件架构呈现百花齐放 百家争鸣 Regular DLL中向导生成的winapp对象有什么用? 关于Install shield 的问题 一个高难度问题,特急! 从一个页的Button事件中如何获取在iframe中另一页中选种checkbox的值? 大家一起来帮帮我 我是个新手请教如何在98下安装和设置apache,尽是详细些,最好给介绍些资料 高手请教,有关类的链表指针 如何定义日期类型? 请教高手!如何执行带条件SQL语句? 大家一起来为c#加油阿 追女教训谈 如何用OUTLOOK作多用户使用???? 赐教 有谁知道ramdrive.sys在dos下的详细用法,敬请赐教,倍感感激!! 怎么用Delphi调用MySql(win) 关于frame的问题. 为什么显示不出来???? c#通过INTERNET远程访问数据库都有什么办法?(请高手指点) 有誰能把CDONTS.DLL(電子郵件)的源代碼貼出來嗎?有分送,THANK! 请教 NetColorWolf(NCW) pb7的工具条栏的文字字体! 为什么,我的子窗口调用另一个窗口时,总是新开一个被调用窗口,而且被调用窗口中的ADOTable的connected总是丢失。why 《Delphi淡手辑略 之 数据库篇》:数据安全删除(函数) 请教! 我用setfocus使一个控件聚焦,但我想隐藏光标,不想让它在界面上闪动,怎么办? 用delphi 编防火墙 有谁知道ramdrive.sys在dos下的详细用法,敬请赐教,倍感感激!! 关于Delphi线程构造函数: 简单问题 ADSL代理上网部分站点上不去解决一例. 消息中间件的功能?各位铜人帮忙! 如何改变对话框和窗体的背景色呢? 《Delphi淡手辑略 之 数据库篇》:打印DBGrid中的所有数据(过程) 有关Delphi指针的问题,请高手帮忙!!!!!!! 还是weblogic问题 麻烦帮我检查一下代码,实在想不通 请问大家我新买一台品牌机,再使用时经常死机是怎么回事? 哪里有介绍Active Directory 的中文资料? 怎样在ListView组件的详细显示模式下,让屏幕自动随输出数据滚屏和聚焦在输出的数据上面。 实现接口时出错,分数大大的有 《Delphi淡手辑略 之 数据库篇》:数据集解构成树(过程) 100分求教!!!文章“如何快速自动生成并定制报表”的问题!!! 一个农民上网的代价! 怎样将分割视图在一开始显示的时候就是确定的? Win2000server如何设置成路由器? 存储过程和函数得问题 转帖]!现在各大城市求爱对话写真 如何把XML+XSL的输出结果显示到一个指定的HTML元素里? 有些API中的参数开头是lpsz ,lpsa ....请问什么意思?相关的也说说好吗?谢谢 为何长语句分不了行 我用vs.net正式版开发的留言簿提供全部源码下载 公车上的性骚扰 请问哪里有比较好的关于 OpenGL 的网站或者是论坛啊?小弟的毕业设计课题是关于这个的!(NULL) 一个高难度的问题,特急! 能否解释下下列图这些音乐符号各代表什么意思.特别是房子里的1和2代表什么意思? UC是什么意思 做匀变速直线运动的物体位移随时间的变化规律为x=24t-1.5t^2(m)根据这一关系式可以知道,物体速度为零的时.为什么 围绕一句名言展开写的作文 600字 《听泥土说话》阅读答案课时达标上的 做匀变速直线运动的质点,它的位移时间变化的规律是s=(24t-1.5t*t)m,则质点的速度为零的时刻是 两小儿辩日原文 《听泥土说话》中的阅读答案,越快越好!(1)文中的他两次与泥土对话后分别有什么变化?(2)文中最后一段为什么要写那些和他一起同时发迹的伙伴“掉下来”的事?(3)读完短文后,结合 做匀减速直线运动的质点,它的位移随时间变化的规律是s=24t-1.5t2(m),当质点的速度为零,则t为多少答案是16s.可我算出来是8s. 急求《两小儿辩日》原文!要原文(古文) 《听泥土说话》的阅读答案 父母的教诲:500字作文教诲 两小儿辩日的原文 听泥土说话朗读指导从此,儿子处世如泥土般低调,性情如泥土般内敛,为人如泥土般虚心,对待成败得失亦如泥土般自然、平静和从容.请用着重号在上文中画出朗读重音,并说说理由. 物理致癌因子? 《两小儿辩日》原文和翻译 听泥土说话阅读题文中的“泥土”仅仅是指自然界的泥土吗?请谈谈你的理解阅读全文,仿照地⑧段,在地3段的横线上把句子补充完整请简要分析文中画线句“再把这泥土扔了,就等于扔掉了我 四个5,填三个符号,得2使用加减乘除,使等式成立. 两小儿辩日原文的格式 一物体的运动方程是s=5t+1.5t^2,则物体在时间段[0,1]内平均速度是多少?在1s时的瞬时速度是? 延安我把你追寻小学课文中的这篇课文中的精神指什么.是有三个问题 ,填空类型的.要简明点. 英语翻译如:1.鱼,我所欲也;熊掌,亦我所欲也.翻译:鱼,是我想得到的(东西);熊掌,也是我想得到的(东西).我要10个, 做匀变速直线运动的物体的位移与时间的关系为s=t^2+0.5t,则经过()s他的速度是3m/s 延安,我把你追寻,追寻什么 鱼我所欲也 中心论点到底是哪一句大神们帮帮忙 一质点作直线运动,其位移x(m)与时间t(s)有t(2-t)的关系此质点在头2s内的平均速度等于?第2s末速度 写爸爸的作文500字左右最好以别人托出爸爸的好.最好是最新的.只有1个钟头时间喔.好的话, 有个女生给我发短信带了这样一个符号;-P , 请问大家电气符号代表的意思PG1404 FICO1401 TICA1410 WI1401 LIA1401 FIAO1403 RE 还有一些长的:NG-1401o-40-M1E PA-1401-50-M2E-J 诗人为什么要追寻延安 爱的教育的读书笔记 ‘原文’我认为……300字共15篇 珍珠鸟 课文原文. 《延安,我把你追寻》中的问题2.延河枣园、南泥湾开荒的镢头、杨家岭、温热的土炕、顶天立地的脊梁各象征什么? 来篇以教育为话题的800字作文(高中作文) 鸟的天堂课文原文 《延安,我把你追寻》的问题.1.《延安,我把你追寻》主要写什么?2.《延安,我把你追寻》写到了哪几个地方?3.《延安,我把你追寻》是围绕延安精神写的.请你将这首诗分成三个部分,并概括每个 800字高中作文.《如何看待现代教育》从社会、学校、家庭,的方面去写.(议论文)! 鸟的天堂原文我是日本天皇殿下.我向你们表示感谢/王歧山副总理访问我们大日本帝国 《延安,我把你追寻中》的问题作者在第二节中,连用了四个“追寻你”.诗人为什么追寻延河、枣园、杨家岭和南泥湾呀?用具体的事例说说你的理解.第一个“你”代表_______________;第二个“ 《鱼我所欲也》中体现“性本善”思想的句子是 谁有老舍的《鸟的天堂》原文?我要语文书11册上的原文! 一个物体做匀变速直线运动已知位移方程为X=(5t-2t平方)m该物体运动的初速度为(?) 鱼我所欲也重点句子翻译 珍珠鸟原文, 某物体做匀速直线运动,其方位方程为x=(5t+2t方)m,则该物体的初速度为(),加速度为(),2s之内的位移大小为(),2s末的速度为() 急需人教版语文《说勤》原文 写出uc的缩写语或符号表示的含义 什么(填物理或化学)变化中伴随什么(填物理或化学)变化的发生? 原文是三余勤读 鱼我所欲也,背诵怎么办?五个小时后就要考默写,错一处一巴掌,还要罚写.昨天刚刚学,还没学完.求神人帮助支个招...谢拉! 下列各项中属于化学致癌因子的是( ) A电离辐射 B X射线 C紫外线 D 苯 勤礼碑原文 在matlab中,符号计算中结果出现了conj(),例如出现了,(E*bi*(conj(bi)/conj(A) + conj(bm)/conj(A)))/(30*A) + (3*E*bi*((2*conj(bi))/(3*conj(A)) + (2*conj(bm)),除了conj外,其他字母全部都是已定义的符号.那conj()是什 紫外线是致癌因子吗 书山有路勤为径,学海无涯苦作舟.的原文 鱼我所欲也 重点句子(背诵方面)明天要考试了,求本文在考卷上最经常考到的句子.越多越好【也不要把全文都复制下来 做匀减速直线运动的质点,它的位移随时间变化的规律是S=24t-1.5t的平方,当质点的速度=0,则t为多少?选项A.1.5s B.8s C.16s D.24s 请问还是找不到那些特殊符号, UC是什么意思?一直听说UC,UC是什么意思? 做匀减速运动的质点,它的位移随时间变化的规律是s=24t-1.5t²(m),当质点的速度为零时,则t为多少?
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘