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

如何给运行中生成节点的treeview控件加图标?????

编辑:说三道四文库 发布时间:2017-10-17 09:57
HTML文档下载 WORD文档下载 PDF文档下载
在运行中生成treeview的节点,然后个他们加上imagelist里面的图标,使用不相同的索引值。可是,当点击字节点的时候,图标会改变成父节点的图标,只是为什么?怎样才能使父节点和子节点有不同,且不改变的图标?
要看效果:http://www.comprg.com.cn/wz055.htm

Delphi环境下灵活的数据库树表实现 

 林琪

   我们目前正在开发的军队武器装备科技档案信息管理网络系统是面对全军的,管理全军武器装备科技档案的信息管理网络系统,由于全军在武器装备科技档案的管理模式上千变万化,对管理系统的需求也不相同,特别是,从调研的结果看:各单位的项目分类(信息分类)的级数是不定的,因此实现时一方面要考虑到通用性,另一方面也要保证用户使用的灵活性。

  

1 数据结构设计

在设计时可以采用两种数据存储方式(数据结构)。

1)信息分类表采用一个分类作为表的一条记录的方式进行存储,并由父类编号建立各类之间的关系,即:

分类号 
 类的含义 
 父类的编号 
 
0001 
 计算机 
   
 
0002 
 无线电 
   
 
… … 
 … … 
 … … 
 

2)这种分类表结构的建立不用动态生成表结构,但使用时相对麻烦。我们采用以下的表结构建立信息分类关系。这样的结构可以实现任意级的树型结构,如M层的一个结构:其中M是本单位的分类最大深度。类号要唯一识别每一个类。最上一级的分类号为全宗号+本级的分类代号,其他任意级的类其类号都为上一级的分类号+本级的分类代号。用户根据本单位档案的信息分类情况输入类信息,由系统动态创建表。

信息分类号
 全宗号
 类1含义
 类2含义
 类M含义
 分类深度
 
0001
 Zzb20
 电子
 计算机
   
 2
 
0002
 Zzb20
 电子
 无线电
   
 2
 
0003
 Zzb20
 通信
 卫星
   
   
 
0004
 Zzb20
 通信
 遥感
   
   
 
C4
 C6
 C20
 C20
 C20
 C1
 
XXFLH
 QZH
 L1
 L2
 LM
 FLSD
 

       在下面的例子中由于安全要求,对数据库表的结构作了简化,同时只使用了一些模拟数据以作说明。

  

2 树表外形设计

       由于Delphi提供的树表控件比较简单,外观不很美观,因此需要作一些“修饰”工作。为了强调重点,忽略了数据库操作如查询等,在例程中只使用了有关树表控件。

1)增加色彩

一般的树表控件没有底图,没有色彩,因此首先要解决色彩问题。解决的方法就是在树表控伯的ONDraw事件响应中增加底图显示代码。

procedure TForm1.Tree1CustomDraw(Sender: TCustomTreeView; const ARect: TRect; var DefaultDraw: Boolean);

begin

     with tree1.Canvas do                        //取树表控件的显示底板

     begin

     brush.color:=RGB(200,200,255);              //设置画笔颜色

     FillRect(ARect);                               //填充底板

 
  

     end; 

end;

这里仅为树表控件设置的底板颜色,实际上还可以设置底图,但由于底图的色彩不易控制,在调整树表结点时,容易出现颜色混乱的情况,而且只设置其颜色使树表控件的显示更加简洁。但只在ONDraw事件中设置颜色是不够的,还需要在其子项(结点)的显示事件中增加以下代码:

procedure TForm1.Tree1CustomDrawItem(Sender: TCustomTreeView;

  Node: TTreeNode; State: TCustomDrawState; var DefaultDraw: Boolean);

var

 Noderect:TRect;

