fangbao 发表于 2008-8-6 09:57:46

18B20温度采集+上位机实时曲线,附源程序

程序还在加紧完善
晚上再打包传上来

小弟最近在东莞做项目,比较空闲,
昨晚做了一个温度采集程序,在大家面前献丑了,
希望能与大家交流,想结交各界玩单片机的朋友,
需要完整源程序项目文件和上位机程序(delphi7)的朋友请留下邮箱。

下位机用IAR开发环境,上位机用DELPHI7开发
http://cache.amobbs.com/bbs_upload782111/files_10/ourdev_369993.jpg
DS18B20的外观和脚位 (原文件名:DS18B20.jpg)

http://cache.amobbs.com/bbs_upload782111/files_10/ourdev_369994.PNG
用串口调试软件接受数据 (原文件名:111.PNG)

http://cache.amobbs.com/bbs_upload782111/files_10/ourdev_370515.PNG
(原文件名:烟头+冰块的温度曲线.PNG)

http://cache.amobbs.com/bbs_upload782111/files_10/ourdev_370516.PNG
(原文件名:全部文件.PNG)

http://cache.amobbs.com/bbs_upload782111/files_10/ourdev_370517.PNG
(原文件名:上位机软件用到的控件.PNG)

http://cache.amobbs.com/bbs_upload782111/files_10/ourdev_370518.PNG
(原文件名:上位机软件源程序.PNG)

这是我收藏的DELPHI资料-其中一部分电子书,如果有人需要的话就回一下帖子,我再一个个传上来
http://cache.amobbs.com/bbs_upload782111/files_10/ourdev_370533.PNG
(原文件名:我收藏的DELPHI资料-其中一部分电子书.PNG)


上位机部分源程序:
unit Unit1;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, CPort, ExtCtrls, RzBorder, StrUtils, StdCtrls, RzLabel,
iComponent, iVCLComponent, iCustomComponent, iPlotComponent, iPlot,
RzButton, iPlotChannel, RzPanel, Mask, RzEdit;

type
TForm1 = class(TForm)
    iPlot1: TiPlot;
    RzPanel1: TRzPanel;
    RzLEDDisplay1: TRzLEDDisplay;
    RzLabel1: TRzLabel;
    RzLabel2: TRzLabel;
    RzPanel2: TRzPanel;
    RzLabel3: TRzLabel;
    ComPort1: TComPort;
    procedure ComPort1RxFlag(Sender: TObject);
    procedure iplot_init();
    procedure FormCreate(Sender: TObject);
    procedure COMM_init();
    procedure FormClose(Sender: TObject; var Action: TCloseAction);

private
    { Private declarations }
public
    { Public declarations }
end;

var
Form1: TForm1;
px:word;
implementation

{$R *.dfm}
//****************************************************************************
//---窗体创建过程---
//****************************************************************************
procedure TForm1.FormCreate(Sender: TObject);
begin
COMM_init();   // 串口控件的初始化
iplot_init();// 曲线图的初始化
end;
//****************************************************************************
//---串口接收到标志字节产生中断---
//****************************************************************************
procedure TForm1.ComPort1RxFlag(Sender: TObject);
var
str:string;
begin
// 以字符串的形式从串口读取数据
ComPort1.ReadStr(str,33);
// 去掉数据帧的头和尾直接显示
RzLEDDisplay1.Caption:='+'+MidStr(str,2,5);
// 在曲线图上绘一个点
iPlot1.Channel.AddXY(px,StrToFloat(RzLEDDisplay1.Caption));
iPlot1.Channel.AddXY(px,0); // 跟随绘制0刻度线
iPlot1.Channel.AddXY(px,iPlot1.Channel.GetYMax);
iPlot1.Channel.AddXY(px,iPlot1.Channel.GetYMin);
px:=px+1;
end;
//****************************************************************************
//---初始化曲线图---
//****************************************************************************
procedure TForm1.iplot_init();
begin
iPlot1.RemoveAllChannels;            // 移除所有通道
iPlot1.RemoveAllXAxes;               // 移除所有X轴
iPlot1.TitleText:='实时温度曲线';    // 设置曲线图的标题
//iPlot1.TitleVisible := False;      // 不显示曲线图标题
iPlot1.YAxis.Span := 100;         // 设置Y轴的显示范围
iPlot1.YAxis.Min:=-15;            // 设置Y轴的起始值
iPlot1.YAxis.Title:='温度值(℃)'; // Y轴名称
iPlot1.YAxis.TitleShow:=True;
//---配置温度曲线---------------------------------------------------
iPlot1.AddChannel;                      // 添加一个曲线
iPlot1.Channel.TitleText := '温度';// 设置曲线的名称
iPlot1.Channel.Color := clRed;       // 设置曲线的颜色
      // 曲线插值,加上下面这一句显示的曲线不会有棱角
