技巧分享：计算机二级考试DELPHI基础开发技巧

　　◇[DELPHI]SQL显示多数据库/表

　　SELECT DISTINCT A.bianhao,a.xingming, b.gongzi FROM "jianjie.dbf" a, "gongzi.DBF" b

　　WHERE A.bianhao=b.bianhao

　　◇[DELPHI]RFC(Request For Comment)相关

　　IETF(Internet Engineering Task Force)维护RFC文档http://www.ietf.cnri.reston.va.us

　　RFC882:报文头标结构

　　RFC1521:MIME第一部分,传输报文方法

　　RFC1945:多媒体文档传输文档

　　◇[DELPHI]TNMUUProcessor的使用

　　var inStream,outStream:TFileStream;

　　begin

　　inStream:=TFileStream.create(infile.txt,fmOpenRead);

　　outStream:=TFileStream(outfile.txt,fmCreate);

　　NMUUE.Method:=uuCode;{UUEncode/Decode}

　　//NMUUE.Method:=uuMIME;{MIME}

　　NMUUE.InputStream:=InStream;

　　NMUUE.OutputStream:=OutStream;

　　NMUUE.Encode;{编码处理}

　　//NMUUE.Decode;{解码处理}

　　inStream.free;

　　outStream.free;

　　end;

　　◇[DELPHI]TFileStream的操作

　　//从文件流当前位置读count字节到缓冲区BUFFER

　　function read(var buffer;count:longint):longint;override;

　　//将缓冲区BUFFER读到文件流中

　　function write(const buffer;count:longint):longint;override;

　　//设置文件流当前读写指针为OFFSET

　　function seek(offset:longint;origin:word):longint;override;

　　origin={soFromBeginning,soFromCurrent,soFromEnd}

　　//从另一文件流中当前位置复制COUNT到当前文件流当前位置

　　function copyfrom(source:TStream;count:longint):longint;

　　//读指定文件到文件流

　　var myFStream:TFileStream;

　　begin

　　myFStream:=TFileStream.create(OpenDialog1.filename,fmOpenRead);

　　end;

　　[javascript]检测是否安装IE插件Shockwave&Quicktime

　　var myPlugin = navigator.plugins["Shockwave"];

　　if (myPlugin)

　　document.writeln("你已经安装了 Shockwave!")

　　else

　　document.writeln("你尚未安装 Shockwave!")

　　var myPlugin = navigator.plugins["Quicktime"];

　　if (myPlugin)

　　document.writeln("你已经安装了Quicktime!")

　　else

　　document.writeln("你尚未安装 Quicktime!")