Delphi
文章平均质量分 63
yunqian09
这个作者很懒,什么都没留下…
展开
-
PASCAL 学习 delphi
1,在Pascal中,注释括在大括号中或带星号的圆括号中。Delphi 也认可C++ 风格的注释,即把注释放在双斜线后。例如{this is a comment}(* this is another comment *)// this is a comment up to the end of the line2,Pascal 编译器(不象其他语言的编译器)不考虑字符的大转载 2010-02-08 11:42:00 · 1938 阅读 · 0 评论 -
FloatToStr问题 保留小数位
如何使一个字符串23.89023482在使用FloatToStr变为23.90? 有什么规则吗?是不是小数后第2位四舍五入? FormatFloat(0.0, f) + 0 用下面这个函数要好的多: FloatToStrF(23.89023482,ffnumber,12转载 2010-03-01 11:08:00 · 19019 阅读 · 0 评论 -
Access Violation at address 00000000.Read of address 00000000 解决办法
是数组越标或没有初始化某个对象之类的问题,搂住细细检查一下代码,使用指针前未做检查,而这个指针未初始化。 可能是new后没有delete,这样出现溢出的可能性比较大 检查代码或者跟踪试试使用指针对象前判断一下 if (ptr!=NULL) delete 指针对象后转载 2010-02-24 22:20:00 · 37551 阅读 · 4 评论 -
上位机完工 ——delphi 告一段落
全图 保存数据为txt文档 保存为图像 打印——pdf打印机 下一步 有时间的话 实现 标签页面 USB转串口自动识别设备 //重新回到STM32上面-02-26 21:35:21原创 2010-02-26 21:18:00 · 4345 阅读 · 3 评论 -
字符串保存为 TXT文件
procedure TForm1.Timer1Timer(Sender: TObject);var afile: TFileStream; //DateTime : TDateTime; str,da,StrToWrite : string;begin //DateTime := Time; // store the current d原创 2010-02-21 13:34:00 · 4978 阅读 · 1 评论 -
Tchart 动态添加节点
动态添加节点 Chart1.AddSeries( TFastLineSeries.Create( self ) ); 添加节点坐标值Chart1.Series[0].AddXY(X,Y,Label,color); Chart1曲线0 坐标X Y处 添加点 第一条曲线是 Series[0]. 第二条曲线是 Ser原创 2010-02-19 23:23:00 · 2881 阅读 · 0 评论 -
多页控制组件PageControl
PageControl组件位于组件板的Win32页中,它的功能就不多说了,这里主要说下它的属性及使用方法: 1.建立多页 用鼠标右键单击PageControl组件,在弹出式菜单中选择New Page子菜单可添加新页,用Delete子菜单可删除当前页。读者应注意: 。 ·单击PageControl组件标题时,选中的是PageControl对象。 ·单击PageC转载 2010-02-18 17:51:00 · 2905 阅读 · 0 评论 -
tchart _实时动态决策分析方案
2.实施过程 实例位置:光盘/mr/5/5.5/01本实例是对商品的销售情况进行实时动态分析,以秒为单位,将商品的销售金额在图表中进行显示,这样,决策者可以更直观的了解最新的商品销售动态。商品销售情况的效果图,如图5.56所示。 图5.56 商品销售情况动态实时分析图程序窗体相关组件的说明,如表5.34所示。表5.34转载 2010-02-15 00:10:00 · 2618 阅读 · 1 评论 -
tchart 静态图表
5.1.1 静态图表分析技术静态图表是指不需要通过连接数据库提供数据,而绘制出的图表。静态图表主要通过TChart组件实现,通过该组件可以以图表的形式来对数据进行分析。该组件提供的图表类型包括折线图表(Line)、条型图表(Bar)、区域图表(Area)、点型图表(Point)、饼型图表(Pie)、甘特图表(Gantt)、箭型图表(Array)、泡沫图表(Bubble)、图形图表(Shape转载 2010-02-14 23:16:00 · 12126 阅读 · 3 评论 -
delphi 快捷键的使用
CTRL+SPACE 代码补全,很好用的(先改了输入法热键) CTRL+SHIFT+C 编写申明或者补上函数 CTRL+SHIFT+↑(↓) 在过程、函数、事件内部, 可跳跃到相应的过程、函数、事件的定义(在INTERFACE和IMPLEMENTATION之间来回切换) CTRL+SHIFT+G 插入GUID CTRL+J (弹出DELPHI语句提示窗口,选择所需语句将自动完成一条语句)代码模板转载 2010-02-13 22:00:00 · 916 阅读 · 0 评论 -
Delphi使用spcomm串口通信 串口号大于10出错的解决办法 spcomm error opening serial port
如果你已经会使用SPCOMM且出现10个以上的串口问题请改一下串口名COM1.CommName=//./com18;就这样 加//./就行了我也不知道什么回事.......比如Comm1.CommName := //./+ComboBox1.Text;//./com1转载 2010-02-22 22:42:00 · 7450 阅读 · 0 评论 -
TabControl delphi
1.TTabControl 组件的典型用法TTabControl 组件使用起来,根本不会使程序简单化,所以不提倡使用此组件,可以用TPageControl组件代替。与多页组件不同的是,虽然Tab 组件上可以有一组按钮,但它们的客户区是公用的,当用户选择其中某个按钮时,将触发OnChange 事件。在处理OnChange 事件的句柄中,必须自己定义怎样操纵客户区上的内容。例如,可以用Ta转载 2010-02-18 18:42:00 · 11495 阅读 · 2 评论 -
改变PAGECONTROL控件的TabSheet的标题颜色
第一种方法:修改标题文字颜色 首先将PageControl的OwnerDraw属性设为TRUE 然后在PageControl的OnDrawTab事件里写代码控制: procedure TfrmMain.PageControl1DrawTab(Control: TCustomTabControl;TabIndex: Integer; const Rect: TRect; Ac转载 2010-02-19 17:17:00 · 10284 阅读 · 1 评论 -
串口调试成功 yeah SPCOMM
采用了虚拟串口软件 (已经上传到CSDN了) unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, SPComm, TeEngine, Seri原创 2010-02-13 17:21:00 · 1591 阅读 · 8 评论 -
在Delphi中,字符串查找 函数
Delphi提供的字符串函数里有一个Pos函数,它的定义是:function Pos(Substr: string; S: string): Integer; 它的作用是在字符串S中查找字符串Substr,返回值是Substr在S中第一次出现的位置,如果没有找到,返回值为0。 使用pos函数来查找字符第一次出现的位置v原创 2010-02-17 18:30:00 · 21780 阅读 · 3 评论 -
tchart 保存为图像
很容易实现的,先用Chart1->TeeCreateBitmap()返回是BITMAP的类型,有这个不就成了吗?或者有个更好的的办法, Chart1->CopyToClipboardBitmap();直接到系统剪切板上,到EXCEL里一帖就行了。呵呵。=====================Chart1.SaveToBitmapFile(d://test.b转载 2010-02-15 16:25:00 · 5498 阅读 · 2 评论 -
第四章 用户自定义数据类型
Pascal 语言的一个重要特征是它能自定义数据类型。通过各种类型构造器,你可以定义自己的数据类型,如子界类型、数组类型、记录类型、枚举类型、指针类型和集合类型。最重要的用户定义数据类型是类(class),类是Object Pascal的面向对象扩展部分,本书不讨论这部分。命名及不命名的类型 为了后续使用或直接用于变量,需要给自定义类型命名。如果自定义一个命名的类型,你必须将代码放在特定的转载 2010-02-09 11:44:00 · 992 阅读 · 0 评论 -
第三章 类型、变量及常量
变量Pascal 变量在使用前必须声明,声明变量时必须指定一种数据类型。下面是变量声明的例子:var Value: Integer; IsCorrect: Boolean; A, B: Char;关键字var可以在许多地方使用,例如放在函数或过程的开始部分,用来声明函数或过程的局部变量;也可以放在单元中,用于声明全程变量。var关键字之后是一组变量名列表,每个变量转载 2010-02-08 12:45:00 · 1738 阅读 · 1 评论 -
delphi报警声音 Beep、MessageBeep 和 Windows.Beep
我的办法,增加一个timer 设置间隔100ms,通过timer的使能否,控制报警声音开关procedure TForm1.Timer1Timer(Sender: TObject);begin Windows.Beep(1200+i_f,10+i_f); if i_f begin inc(i_f); endend; =================转载 2010-05-04 09:15:00 · 12014 阅读 · 0 评论