iPlot1.Channel.InterpolationStyle := ipistCubicSpline;
iPlot1.Channel.TraceLineWidth := 2;// 曲线显示的宽度
iPlot1.AddXAxis;                        // 添加一个X轴
iPlot1.XAxis.Title:='采样时间(S)';   // X轴名称
iPlot1.XAxis.TitleShow:=True;
iPlot1.XAxis.Span := 200;            // X轴显示范围
iPlot1.Channel.XAxisName := iPlot1.XAxis.Name;
iPlot1.XAxis.LabelsFont.Color := clRed;   // 标签字体颜色
//---配置0刻度线---------------------------------------------------
iPlot1.AddChannel;                           // 添加一个曲线
iPlot1.Channel.TitleText := '0刻度';      // 设置曲线的名称
iPlot1.Channel.Color := clYellow;         // 设置曲线的颜色
iPlot1.Channel.TraceLineWidth := 2;       // 曲线显示的宽度
iPlot1.Channel.XAxisName := iPlot1.XAxis.Name;
//---配置峰值跟踪显示线---------------------------------------------------
iPlot1.AddChannel;                           // 添加一个曲线
iPlot1.Channel.TitleText := '峰值跟踪';   // 设置曲线的名称
iPlot1.Channel.Color := clBlue;         // 设置曲线的颜色
iPlot1.Channel.TraceLineWidth := 2;       // 曲线显示的宽度
iPlot1.Channel.XAxisName := iPlot1.XAxis.Name;
//---配置谷值跟踪显示线---------------------------------------------------
iPlot1.AddChannel;                           // 添加一个曲线
iPlot1.Channel.TitleText := '谷值跟踪';   // 设置曲线的名称
iPlot1.Channel.Color := clLime;         // 设置曲线的颜色
iPlot1.Channel.TraceLineWidth := 2;       // 曲线显示的宽度
iPlot1.Channel.XAxisName := iPlot1.XAxis.Name;

end;
//****************************************************************************
//---初始化串口控件,有了这个子过程,就不需要在框框里该属性了,方便阅读---
//****************************************************************************
procedure TForm1.COMM_init();
begin
ComPort1.Port:='COM5';      // 串口号,我的是USB转出来的
Comport1.BaudRate:=br9600;    // 波特率
ComPort1.EventChar:=Char(10); // 设置事件字符
//我的单片机是用串口供电的,所有要以下两句
ComPort1.FlowControl.ControlDTR:=dtrEnable;// 打开DTR
ComPort1.FlowControl.ControlRTS:=rtsEnable;// 打开RTS
ComPort1.Open;// 打开串口
end;
//****************************************************************************
//---窗体关闭过程---
//****************************************************************************
procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
ComPort1.Close;// 关闭串口
end;

end.



下位机部分程序:
#include <iom32.h>
#include "DEFINE.H"

#define CLR_DIR_1WIREDDRD_DDD3=0      // 设置总线为输出口
#define SET_DIR_1WIREDDRD_DDD3=1      // 设置总线为输入口
#define CLR_OP_1WIRE   PORTD_PORTD3=0   // 总线清0
#define SET_OP_1WIRE   PORTD_PORTD3=1   // 总线置1   
#define CHECK_IP_1WIRE (PIND_PIND3)   // 检测总线状态

extern void init_devices(void);

void init_18b20();
void write_18b20(u8 x);
u8 read_18b20();
void gettemp();

