标签: delphi

早在今年CES大展上来自美国密西根州的汽车零件制造商Delphi Automotive就展示了在奥迪Q5上改装的无人驾驶技术，现在这家雄心勃勃的公司计划于今年3月22日以旧金山的金门大桥为起点，横跨美国3500英里（5632公里）到达纽约。Delphi表示本次横跨活动不仅只是测试无人驾驶技术，同时也是收集在不同路况、不同天气条件下的驾驶数据，每天会行驶6到8个小时，有专人会坐在车内进行监控，但只有出现问题或者发生交通事故等突发状况才会进行处理，预计将会在一周后达到目的地。 Delphi表示他们所研发的无人驾驶汽车能够处理复杂的交通状况，包括在十字路口根据车流量快速停止或者加速前进，在高速道路上维持车速或者在适当的时机进行超车等等。车身上装备了6个激光传感器、六个雷达传感器和多个摄像头，通过对这些复杂数据的收集、整合和分析从而做出智能的判断和操作，并通过部分信息和仪表盘上的信息向驾驶员发出提醒。

  不管是在Delphi或Lazarus中状态栏内的文字在设计时是无法修改其颜色，字体大小等等字体属性的，只能使用其默认的字体属性！那么当我们不想用其默认的黑白颜色时，要怎样去修改呢？ 下面说说修改的具体步骤，网上查阅方法基本上都是通过TStatusBar的OnDrawPanel事件对其进行重绘，因为在重绘事件中有Canvas属性，此属性里就具有相关的字体属性设置。由于网上只说了思路，具体实现起来对于新手来说可能还有些困难。下面是网上的原话： 首先：   确定Panels 的 Sytle 是否为:psOwnerDraw    其次：   在statusbar控件单击 ondrawpanel事件   写如下代码   StatusBar.Canvas.Font.Color:=clGreen; 改成自己所要的颜色   StatusBar.Canvas.TextRect(Rect, Rect.Left, Rect.Top, Panel.Text);   我说说调用部分，直接上代码吧，好理解些！ var  nRect : TRect;    procedure TForm1.FormCreate(Sender: TObject); begin    nRect.Left := 0; // 初始化矩形区域大小    nRect.Top := 198; // Record类型的变量不能在定义时直接赋初值，要单独引用其域进行赋值！    nRect.Bottom := 0;    nRect.Right := 0;    StatusBar1DrawPanel(StatusBar1,StatusBar1.Panels.Items ,nRect); // 注意此处第三个形参是需要实参为TRect类型的，需要自己根据TStatusBar大小构造一个 end;  

  最近在学习Lazarus的过程中，觉得里面的异常处理机制很有用处，于是就和C++中的异常处理作了下比较。 异常指的是程序在编译和运行过程中出现的异常。编译中的异常通过IDE能快速的看到并做出改正，但如果是在程序交付运行后而出现的异常则是很难处理的，这就要求程序员在编程的过程中就应该要想到可能出现的异常情况，并根据自己的要求做出相应的处理，这对于编程来说显得十分重要。 首先说说Lazarus（基本上和Delphi类似）中的异常处理机制，Lazarus本身就提供了很多的异常类，同样用户也可自己定义自己的异常类。和大多数语言一样触发异常的方式分为程序系统自动异常和程序员自己触发异常。由程序系统触发的异常部分情况下程序系统会作出处理，但很多情况下如果程序系统不作处理那么程序可能就非法停止了。Lazarus中提供了两种异常处理语句： 1.try                2.try    statement            statement   finally              except   end                  (else)                        end 第一种代表如果在try..finally块内出现了异常则会跳出try..finally块而去执行finally..end块，但要记住的是不管在try..finally块内有无异常的发生finally..end块都会执行。第二种基本上和C++中的try..catch..相同，主要用于程序员自定义的捕捉产生的异常而进行处理。对比了一下两者原理基本上就是一样的，C++中采用的方法是在函数本身只产生异常不处理异常，是在其上一级内去处理异常，如上一级也不能处理则依次类推到最高一级，如最高一级也没有异常处理语句则程序就死掉了。Lazarus中如果在except..end块中没有异常处理语句，则在最近的地方继续寻找try..except语句，依次类推，如若依旧没有则程序也就死掉了。其实基本上虽然计算机语言有很多种，但大部分的思路都是相通的。  

经过了很多年的等待，跨平台、开源的Lazarus终于在昨天发布1.0版。   软件下载： http://sourceforge.net/projects/lazarus/files/ 如果无法访问 SF ，可以从另外的镜像服务器下载： ftp://freepascal.dfmk.hu/pub/lazarus/releases/ http://michael-ep3.physik.uni-halle.de/Lazarus/releases/ http://mirrors.iwi.me/lazarus/