- 博客(21)
- 资源 (6)
- 收藏
- 关注
原创 汇川 PLC H2U3232MR-XP 改脉冲输出
垃圾堆里翻出了一个全新的H2U 3232MR,还有一个昆仑通态的屏,于是就是想拿来学习一下PLC。想弄个简单控制步进电机的控制器,可是一查MR是继电器型的,不能用于脉冲输出。于是就有了本文的改造,但是没有上机实测。因为ULN2003驱动,我只是简单加了一个51K当负载用来测输出,有点不准确。本文只是讲讲改造的思路,也相对简单 。拆开H2u 3232MR的顶盖,整体电路布线等看着非常不错拆开Y0~Y3的继电器,这样正好一组+COM,组成 两组 脉冲+方向信号,驱动两路步进或伺服找.
2021-11-27 21:37:30 3302
原创 Lazarus|delphi中,自定义控件中实现items列表操作【最小框架】
unit Dev_FA_Motion;{$mode objfpc}{$H+}interfaceuses Classes, SysUtils, LResources, Forms, Controls, Graphics, Dialogs, Protocol_Modbus;type { TMotionItem } TMotionItem = class(TCollectionItem) private FRepeatCount: Cardinal; pro...
2021-04-22 16:49:50 590
原创 Lazarus下图片轮廓处理
处理思路: 对图像进行二值化处理后,再进行多个方向的关联对比.Lazarus 和 Delphi的代码在处理方面,还有细微的不一样,网上你能找到的在delphi下做这方面的处理的示例程序,一般情况下是没有办法直接在Lazarus下编译通的。图中的图片为32bits,在处理速度上相对还是可以。Win_DSPack是Lazarus下一套非常棒的摄像头采集组件,让你可以快速方便的连接USB摄像头,进行视频流的采集工作。Lazarus的IDE界面几乎和Delphi7.0一样. 良好支持Linux,MA
2021-02-04 15:24:58 479 2
原创 Lazarus下的图像二值化操作和Delphi稍有不同
今天是一个值记念的日子,感谢CSDN客服人员,帮我找回了这个遗忘了接近20年的帐号。 谢谢!Delphi已不在像当年那样的流行。 我的工作也在这20年来发生了巨大的改变。重心也从纯平台软件开发转向了硬件电路和单片机程序的开发。 目前从事汽车方面的一些控制开发。但是无可否认,Delphi是window平台,最方便的用于上位机开发的强大可视化IDE。在20年来的开发工作中,我开发了无数的扩展组件,在通信控制方面,delphi给我的调试任务带来了巨大的帮助。然它已老去是一个不争的事实。Lazaru..
2021-02-03 15:09:38 930 2
原创 轻松进入Linux的桌面应用开发.gambas初步认识.
当年borland大军进发linux阵容,kylix做为首发阵营,在delphi7时为其它下双平台的过渡基础.而然kylix并没有给我们带来太多的惊喜.可以这样说,kylix带关一大堆的问题来,又带着一大堆的问题远离了我们.borland在大举转向.net时,就开始放充kylix,kylix因此也永远的停在了3.0..依然存在的一些平台上安装不了.就算能安装的也不能正常使用,程序打
2005-02-24 23:49:00 3803
原创 解决Frankie Live CD-linux发行版中ADSL的问题。
由于TDSL及存在一定的问题。。 可以进入控制台 ipconfig eth0 192.168.0.1 ------------------------------------------------ 必须进行手工重定,自动得到的是没有用的。。连域局网都别想ping通。 然后进行adsl设置: adsl -setup .......中间的填写按要求来就是了。注意一点就是。。DNS输入为 "serve
2005-02-24 21:31:00 862
原创 Frankie Live CD版linux直接安装于Windows上面的方法。
以下说明直接转载于Frankie作者。从硬盘运行Frankie Linux LiveCD 的方法 1.光盘上面的所有内容复制到一个FAT32分区[如:D:/Frankie ,注文件名称必须是小于8个字母的英文或数字]; 2.将光盘上面的DOS文件夹中的NTOSLoader文件夹复制到c:(是FAT32或NTFS格式),改名为MSDOS; 3.在win2000或winxp中的命令行中,进入c
2005-02-24 21:26:00 1831
原创 Timer加以简单处理,你会发现它不错.
定义一个全局.boolean类型变量在onTimer 事件中加入var TimerFlag:boolean=True;......................................OnTimer事件处理过程-------------------------------------------------if TimerFlag then begin TimerFlag
2005-02-21 03:55:00 1269 6
原创 Delphi中如果将图片按指定大小保存.
程序较为简单,不做其它说明了.procedure TForm1.Button1Click(Sender: TObject);var s:Tbitmap; Rect:TRect; RW,RH:integer;begin RW:=400; RH:=300; s:=Tbitmap.Create; s.LoadFromFile(c:/11.b
2005-02-21 03:47:00 1728
原创 早些时候写的一个Delphi中的串口通读类.
这个是早期的版本,后期我做了很大的修动...仅做为学习参考用. 在做数据采集,及控制系统中,我建议大家自己用API写通讯类..不要使用SPCOMM,以及MSCOMM...在实际的应用中,自己写的通讯类在应用上会更加的灵活方便(^^当然写这个通讯类是比较费时的...) 在做数据采集时,可以自己很方便的加入CRC或者checksum校验方式..51以CRC8 /16为主....
2005-02-21 03:44:00 2618
原创 控制另外一个程序的上面的控制的Enable还是disable
procedure TForm1.bt1Click(Sender: TObject);var winT,winM:integer;begin winM:=findwindow(nil,气死我了); wint:=FindwindowEX(winM,0,nil,看你听不听话); windows.SetParent(wint,self.Handle);
2005-02-21 03:35:00 1152
原创 C51中232/485一个简单的程序框架
以上仅为一个框架,以供入门学习者了解和掌握一个基本的程序框架.无实际的功能意义./*********************************************************** 柳开电气-智能控制系统** 开发者:李金浩** 2004年8月13号 **
2005-02-21 03:32:00 2079
原创 1wire总线的应用-DS18B20温度采集工芯片的应用.
使用DS18B20时,请务必注意不要插错方向.否则器件可能直接烧掉...DS18B20目前市场价大约在20元左右...12bit对于一般性的温度采集,足以. 以下是我早期所写的,程序不是很好.因为我直接用了float类型;仅此做为参考学习...float类型十分占内存,对于单片机来说内存是十分宝贵的.#include /*作者:李金浩QQ:67260745E-mail:LTSoft9
2005-02-21 03:28:00 3173
原创 AT89C5X,8*8点阵LED,显示演示代码.
对应硬件系统:恒坚电器-AVR-C51综合学习板单片机类型:C51开发环境:keil C以下是恒坚电子的网站:http://www.hejoin.com/程序是我很早以前写的.仅做为参考学习..#include const char mytext[][8]={{0xF9,0xF9,0xF9,0xF9,0xF9,0xF9,0x81,0x81},//L
2005-02-21 03:23:00 3967
原创 At24C0X IIC-EEPROM的keil C操作程序.
以下程序本人仅在 6MHZ晶振,AT89CXX 测试通过..至于其它晶振下未经测试,也不知道行不行.如果不行,请自行调整延时量.主要在于了解IIC总线的操作,这样不管是AT24C0X还是其它的IIC总线的芯片都可以很好的去应用.#include sbit SDA=P2^5;//SDAsbit SCL=P2^4;//SCLsbit WP=P2^3;//WP/*-----------
2005-02-21 03:18:00 1892
原创 很久以前写的一个应用于51上面的多功能控制采集系统的..学习板内核程序
作者:李金浩单片机:At89S52连接类型:232 |485 接口校验方式:checksum开发环境:keil C仅供参考学习,请勿用于商业开发./*************************************************************************************** * 作者:李金浩
2005-02-21 03:11:00 2230 1
原创 PHP入门笔记-认识PHP
URL变量的传入:例:my.php?temp1=hello word 变量值读取:输出URL值:URL传入值:与Asp的比较,呵呵..几乎是一样的 request("temp1") 关于数据类型 PHP采用混杂式的变量类量,省去变量申明的麻烦事.这点和VB很像呵呵.真TMD的方便.变量的输出 方法1:方法2:
2005-02-21 02:28:00 1036
原创 采用csv格式将数据转换为excel的函数,带有分栏功能
声明部分 procedure DataToExcelCSV(SaveFileName:string;DataSet:TDataSet;ShowCompleteBoX:Boolean=True;GroupCount:integer=1);......{------------------------------------------------------}{检测findStr是否in ma
2004-04-07 22:25:00 1466
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人