u16 ms_count;
u8 wmh,wml;
u32 WenDu;


void main( void )
{
    init_devices();
   
    while(1)
    {
      if (ms_count==1000)
      {
            ms_count=0;
            gettemp();
            UDR=WenDu/10000+48;      // 百位
            while (!UCSRA_UDRE){;}   // 等待发送器就绪
            UDR=(WenDu%10000)/1000+48; // 十位
            while (!UCSRA_UDRE){;}   // 等待发送器就绪
            UDR=WenDu%1000/100+48;   // 个位
            while (!UCSRA_UDRE){;}// 等待发送器就绪
            UDR=46;   // 个位
            while (!UCSRA_UDRE){;}// 等待发送器就绪
            UDR=WenDu%100/10+48;   // 个位
            while (!UCSRA_UDRE){;}// 等待发送器就绪
            UDR=WenDu%10+48;   // 个位
            while (!UCSRA_UDRE){;}// 等待发送器就绪
            UDR=0X0a;
            //
      }
      
      
    }
}
//************************************************************************
//===初始化18B20===
//************************************************************************
void init_18b20()
{
    SET_DIR_1WIRE;   // 设置总线为输出
    SET_OP_1WIRE;   
    CLR_OP_1WIRE;
    Delay_us(250);   
    Delay_us(250);   // 等待500us
   
    SET_OP_1WIRE;
    CLR_DIR_1WIRE;
    Delay_us(20);      // 15~60us
    while(CHECK_IP_1WIRE);
    SET_DIR_1WIRE;
    SET_OP_1WIRE;
    Delay_us(140);   // 60~240us
}
//************************************************************************
//===写入一个字节到18B20===
//************************************************************************
void write_18b20(u8 x)
{   
    u8 m;
    for(m=0;m<8;m++)
    {
       CLR_OP_1WIRE;
       if(x&(1<<m))    // 先写低位数据
       SET_OP_1WIRE;
       else
       {CLR_OP_1WIRE;}
       Delay_us(40);   // 15~60us
       SET_OP_1WIRE;
    }
   SET_OP_1WIRE;
}
//************************************************************************
//===从18B20读取一个字节===
//************************************************************************
u8 read_18b20()
{      
    u8 temp,k,n;
    temp=0;
    for(n=0;n<8;n++)
    {
      CLR_OP_1WIRE;
      SET_OP_1WIRE;
      CLR_DIR_1WIRE;
      k=(CHECK_IP_1WIRE);    // 从低位开始读数据
      if(k)
            temp|=(1<<n);
      else
            temp&=~(1<<n);
      Delay_us(50);          // 60~120us      
      SET_DIR_1WIRE;
   }
   return (temp);
}   
//************************************************************************
//===读取温度值===
//************************************************************************
void gettemp()                   //读取温度值
{
    u8 tem_h,tem_l;//,wm0,wm1,wm2,wm3;
   
    init_18b20();      // 复位18b20
    write_18b20(0xcc);   // 跳过ROM命令
    write_18b20(0x44);   // 启动温度转换
    //__delay_cycles(6400000);
    Delay_ms(200);       // 不延时也好使,不知道怎么回事!
    Delay_ms(200);       // 不延时也好使,不知道怎么回事!
    Delay_ms(200);       // 不延时也好使,不知道怎么回事!
    Delay_ms(200);       // 不延时也好使,不知道怎么回事!
   
    init_18b20();
    write_18b20(0xcc);   // 发送跳过ROM命令
    write_18b20(0xbe);   // 发送读数据命令
    tem_l=read_18b20();   // 读温度低字节
    tem_h=read_18b20();   // 读温度高字节

    WenDu=tem_h;
    WenDu<<=8;
    WenDu+=tem_l;
    WenDu=6.25*WenDu;
}   


本人擅长做上位机+下位机的系统,有需要的朋友请与我联系。

soulmate 发表于 2008-8-6 09:59:22

怎麽没有上位机的源码?我的email:aosun0619@163.com 谢谢~

knight_avr 发表于 2008-8-6 10:15:12