begin

     with tree1.Canvas do

     begin

          case Node.Level of                  //根据不同的层次,设置不同的结点字体颜色

          0:   font.Color:=clBlue;

          …

          5:   font.Color:=clGreen;

          end;

      if node=tree1.Selected then       //为突出选中的结点,将选中结点字体颜色设置为红色

          font.Color:=clRed;

          NodeRect:=Node.DisplayRect(false);              //设置结点的显示方式

          brush.Color:=RGB(200,200,255);

          fillrect(NodeRect);                         //将结点的背景色与控件底板色设置为一致

     end;

end;

      

2)设置图标

       图像列表控件与树表控件可以算是“老搭档”,即为了显示不同层次的结点就需要为树表控件设置一个对应的图像列表,其设置方法比较简单,可以参见有关的Delphi程序设计手册。由于树结构层次不定,因此不能象常规的方法那样建立了树表与图像列表之间的关系即大功告成,这里还需要做的是建立树表结点与图像列表的关系,可以通过以下两个函数实现。

procedure TForm1.Tree1GetImageIndex(Sender: TObject; Node: TTreeNode);

begin

     node.ImageIndex:=node.Level;    //由结点的层次决定其对应图标在图像列表中的位置

end;

  

procedure TForm1.Tree1GetSelectedIndex(Sender: TObject; Node: TTreeNode);

begin

     node.SelectedIndex:=node.ImageIndex;

end;

  

3)  窗体激活事件响应

响应窗体激活事件时,需要作一些设置。由于在原系统中,此窗体涉及的功能和控件较多,许多功能的完成都需要激活另外的窗体。因此需要避免对数据库信息的重复设置。可以如下实现:

procedure TForm1.FormActivate(Sender: TObject);

var

 i:integer;

begin

 if first_in=false then            //区别是否首次激活,从而决定是否需要设置初始状态

 begin

  hint.Caption := '    提示: 正在准备,请稍候...';

  application.ProcessMessages ;

  tree1.Items.Clear;                    //设置第一个树表状态和颜色

  tree1.Color:=RGB(200,200,255);

  tree2.Items.Clear;                    //设置第一个树表状态和颜色

  tree2.Color:=RGB(100,200,255);

  qznode:=nil;                         //为了显示动态结构的分类层次,将各层树结点初始化为空

  for i:=0 to 5 do

   last_node[i]:=nil;

   stackdepth:=0;                       //设置栈初始深度为0

  show_tree1(0);          //调用show_tree1显示分类内容,参数0表示从第一层开始显示

  hint.Caption:='    提示: 数据成功调入';

  Application.ProcessMessages;

  end;

    first_in:=true;        

end;

  

4)  树表内容显示

由于树表结点层次的不确定,我们采用了递归显示的方法完成树表内容的显示。这里设置了4个变量,其含义为;

变量
 类型
 含义
 可选范围
 
cur_cds
 TQuery
 当前的查询集
 dbmd.qz,dbmd.fl1,dbmd.fl2,

dbmd.fl3,dbmd.fl4,dbmd.fl5
 
cur_str
 string
 当前的查询语句
   
 
num_str
 String
 当前的层次数查询语句
   
 
cur_level
 Integer
 当前层次
   
 
cur_node
 TTreeNode
 当前结点
   
 

这里利用栈确定父结点与子结点的关系,若某结点对应的分类深度比当前深度要大,就需要将此结点入栈,并惟此结点为父结点,以插入孩子结点方式递归地显示它的下一层结点,若当前层的结点都已显示完毕,就需要退栈,回到上一层次再作计算。主要的实现过程如下:

procedure TForm1.show_tree1(level:integer);

…                //变量声明

