Delphi 资源文件使用
Delphi使用资源文件全攻略
在通常情况下使用delphi设计程序，都是将字符串、图像等资源直接使用delphi提供的vcl控件加到*.dfm中，这样做会合修改这些资源时带来不便，如果资源被多次引用，这些资源在程序启动时都被加载到内存中，非常耗费系统资源。因此，这就需要一种新的引用资源的文件：资源文件。资源文件就是将一些资源，如字符串、图像等信息进行编译，然后在程序中引用编译后的资源文件，最后和源程序一起编译生成可执行文件。由于在资源文件中的资源是在需要时加载，因此，比较节省系统资源，而且，如果要做国际化版本的系统，只需要将资源文件一换，重新编译即可。下面就详细介绍delphi中资源文件的建立和使用。
一、建立资源文件
资源文件的源文件是普通的文本文件，扩展名是*.rc。将资源文件的内容写入文件后，调用brcc32.exe将其编译后生成*.res文件。brcc32.exe在delphi的bin目录中。
二、字符串资源
字符串资源实际上是将一个字符串和一个数字索引对应，在装载字符串资源时，需要提供这个字符串资源所对应的数字索引。字符串资源文件以stringtable开头，使用一对begin和and将资源定义括起来。 字符串资源的格式是：数字索引，"资源字符串"。
string.rc文件内容
stringtable
begin
1001, "新建"
1002, "保存"
1003, "关闭"
1004, "帮助"
1005, "退出"
1006, "资源文件测试"
End
然后调用命令：brcc32.exe string.rc ，生成string.res，最后在程序中加入{$R string.res}。以下所述的*.rc文件都需使用类似的方法进行编译和引用。
在delphi中有两种方法可以装载字符串资源。
1. 使用Windows API函数LoadString。使用这个函数需要定义一个char数组，调用的形式如下。
LoadString(hInstance, 1001, buffer, 100); //100：buffer数组的最大长度，1001：数字索引
2. 使用delphi自身的函数LoadStr。这个函数只需要一个数字索引就可得到相应的字符串资源。调用的形式如下。
button2.Caption := LoadStr(1002);
三、Bitmap资源
位图资源的定义就相对简单得多。每个位图资源只需要定义三项：位图标识 位图类型 位图文件名 （这三项中间用空格或tab隔开）其中位图标识和字符串资源的数字索引类似，只是位图标识可以是字符串�
相关文档：
在编译delphi程序时会出现在些提示，全是E文的，现在给大家一个对照表，可以更好的理解错误提示信息！
';' not allowed before 'ELSE' ElSE前不允许有“;”
'' clause not allowed in OLE automation section 在OLE自动区段不允许“”子句
'' is not a type identifier 不是类型标识符
'' not prev ......
例如以下代码：
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,Dialogs;
type
TForm1 = class(TForm)
procedure one();
function two(x,y:integer):integer;
private
......
用Delphi 实现串口通讯，常用的几种方法为：使用控件如MSCOMM和SPCOMM，使用API函数或者在Delphi 中调用其它串口通讯程序。利用API编写串口通信程序较为复杂，需要掌握大量通信知识，其优点是可实现的功能更强大，应用面更广泛，更适合于编写较为复杂 的低层次通信程序。相比较而言，利用SPComm控件则相对较简单，该控件具� ......
TThread是一个抽象类,用于在delphi中创建线程。
创建一个TThread的子类对象即相当于创建一个线程。
当一个应用程序运行时，应用程序就被载入内存准备执行。此时，它成为包含一个或多个线程的进程。线程执行应用程序的部分内容，并由操作系统分配CPU时间。同一进程的所有线程共享同一地址空间，可以访问进程的全局变量 ......
Delphi提供的字符串函数里有一个Pos函数，它的定义是：
function Pos(Substr: string; S: string): Integer;
它的作用是在字符串S中查找字符串Substr，返回值是Substr在S中第一次出现的位置，如果没有找到，返回值为0。
使用pos函数来查找字符第一次出现的位置
var
str1:string;
i,j:integer;
begin
str1:='dsf465 ......