下位机那个实时曲线 控件 怎么做的
有现成的控件吗?
能否把源代码发给我 谢谢!!! ttwww2001@163.com

fangbao 发表于 2008-8-6 10:23:11

上位机实时曲线控件用的是IOCOMP的iplot控件
我一直在用它,是曲线图控件中功能最强的
我这里有VB版OCX控件的和DELPHI的控件源码
http://cache.amobbs.com/bbs_upload782111/files_10/ourdev_370042.PNG
这是我最近做的一个项目 (原文件名:面面.PNG)

这是我最近做的一个项目,也是用的这个控件
控件文件比较大,请需要的朋友留下邮箱

fangbao 发表于 2008-8-6 10:32:10

knight_avr朋友:
您要的控件VB版的和DELPHI版的已经发到您的邮箱,请查收;
希望能多多交流,多多指教;谢谢!

admvip 发表于 2008-8-6 10:37:03

我也想要IOCOMP控件,hu1216@sina.com,谢谢!

zxq6 发表于 2008-8-6 10:39:12

希望楼主给我一份
zxq6@qq.com

fangbao 发表于 2008-8-6 10:40:49

soulmate朋友:
    感谢您回复我的帖子,
    由于是无聊时随便做的,所以还不够完善,不敢拿出来献丑,
    但我还是发到了你的邮箱,还请多多指教,
    谢谢

另外:有需要的朋友可以加我的QQ
       229398051
      我可以直接传给你们。

fangbao 发表于 2008-8-6 10:49:33

zxq6 小马哈 朋友
    感谢您回复我的帖子,
    由于是无聊时随便做的,所以还不够完善,不敢拿出来献丑,
    但我还是发到了你的邮箱,还请多多指教,
    谢谢

fangbao 发表于 2008-8-6 10:53:36

admvip朋友:您好
   感谢您在论坛回复我的帖子,
   曲线图控件已经发到您的邮箱,请查收,有VB和DELPHI版本的;
   希望以后有机会能多多交流;
   我的QQ:229398051。

eagle1979 发表于 2008-8-6 11:06:07

我正在学习delphi,希望楼主能给我传一份,谢谢!eagle_1979@126.com

fangbao 发表于 2008-8-6 11:09:00

eagle1979 朋友:您好
   感谢您在论坛回复我的帖子,
   曲线图控件已经发到您的邮箱,请查收,有VB和DELPHI版本的;
   希望以后有机会能多多交流;
   我的QQ:229398051

jackiezeng 发表于 2008-8-6 11:25:00

楼主把程序发到网上来吧 , 留邮箱,你也麻烦,我们也麻烦~!

_yuming 发表于 2008-8-6 11:25:26

希望楼主给我一份
yjwpm@126.com

顺便把控件也发给我可以吗?

soulmate 发表于 2008-8-6 11:25:27

谢谢~邮件收到,不过没有控件~能不能再给我发个delphi里面用的控件~

ch2003_23 发表于 2008-8-6 11:28:43

不错
记号

fangbao 发表于 2008-8-6 11:32:05

小弟从2000年开始学单片机,
那时我是《电子报》的爱好者,每期都是跑到镇上去买,
那时是从玩51入门的,从电子报买了51开发办,花去我半个月工资(450/2)
因为单片机开发要用到电脑,所以自己用三个月工资买了一台二手电脑(450*3=1450元),
后来准备跳槽的时候,领导给我一个上位机+下位机的检测设备做,要我不要走,此次开始学习上位机编程,
最开始用VB6,
2003年开始用DELPHI7,已经收集了相当的的控件;
单片机有过很多种,51,AVR,PIC,MSP430...最近在学习STM32和LM3S的32位ARM单片机,
我这里相关的开发工具已经收集的比较全了;
做过很多上位机+下位机的项目,主要是检测设备类的。

最近比较空闲,希望借阿莫的宝地广交朋友

fangbao 发表于 2008-8-6 11:36:44

再发几个图片和Demo

http://cache.amobbs.com/bbs_upload782111/files_10/ourdev_370134.PNG
(原文件名:111.PNG)

http://cache.amobbs.com/bbs_upload782111/files_10/ourdev_370135.PNG
(原文件名:222.PNG)

