摘要：
200PLC不支持主站，300PLC支持主站，是什么意思啊？ 请举例说明，谢谢1、在MPI、PROFIBUS-DP协议通讯中，都是主、从结构。对于S7-200是不能作为通讯的主站：、S7-200CPU只能做MPI从站，即S7-200CPU之间不能通过MPI网络互相通信，只能通过PPI方式互相通信。 、在PROFIBUS-DP协议通讯中，因S7-200（M277）只能作为从站，所以两个EM277之间不能通信。但可以由一台PC机作为主站，访问几个连网的EM277。2、S7-300PLC支持主站？在MPI、PROFIBUS-DP协议通讯中，都是主、从结构。即一个主站带若干个从站。S7-300/400 阅读全文
摘要：
private procedure WMSYSCOMMAND(var msg:TMessage);message WM_SYSCOMMAND; { Private declarations } public { Public declarations } end;//禁止窗体移动procedure TSysTemCenter.WMSYSCOMMAND(var msg: TMessage);begin if msg.WParam=SC_MOVE then msg.WParam:=0;end; 阅读全文
摘要：
WIN7, Vista提供的UAC机制，它的主要目的是防止对于操作系统本身的恶意修改。对于Delphi程序的影响，UAC主要在于以下几点：1、由于UAC机制，Delphi对于系统的操作可能无声的失败，而同样的程序，在2000/X下面可能运行正常。譬如注册表的改动。。。2、为了避免这样的情况，Delphi程序必须支持Vista UAC标注，也就是说，在UAC程序的图标下面显示盾牌标志。这样可以在需要系统更高权限的时候，提醒用户。为了让程序显示UAC标志，现在看来Vista是通过读取程序的资源（Resource）里面的MANIFEST资源，来决定是否显示“UAC盾牌”。为了支持UAC，Delphi 阅读全文
摘要：
var s: string;begin //FormatFloat 的参数1是 String 格式指令, 参数2是实数类型 Extended s := FormatFloat('###.###',12.3456); //返回: 12.346 s := FormatFloat('000.000',12.3456); //返回: 012.346 s := FormatFloat('#.###',12.3); //返回: 12.3 s := FormatFloat('0.000',12.3); //返回: 12.300 s := For 阅读全文
摘要：
摘录至：http://topic.csdn.net/u/20080406/23/61bc9e82-a136-4d12-8f56-a8f474ee10d0.htmlfrxReport1.PrepareReport();frxReport1.PrintOptions.ShowDialog:=false;frxReport1.print;我开始曾试过设置属性ShowDialog为false 只是还是没达到效果 搞不清为什么 英语忘光了 不知道具体什么意思 感觉像 但是不敢肯定没想到用代码可以实现 不过还是感谢楼上的提醒frxReport1.PrepareReport; frxReport1.Prin 阅读全文
摘要：
在c语言中有：a[5]={1,2,3,4,5} ；那么在 delphi中，这个数组的赋值该怎么写？？ 问题补充：下面有人说的对，我就是想在声明数组的时候赋初值，至于初值的内容你们不需要知道，我想知道的只是申明的时候赋值的格式，而不是通过一个过程去实现var a:=array[1..5] of integer=(1,2,3,4,5)只有全局变量才能赋初始值，而且5个值都要赋满s:array[1..264] of integer； s:=((1),(2),(2),(1),(1),(2),(2),(1),(2),(1),(1),(1),(1),(2),(2),(1),(1),(2),(1),(1). 阅读全文
摘要：
问题：TEECHART使用Canvas.TextOut标注文字，然后我想把TEECHART和标注的文字一起保存成图片（CHART1.SaveToBitmapFile('D:\6789.BMP')）。但是发现保存了，那个标注的文字没有了。图表曲线倒是在的，怎么解决的？解决方法如下：1：在你的窗体加入一个TImage命名为img1，大小设置的和你的chart一样大，把visible设置成false2：cht1.Canvas.ShowImage(img1.Canvas, img1.Canvas, cht1.ClientRect);3：把你的标注用img1重新画一遍，例如：img1.C 阅读全文
摘要：
unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ExtCtrls;type TForm1 = class(TForm) pnl1: TPanel; btn1: TButton; btn2: TButton; procedure btn1Click(Sender: TObject); procedure btn2Click(Sender: TObject); privat... 阅读全文
摘要：
1、USER ：DateUtils2、使用 StartOfTheMonth 和 EndOfTheMonth 函数获取即可；procedure TForm1.btn1Click(Sender: TObject);begin mmo1.Lines.Add(FormatDateTime('yyyy-mm-dd',StartOfTheMonth(Now))); mmo1.Lines.Add(FormatDateTime('yyyy-mm-dd',EndOfTheMonth(Now))); //mmo1.Lines.Add(DateTimeToStr(StartOfThe 阅读全文
摘要：
//第一种方式procedure TForm1.btn1Click(Sender: TObject);beginWith TForm2.Create(Application) doTry ShowModal;finally free;end;end;//第二种方式procedure TForm1.btn2Click(Sender: TObject);begin if not assigned(Form2) then begin Form2:=TForm2.Create(nil); Form2.Show; endend;//第二种方式创建的的窗体需要在FORM2里释放资... 阅读全文