begin

  case level of              //根据输入参数,确定当前数据集、结点和查询语句

  0:

  begin

    cur_cds:=dbmd.qz;

    cur_node:=qznode;

    cur_str:='select distinct QZH from XXFLB ';

  end;

  1:

  begin

    cur_cds:=dbmd.fl1;

    cur_str:='select distinct L1 from XXFLB ';

    cur_str:=cur_str +' where  QZH= '+''''+dbmd.qz.Fields.Fields[0].value+'''';

  end;

  …

  end;

   cur_cds.close;                              //实现查询

   cur_cds.SQL.clear;

   cur_cds.SQL.Add(cur_str);

   cur_cds.open;

       for i:=1 to cur_cds.RecordCount do                     //遍历当前层的所有结点

          begin

            if level=0 then                             //若为第一层则调用add方法创建结点

               cur_node := tree1.Items.Add(cur_node,cur_cds.Fields.Fields[0].value)

            else                //否则,在上一结点基础上调用AddChild方法创建其子结点

      cur_node:=tree1.Items.AddChild(last_node[stackdepth-1],cur_cds.Fields.Fields[0].value);

          if level<5 then            //根据当前结点层次及结点内容确定当前类的分类深度

          begin

          case level of

          0:

          begin

          num_str:='select  FLSD from XXFLB ';

          num_str:=num_str +' where  QZH= '+''''+dbmd.qz.Fields.Fields[0].value+'''';

          end;

          1:

           …

          end;

          dbmd.sd.close;                               //执行深度查询

          dbmd.sd.SQL.Clear;

          dbmd.sd.sql.add(num_str);

          dbmd.sd.Open;

          val(dbmd.sd.Fields.Fields[0].value,cur_level,code); //取其深度

           if  cur_level>level then          //若当前层次未达到其分类深度

            begin

                      last_node[stackdepth]:=cur_node;     //当前结点入栈

                      stackdepth:=stackdepth+1;

                      show_tree1(level+1);                       //递归显示下一层次结点

             end;

           end;

           cur_cds.Next;          //取当前结果集中的下一条记录

           if i > cur_cds.RecordCount -1  then            //若当前层中全部记录显示完毕则退栈

                stackdepth:=stackdepth-1;

          end;

 
  

end; 

       另外第二个树表的内容显示的基本方法与此类似,所不同的是第二个树表的显示函数所带的参数为串型参数,该参数有两种可能,即为‘’或由点击第一个树表的事件产生串参数。若参数为空串,则要在第二个树表中显示所有项目,否则要根据参数创建过滤条件选择显示项目。具体方法可以参见源代码。

  

5)  树表调整

 
  

树表的调整即是对树表当前结点的条件,可以由两种事件产生,即树结点的扩展和点击树结点。由于一个全宗号下的分类种类很多,层次也可能很大,因此用户希望打开一个类时,与其无关的类就关闭,这样就可以保证仅有目前所选择的结点,而不需要用户利用滚动条在打开的结点中寻找。其实现要充分利用树结点的方法和属性。特别强调的是在对点击树表结点的响应事件中用到了结点的扩展方法,尽管对结点扩展事件的响应函数所实现的功能与之类似,但一定不能加入类似的结点扩展方法,如tree1.Selected.Expand(false)等,因为在扩展事件中调用扩展方法会导致事件循环,甚至死机。 

对第二个树表的调整与第一个树表的处理方式类似,但功能不同,这里不多介绍。

procedure TForm1.Tree1Click(Sender: TObject);

…                 //变量声明

begin

 if Tree1.Selected=nil then                  //若未选择结点,重置

 begin

   tree2.Items.Clear;

   tree2.Refresh;

   exit;

 end

 else

 begin

    tree2.Items.Clear;

    tree2.Refresh;

     str:=Tree1.Selected.Text;                   //取当前结点内容

     fatherNode:=Tree1.Selected.Parent;    //取当前结点父结点

     tempnode:=Tree1.Selected;                //设置当前结点

     while fatherNode<>nil do                  //由当前层开始关闭所有非当前结点,