http://cache.amobbs.com/bbs_upload782111/files_10/ourdev_370136.PNG
(原文件名:333.PNG)

http://cache.amobbs.com/bbs_upload782111/files_10/ourdev_370137.PNG
(原文件名:Demo1.PNG)

点击此处下载 ourdev_370138.zip(文件大小:517K) (原文件名:iExample0042a.zip)
点击此处下载 ourdev_370139.zip(文件大小:959K) (原文件名:Iocomp Plot Pack Demo.zip)

fangbao 发表于 2008-8-6 11:39:09

soulmate 朋友:您好
   感谢您在论坛回复我的帖子,这给我莫大的支持和鼓舞,
   曲线图控件已经发到你的邮箱,有VB和DELPHI版本的;
   希望以后有机会能多多交流;
   我的QQ:229398051。
                                                          伍奇
                                                          20080806

fangbao 发表于 2008-8-6 11:42:28

感谢个位的支持和鼓励
请各位稍后
我这里好再全数奉上

holycat 发表于 2008-8-6 12:13:07

不错,做个记号!

marker 发表于 2008-8-6 12:18:25

好,正想做曲线呢,我用的是C++

BT.ROBOT 发表于 2008-8-6 12:55:53

下载,留着学习用,谢谢楼主,

abcdezh 发表于 2008-8-6 12:57:38

谢谢,学习了
希望楼主给我一份;
804515602@qq.com

fangbao 发表于 2008-8-6 13:53:10

IOCOMP iplot曲线图控件
在VB6.0中用OCX版的,
在DELPHI和C++ Builder中带源码的控件

chuchu3030 发表于 2008-8-6 15:15:35

楼主能否给我发一份??谢谢609051974@qq.com

fangbao 发表于 2008-8-6 15:26:47

感谢个位支持
程序正在整理增强当中
http://cache.amobbs.com/bbs_upload782111/files_10/ourdev_370433.PNG
(原文件名:用打火机烧了一下.PNG)

chuchu3030 发表于 2008-8-6 15:29:51

谢谢楼主,做好后,能否打包发一个给我呢,谢谢,我是25楼的

wuwu20 发表于 2008-8-6 15:33:40

很好

knight_avr 发表于 2008-8-6 15:34:24

控件已经收到
非常感谢LZ
在此我也上传一份我自己写的的曲线控件 自己用用还可以 方便大家一起交流
控件ourdev_370453.rar(文件大小:223K) (原文件名:TCurve.rar)
http://cache.amobbs.com/bbs_upload782111/files_10/ourdev_370454.jpg
图片 (原文件名:333.jpg)

luavr 发表于 2008-8-6 15:43:55

谢谢楼主,能否打包发一个给我呢 wcq99@126.com

fangbao 发表于 2008-8-6 16:00:17

上位机曲线图做了加强
现在把一瓶纯净水放冰箱里降一下温
等下把图片发上来

huanxian 发表于 2008-8-6 16:06:14

建议发上来,大家都能看.

Feeling_MCU 发表于 2008-8-6 16:25:19

C++builder有没有好的曲线控件啊? 推荐一个

fangbao 发表于 2008-8-6 16:28:01

回33楼:
IOCOMP的iplot曲线图控件是有源码的
可以在C++builder中使用啊

fangbao 发表于 2008-8-6 16:30:09

33楼的兄弟:
    刚才没注意,你是不是在寮步啊?
    我最近在寮步做一个项目,有机会见面交流下啊

qdvenus 发表于 2008-8-6 16:34:02

建议到delphibox网上去看一下,多的是

fangbao 发表于 2008-8-6 16:38:53

www.2ccc.com
www.51delphi.com
www.delphifans.com
几个很好的DELPHI/C++ BUILDER资源站
我的资料大部分来源于此

jackiezeng 发表于 2008-8-6 17:00:57

楼主,把控件也传上来啊,

schminj 发表于 2008-8-6 17:24:27

不错啊,我正想学DELPHI,楼住可否将你收集的DELPHI资料和IOCOMP iplot曲线图控件传给我schminj@163.com谢谢了