//同时返回由其第一层祖先到当前结点所组成的串,作为第二个树表显示的参数。

      begin

           str:=fatherNode.Text+','+str;          //取父结点内容与当前结点内容联接

           usenode:=fatherNode.getFirstChild; //遍历父结点的所有儿子结点

           while usenode<>nil do

           begin

                if usenode<>tempnode then          //只要不是当前结点,则取消扩展状态

                   usenode.Collapse(true);

                usenode:=fatherNode.GetNextChild(usenode);

           end;

           tempnode:=fathernode;    //当前层结点处理完毕后,调整父结点为当前结点

           fathernode:=tempnode.Parent; //再取当前结点的父结点

      end;

      sibNode:=tree1.Items[0];          // 第一层结点的处理与其它层稍有差异

      while  sibNode<>nil do

      begin

        if  sibNode<>tempNode then

          sibNode.Collapse(true);

      sibNode:=sibNode.getNextSibling;

      end;

      tree1.Selected.Collapse(true);           //强制打开当前结点

      tree1.Selected.Expand(false);

      if tree1.Selected.HasChildren=false then   //若当前结点无孩子,

      begin

        show_tree2(str); //说明已构成一个完整的类,调用show_tree2函数实现第二个树表//的内容显示,参数str为完整的类名

        hint.Caption:='    提示: 数据成功调入';

        Application.ProcessMessages;

  end;

 end;

  

参考文献

1 徐新华,IDE和Object Pascal 语言,人民邮电出版社,1998.12 

2 郑城荣,曾凡奎等,Delphi 运行时间库RTL和组件库VCL技术参考,人民邮电出版社,1999.1 

1 徐新华,GUI编程技术,人民邮电出版社,1998.12
非常感谢!!!!
在你的treeview控件的Onchange事件中:
  if youttv.Selected<>nil then
    youttv.Selected.SelectedIndex:=youttv.Selected.ImageIndex;
即可保证图标不变。
treeview中的点有stateindex是选中后的图标值,你一定没改,所以是默认值,而你父图标可能也是默认值,所以一样了,你只要在生成子node 时同时设置imageindex和stateindex就可以了
开箱即用!Android四款系统架构工具 谁说Kinect只是玩物?微软研究院使用它实现口语手语实时翻译 新浪微博推出粉丝服务平台 引发两微PK大战 MDCC2013移动开发者大会最新日程发布 门票优惠最后1天 英特尔CEO:EUV光刻技术或助力芯片突破摩尔定律 从微软大数据日看到的,银行、交通、医疗实践之路 IDC:iPad市场份额遭Android平板蚕食 滑至29.6% [TUP第30期]直击移动应用开发难点 探讨跨平台最佳解决方案 用动态语言编写程序,命名更重要 命中率80%,磁盘I/O减半,Flashcache的发展史 这次它很低调:谷歌正式发布Android4.4和Nexus 5 iPhone 5S来了,iPhone 6还会远吗?概念机来袭 [开源推荐]PhysicsJS:基于JavaScript的强大的物理引擎 望虚窥实!专访Oculus Rift创始人Palmer Luckey 利益至上,开源也不免于此 开发者必备,超实用的PHP代码片段! 福利来了!AngularJS资源大集锦 移动周报:“360儿童卫士”手环的是与非 Ion Stoica和他的数据故事(上) 开发者必备:测试网站速度的五个免费在线工具 谷歌员工曝光在谷歌工作那些最糟糕的事情 MDCC 2013全民移动 玩转智能硬件展 如何降低白噪声对网站用户体验的影响? 谁才是真正的资深开发者? 东软董事长刘积仁阐述三大战略 构建以知识资产驱动的商业模式 一切皆为 JavaScript 黑莓:弃私有化任命华人为临时CEO 卖给联想的节奏? 谁说WP仍然不行?意大利WP份额已超iOS MDCC之移动娱乐游戏峰会:百家手游齐逐金玩奖 专访Mozilla宫力:基于Web是Firefox OS最大的资本 如何设计一款Java框架? 送分!!!参于者有分! 有谁用Jakarta Slide? ADSL下的NETMEETING 设计思路请问! 恢复 Sql Server 出现如下错误“因为数据库正在使用,所以未能获得对的排它控制权” 各位大虾请进 成星级用户了放分 水晶报表如何得到传SQL语句的数据源? 急!!求Oracle讲义与习题集 明天考~~心情郁闷!!!!散分!!! 如何改写DBCTRLgrid的背景色 诚恳地想问一个问题,可能对我的影响比较大。希望可以听听你们的意见!!!! 请解释这四行代码 一个小菜鸟的问题 这么配置,来者有分! 400分 求Win32 线程相关电子书 急,在线等待,怎么样用SQL函数获取image字段的长度并返回? 请教win2000 ad server版安装远程控制 请问哪里可以下载RIP,OSPF的源代码? 为什么在sql explorer里面可以执行的sql语句在delphi里面不可以执行呢 一个servlet调用另一个servlet编译问题 Jbuilder7注册文件哪有下载?谢谢 哪位有网上商场系统结构分析的文档!!(高分) 急用:怎么用控制台命令查看进程,并终止进程? 请问DELPHI编写使用SQL SERVER 2000的管理端用什么连接好点? 喜欢吉他的程序员来谈谈 用InstallShield如何安装COM+组件 帮我看看!先给100,答玩再给100 有谁能告诉我怎么使用索尼DSC-F717相机的“扩展”功能? 哪位有flash mx的汉化包?多谢了 MSSQL打开企业管理器后所有的数据都公开了,有没有办法能设立权限啊 出现了一个错误,搞不定哦help,在线 字符型变量如何转化为整型 为什么滚动条不工作? 请问 sqlserver2000中有可以把数据提出 , 输出到文本文件中的存储过程吗 那位大侠知道:如何返回webservice自身类的一个或多个实例? QuickReport是否可以套打?如何套打? 这段话看得太糊涂,请英语佳的大虾翻译一下 很诚恳的想问一个问题,可能对我的影响比较大。希望可以听听你们的意见!!!! 急急:谁能告诉我,tomcat4.1.18+sqlserver2000连接池如何配置、具体配置测试!我想把分全给他如果能的话 高分,简单问题.关于网格控件(在线等!) 触发器失败,是怎么回事啊?拜托。在线等待。。。 急需测试数据 关于连接的下载问题 在属性页中,各子页中类成员函数如何相互调用? 急!!!重载决策失败,原因是没有可访问的“Fill”可以用这些参数调用,怎么解决? 如何获取用户本地机的分辨率? 菜鸟的问题!!!在线等待! 请问一下印度做软件的报价~~~?? 急急~~ 求求求!!~~ 给满100分!! 关于WinRunner中遇到的难题,请高手帮忙! 请大家帮忙推荐几款linux下比较好用的看jpeg图和看mpeg4比较好用的软件! 如何计算速度变化量的 计算 佛教中所指的“四大皆空”是哪四大? 叙利亚人平常说英语吗最近认识一个叙利亚网友,用英语和他聊天,发现他的英文特别棒.我想知道叙利亚人日常都用英语交谈吗? 速度的改变量如何计算我知道速度该变量=末速度-初速度(MS是哈...)但是,这个公式怎么用啊?尤其是,曲线运动中,(例如:初速度是v,若速度的改变量也是v,则末速度是多少?方向如何之类的问 在彩色地图上,表示200米以下的陆地用什么颜色 植物组织培养中植物褐化的原因有哪些? 速率变化量怎么计算,说是一个物体本来以50km/h向南走的,遇到障碍物后以同样的速度向东走了.求速率的变化量是多少?我怎么也想不明白到底是怎么算的,请知道滴人帮我算一下, 陆地在地形图上是什么颜色?怎么和平原区分? 有什么药品试剂,可以防止植物组织培养过程中的褐化现象?在组培过程中,经常或多或少会出现一些褐化现象?有什么药品试剂,加入培养基后,可以防止或者减少这种褐化现象的发生呢? 是什么导致电动势产生?它的非静电力来自哪里? 镰刀形细胞贫血症携带者血液中红细胞有几种形态 有谁知道关于植物组织培养中褐化的防止方法? 非静电力怎么产生的? 人体为什么没有细胞壁? 信号与系统.已知系统函数H(s),幅频特性H(iw)的表达式怎么求?比如:H(s)如上式,是怎么得到H(jw)的表达式的? 灵敏度>3pg N/sec是什么意思,解释一下谢谢! 发生扩散现象的原因是气体分子不停地做无规则运动为什么错了 信号与系统中,求求y(n)=(1/2)^nξ(n)*δ(t-1) 英语翻译萨谬尔说过,人生如音乐,要用听觉、感情和本能谱成,不能只凭规律.我希望我的人生是一支吸纳来自上天的神圣能源的交响曲,将爱和激情的能量传送给别人,将自身的价值化成火炬熊 气体分子做无规则运动,可以扩散到整个容器的空间,这是因为(1)气体分子之间相互推斥(2)气体分子间的距离很大,分子间的作用力可以忽略 邓小平政治生涯的“三落三起”分别是什么这是邓论里的题 英语翻译能够原谅女人谎话的,才是男人!一定要对自己有信心谢谢了就是上面的几个草·是翻译成英文 热运动中分子撞击有什么公式?或者在布朗运动中有些什么公式? 知道年月日,怎么能算出天干地支 英语翻译那你整理出结果,你能否把结果提供给我一份? 牛顿运动定律 一个吊篮A中放着BC两个物块,吊篮用细线挂在天花板上,且C在B上方,两者用轻质弹簧相连,质量均为m,剪断细线的瞬间,求A的加速度和B对A的压力.PS听说貌似是用A和B的加速度相同做 中国与美国的教育体系各有什么优势? 一焦点坐标为(-3.0),一顶点为(0.5),求椭圆的标准方程 连接体问题(不涉及牛顿定律)如图,一固定斜面上两个质量相同的小物块A和B紧挨着匀速下滑,A与B的接触面光滑.已知A与斜面之间的动摩擦因数是B与斜面之间动摩擦因数的2倍,斜面倾角为α,B 是由于弹性形变产生拉力压力推力等,还是由于拉力压力推力等产生了弹性形变?为何拉力压力推力等属于弹力的一种?作用于同一直线上但方向相反的两力(即合力)与作用力反作用力的区别 关于力的一道填空题!一天,发生了两车相撞的交通事故.—个交警前来处理,说:“我一定要找出是哪辆车先撞上另一辆车的.”请你从科学的角度分析,这个交警能否找出那辆车?答:__ _____,这是 设某工厂生产甲乙两种产品,生产甲产品需要A、B、C三种原料的量分别为8、5、4,可获利润为9.生产乙产品需要A、B、C三种原料的量分别为6、5、9,可获利润为12.现在工厂中A、B、C三种原料的量 以接近光速运动的物体,停下来的时候,质量还是原来的质量m0吗, 一道关于力的填空题用力按气球,气球被压扁,这说明了____________________;手压球时,手也受到气球的压力,这可说明___________________________. 已知等边三角形ABC中,A(-3,0)、B(3,0),求以A、B为焦点,C为一个顶点的椭圆的标准方程 尼尔雌醇片的用法50岁经常患了阴道炎 特别是经常患霉菌性阴道炎 医生建议我补充激素 我想问下能否直接将尼尔雌醇片塞入阴道 多长时间塞一次 塞用多长时间 还是服用好 效果是一样的吗 力的概念填空题(简单)判断弹力是否存在,通常可以 ____________来分析 蒸汽为什么能推动物体 帮我写下吧,化学离子方程式:Mg(OH)2+H2SO4 (初中)力的一道填空题跳水运动员对跳板施力的同时,也受到跳板对他的作用力,但这两个力的作用效果却不同,前者主要改变了跳板_,后者主要改变恶劣运动员的_. 蒸汽机的施力物体是蒸汽还是地面 集合问题中出现;属于,交集,并集,补集,多个符号该按什么顺序做?a属于A交B并C在D中的补集 怎么用波动说解释光沿直线传播? 英语翻译爪机党查东西很不方便啊……拜托了…… 尼尔雌醇片的作用是什么?3Q 某工厂用甲乙两种原料,生产M,N两种产品,甲乙两种原料是分别用A,B,C三种物质A,B,C三种物质按一定的配方制成的,甲原料的配方A:B=1:4,乙原料的配方A:B:C=2:3:5.现有ABC三种物质共505kg,其中B物质258kg 佛说“四大皆空”请问是哪四大? 1/2m-2(m-1/3n^2)-(3/2m-1/3n^2)其中M=1/3 N=-1先化简 再求值1/2m-2(m-1/3n^2)-(3/2m-1/3n^2)其中M=1/3 N=-1 某工厂用甲乙两种原料生产 喜欢格兰芬多,的英语怎么说喜欢格兰芬多,这句话用英语怎么说? 如果m+n=-2m-3n,则m:n= 几道选择和填空题1.一直a+b=5,ab=3,则a分之一+b分之一=?2.若x分之一+x=3,则(x4+x2+1)分之x2=?3.一直a平方+b平方=6ab,且a大于b大于0,则a-b分之a+b的值为()A 根号2 B正负根号2 C2 D正负2 格兰芬多万事通 用英语怎么说要求是原著中的说法 【很嘎】 哪里的话? 氧气的密度比空气大,我们可以用向上排空气法收集,能否保存在敞口的集气瓶中?为什么? 哈利波特电影里面的“格兰芬多加20分”用英语怎么说? SolidWorks怎样讲一个草图分解成两个草图例如:将草图1分解为草图1和草图2 几道化学选择填空题.下列叙述正确的是( )A.若是两种微粒的核外电子数相同,这两种为例一定是同种元素B.若两种微粒的质子数相同,这两种微粒一定是同种元素C.若两种微粒只含有一种元素 我会为你建造霍格沃茨用英语怎么说 一只读数为37.2摄氏度的温度计,不经甩过,先后顺次测量a,b,c,d四人的体温,若他们的真实体温分别为35.5℃,37.5℃,38℃,37.5℃.经测量,体温计的读数分别是( )( )( )( )thanks!quick 日媒:两艘中国海警船驶入钓鱼岛附近毗第十一届夏威夷“中国风情节”开幕浙江部分行政区划调整 绍兴县上虞市撤宁波住博会市民看房重开发商 遗憾大牌通讯:历史遗迹记录昔日辉煌――泰国旧英国铜像常被挂内裤乳罩 政府被迫将其英国铜像常被挂内裤乳罩 政府被迫将其通讯:历史遗迹记录昔日辉煌――泰国旧亲善合作 睦邻友好——国内外人士积极马来西亚举办“小状元汉语经典诵读大赛巴基斯坦塔利班头目死于美无人机空袭 英国一医院医疗过失误诊流产 恐致死逾第五届中国木质玩具文化节在浙江云和开为阻法院强制执行 浙江金华一老人扬言浙江金华一智障儿命悬半空 特勤消防空宁波银行发力托管业务 首只公募基金开浙江云和经贸合作洽谈签约引资50多亿把美式“监听帝国”关入“笼子”杭城周末马拉松大派对 关键词:超越、美国无人机再次出手清除巴塔首领 和谈巴基斯坦塔利班头目死于美无人机空袭 安徽省第47个世界地球日活动周开启六旬独居老人发帖求助 只想找个姐妹一女子雨夜遭怪异男子尾随 二尺秀发被强停车不当起纠纷 小区保安、业主互殴学校欠数百万工程款11年 教体局:最男子上班途中摔伤昏迷三个月 公司称当老人被阀门盖绊倒致粉碎性骨折 产权单新车试驾出车祸 人伤了车破了学期已过半课本还没发 校方解释:怕学花几十万元投资\"连体钞\" 回购日合肥二环路部分路段景观综合整治合肥力争明年年底前消除黑臭水体马鞍山路今天放行交通 地基沉降原因是胡梅尔斯换格策?看德媒如何分析2016年 中国的众筹行业将何去何从曼奇尼、纳因戈兰将去英超?加利亚尼:巴洛特利感动了我佩斯卡拉:尤文领先锋将争夺乌迪内斯:利物浦有意杰林斯基虽然知道他很糗,但我已经笑成狗~精曜科技创业七年有成,宣布再度获得国
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