banyan_city 发表于 2008-8-6 17:30:59

我正在学习delphi,希望楼主能给我传一份,谢谢!zigaohunan@163.com

fangbao 发表于 2008-8-6 17:32:48

先传一个串口控件

点击此处下载 ourdev_370640.zip(文件大小:202K) (原文件名:cport-3.10(串口控件).zip)

minicatcatcn 发表于 2008-8-6 18:02:43

谢谢了,我正在学DELPHI,但还没有学到串口,先做个记号。

kalo 发表于 2008-8-6 19:47:53

怎么都应该给裤子穿了

fangbao 发表于 2008-8-6 19:52:10

想共享自己一直在用的DELPHI的电子书和控件
但这里网络不好,就是传不上来

http://www.ouravr.com/bbs/bbs_content.jsp?bbs_sn=1382004&bbs_page_no=1&bbs_id=9999

349242603 发表于 2008-8-7 08:47:14

支持,加油

yaoliangwu 发表于 2008-8-7 12:06:16

楼主把IOCOMP的iplot曲线图控件也发一份给我吧,谢谢!
yaoliangwu@163.com

YEARN87 发表于 2008-8-7 16:28:23

强!值得学习
楼主IOCOMP的iplot曲线图控件找死我了也能给我一份吗?现谢谢了!
zhanglong87080@163.com

xusp 发表于 2008-8-7 17:38:18

需要完整源程序项目文件和上位机程序(delphi7)的朋友请留下邮箱

xushuiping@yeah.net

谢谢!

rqiang 发表于 2008-8-7 17:57:05

不错,不错!

rqiang 发表于 2008-8-7 17:59:08

看到楼主也有用到串口大师,能不能看看串口监视和过滤功能能用不?
具体问题:
http://www.ourdev.cn/bbs/bbs_content.jsp?bbs_sn=1375446&bbs_page_no=1&search_mode=3&search_text=RQIANG&bbs_id=9999
谢了

fangbao 发表于 2008-8-7 21:45:31

回50楼:
    串口监视软件我用的这个
点击此处下载 ourdev_371854.zip(文件大小:565K) (原文件名:SUDT SerialTrace 2.2.exe.zip)

fangbao 发表于 2008-8-7 21:49:36

补一张图,我用的串口监视软件
建议不要长时间使用,比较占系统资源

http://cache.amobbs.com/bbs_upload782111/files_10/ourdev_371855.PNG
(原文件名:串口监视软件.PNG)

fangbao 发表于 2008-8-7 21:59:25

总算传上来了

点击此处下载 ourdev_371858.zip(文件大小:2.37M) (原文件名:iocomps v3.0.4 SP2 R1(曲线图控件).zip)

fangbao 发表于 2008-8-7 22:01:09

delphi版的上位机软件,供大家参考

点击此处下载 ourdev_371859.rar(文件大小:464K) (原文件名:PC_SOFT.rar)

jevenhuang 发表于 2008-8-7 23:05:17

学习学习 交流一下 我加你Q

mmkk 发表于 2008-8-7 23:06:20

楼主,把资料开源一下,小弟感激不尽。

fangbao 发表于 2008-8-7 23:42:29

资料在这里

http://www.ouravr.com/bbs/bbs_content.jsp?bbs_sn=1382791&bbs_page_no=1&search_mode=3&search_text=fangbao&bbs_id=9999

koon 发表于 2008-8-8 01:57:10

先做个记号.

yhyf_heart 发表于 2008-8-8 08:02:31

好贴!记号。

rqiang 发表于 2008-8-8 09:30:50

【51楼】 fangbao 伍奇
多谢了,

eagle1979 发表于 2008-8-8 14:29:04

阿莫怎么不加酷呀,现在上位机的板块太冷清了,倒是水潭太热闹了,建议阿莫也聘一两位上位机软件版主,
解答我们初学者的提问?不是要做成综合性的网站吗?

enci 发表于 2008-8-8 14:33:31

markup!

fangbao 发表于 2008-8-8 15:04:49

http://cache.amobbs.com/bbs_upload782111/files_10/ourdev_372447.jpg
(原文件名:按钮试验.jpg)

http://cache.amobbs.com/bbs_upload782111/files_10/ourdev_372448.PNG
(原文件名:按钮试验上位机监控界面.PNG)

三路电量参数监控,8路温度监控,6路触点计数,8个串口通讯,122个继电器控制

shabby 发表于 2008-8-8 15:10:39

楼主好强啊,向你学习~

arale 发表于 2008-8-8 17:01:54

很牛牛!赞扬得不行了

fangbao 发表于 2008-8-8 17:30:39

http://cache.amobbs.com/bbs_upload782111/files_10/ourdev_372555.jpg
(原文件名:gfci全自动检测.jpg)

http://cache.amobbs.com/bbs_upload782111/files_10/ourdev_372556.GIF
(原文件名:gfci.GIF)

四路步进电机,12路气缸,80路继电器,4路开关量计时采集
数据库,统计,报表
自动上料,自动检测,自动分选

rqiang 发表于 2008-8-8 18:29:08

好牛,都是LZ做的吗?
阿莫,裤子呢!

lningbd 发表于 2008-8-8 22:13:08

请问那些曲线控件iocomps v3.0.4 SP2 R1(曲线图控件)是破解的吗?原来我试过试用版的,总出现他的网页链接。
向你学习!

lningbd 发表于 2008-8-8 22:17:32

能否赐予曲线控件iplot控件 ,谢谢。lningbd@yahoo.com.cn

huanxian 发表于 2008-8-8 22:59:18

这个贴收藏了。
希望楼主给我一份 ouravr_user@163.com

fangbao 发表于 2008-8-9 22:03:25

【70楼】 huanxian

【69楼】 lningbd

曲线控件iplot已发到你们的邮箱,请查收,有什么问题再找我。

lningbd 发表于 2008-8-12 00:37:06

多谢!我们的老板不让在单位里上网聊天,只好回到家里向您请教了。我用的Delphi7,安装VCL目录下的iocomp70.dpk后,控件板上出现了这些控件。随手把个曲线控件放在窗口中,然后调试运行,提示“File not found‘iComponenet.dcu'”,好像缺少这一系列控件的“.dcu文件”,如何搞定?
另外这些控件用的时间长了,会出时间限制方面的问题吗?谢了

huanxian 发表于 2008-8-13 22:15:26

收到,谢谢

minist 发表于 2008-8-20 17:59:12

我用的是BCB6,我有一个数据库是用来存放实时检测的温度数据的,我怎样才能将这些数据转换为曲线显示?
一个是实时曲线图,一个是历史数据曲线图。
各位能否发个iplot的使用方法?
哪位能否赐教iplot在BCB6中的安装方法?我安装后在【控件面板属性】里面可以看得到,
但在控件的工具栏里却不能显示,有哪位知道怎么回事?
无奈装了个Active x的iplotx,不知是否一样。
EM:gzhoujh@tom.com

minist 发表于 2008-8-20 17:59:31

我用的是BCB6,我有一个数据库是用来存放实时检测的温度数据的,我怎样才能将这些数据转换为曲线显示?
一个是实时曲线图,一个是历史数据曲线图。
各位能否发个iplot的使用方法?
哪位能否赐教iplot在BCB6中的安装方法?我安装后在【控件面板属性】里面可以看得到,
但在控件的工具栏里却不能显示,有哪位知道怎么回事?
无奈装了个Active x的iplotx,不知是否一样。
EM:gzhoujh@tom.com

lcw850913 发表于 2008-8-25 17:06:35

我也要一份!谢谢!邮箱:linchunwen850913@163.com

lcw850913 发表于 2008-8-25 17:09:49

太牛了^

minist 发表于 2008-8-26 13:51:50

楼主能否介绍要达到“多路温度采集系统”类似界面的实现用法?

duqinglin 发表于 2008-8-27 14:21:53

标记

bbo5210 发表于 2008-9-8 13:59:45

LZ,很强大。
小弟正好也在搞这块,刚入门还摸不到头脑,目前要做一个四通道的实时曲线显示,类似于示波器的功能,下位机是DSP,上位机用VC开发,串口通信
能指导点东西吗?
我的邮箱bbo2005@163.com

pally2004 发表于 2008-9-8 18:08:30

mark

crourdev 发表于 2008-9-21 02:21:04

谢谢,学习了&nbsp;
希望楼主也给我一份;crcuiri@sohu.com&nbsp;

dfzcx 发表于 2008-9-22 13:50:42


楼主给我发个曲线控件iplot,谢谢,邮箱DFZCX@E165.COM

autotoll 发表于 2008-9-28 12:18:36

楼主
请给我发个曲线控件iplot读数据库的例子吧,谢谢!&nbsp;&nbsp;sglgw@126.com

tjzhky 发表于 2008-9-28 12:21:51

强人啊~支持下~关注ING

wz007 发表于 2008-9-28 12:56:03

希望楼主顺便把VB的&nbsp;iplot控件及源程序也发给我可以吗?
luowz777@163.com&nbsp;
谢谢

yaya001 发表于 2008-9-28 15:57:50

留个地址&nbsp;

szsdlyc@gmail.com

谢谢

12F675 发表于 2008-9-28 16:08:16

支持!楼主:
我的邮箱是:electronic2008@126.com
请给我发个曲线控件iplot读数据库的例子,VB和DELPHI版本的曲线图控件;
谢谢!

zhaoxiaofeng 发表于 2008-10-7 14:43:53

楼主给我发个DELPHI版本的曲线控件iplot和曲线控件iplot读数据库的例子,谢谢,邮箱&nbsp;&nbsp;z_xf516@163.com&nbsp;

zhaoxiaofeng 发表于 2008-10-7 15:01:24

实时接收单片机传送过来的数据,并将每次接收到的数据以图形方式显示在电脑上,由于图形有曲线,有文字注释,图形色彩不同,所以delphi中的chart控件不能实现其要求,用控件paintbox进行画图,能进行画图,但是在画满一屏后,移动时,不能达到真正意义上的平移,所以想使用iplot控件,来实现真正的平移.

zhaoxiaofeng 发表于 2008-10-7 15:20:31

我这次的软件是下位机边检测路面状况边将数据发送到上位机,上位机立刻将图形显示出来,跟楼主的推拉力检测软件功能差不多,只是我显示的数据参数多几个,满屏后向左平移,实时显示当前路状数据,感觉跟楼主的画图比较相似,下载了您的ourdev_370138.zip可以用它的exe文件,但是原码不能打开.希望楼主能在看到后,发一个DELPHI版本的曲线控件iplot,和曲线控件iplot读数据库的例子,谢谢,邮箱&nbsp;&nbsp;z_xf516@163.com&nbsp;&nbsp;在此感谢!

smhh 发表于 2008-10-7 15:33:03

路过,感谢LZ的开源!

zhaoxiaofeng 发表于 2008-10-7 16:03:59

楼上的各位,谁有曲线控件iplot,上网吊了一天了,也没有人注意,谁有,发一个DELPHI版本的曲线控件iplot,和曲线控件iplot读数据库的例子,谢谢,邮箱&nbsp;&nbsp;z_xf516@163.com&nbsp;&nbsp;在此感谢!&nbsp;

holy 发表于 2008-10-8 00:23:06

我的邮箱是:ljpmb@126.com&nbsp;&nbsp;&nbsp;我要一份上位机+下位机的代码谢谢!

yy946 发表于 2008-10-8 08:32:08

向楼主学习!!!!

yy946 发表于 2008-10-8 08:32:15

向楼主学习!!!!

holly 发表于 2008-10-8 10:04:51

我的email是jiangq19831128@sina.com
请给我发个DELPHI版本的曲线控件iplot和曲线控件iplot读数据库的例子,最好有份上位机的源代码,谢谢lz!

hithyy 发表于 2008-10-8 19:20:07

18b20采集温度需要时间的,所以你要延时等待

fjzslin 发表于 2008-10-9 00:12:27

看了你的这东西,有点想用Dephi来学上位机,界面太漂亮了!
页: [1] 2 3 4 5 6
查看完整版本: 18B20温度采集+上位机实时曲线,附源程序