1、首先找到一张图片，比如：c:\abc.png
2、建立一个.html文件，如：test.html,里面可以就一句话：
[html] view plain copy
<img src="file://c:/abc.png" style="filter:gray()"/>
3、用IE打开，看到的就是黑白照片。（火狐等其他浏览器不支持）
原理：其实就是应用的CSS滤镜。一般人不会ps，这个方法可以很快速的得到黑白图片。滤镜还有很多，百度一下...
[html] view plain copy
<table width="250px" height="200px" border="1" align="center" >
<tr>
<td>原图：</td>
<td><img src="abc.jpg" /></td>
<td>黑白照片</td>
<td>
<img src="abc.jpg" style="filter:gray()" onmouseover="grayscale.reset(this)" onmouseout="grayscale(this)"></img>
</td>
<td>X光照片</td>
<td>
<img src="abc.jpg" style="filter: Xray"/>
</td>
<td>风动模糊</td>
<td>
<img src="abc.jpg" style="filter:blur(add=true,direction=45,strength=30)"/>
</td>
<td>正弦波纹</td>
<td>
<img src="abc.jpg" style="filter:Wave(Add=true,direction=45,strength=30)"/>
</td>
<td>半透明效果</td>
<td><img src="abc.jpg" style="filter: Alpha(Opacity=50)"/></td>
</tr>
<tr>
<td>线型透明</td>
<td>
<img src="abc.jpg" style="filter: Alpha(Opacity=0, FinishOpacity=100, Style=1, StartX=0, StartY=0, FinishX=100, FinishY=140)"/>
</td>
<td>放射透明</td>
<td>
<img src="abc.jpg" style="filter: Alpha(Opacity=10, FinishOpacity=100, Style=2, StartX=30, StartY=30, FinishX=200, FinishY=200)"/>
</td>
<td>*白色透明</td>
<td>
<img src="abc.jpg" style="filter:Chroma(color:#FFFFFF)"/>
</td>
<td>*降低色彩</td>
<td>
<img src="abc.jpg" style="filter: grays"/>
</td>
<td>底片效果</td>
<td>
<img src="abc.jpg" style="filter: invert"/>
</td>
<td>左右翻转</td>
<td>
<img src="abc.jpg" style="filter: fliph"/>
</td>
</tr>
<tr>
<td>垂直翻转</td>
<td>
<img src="abc.jpg" style="filter: flipv"/>
</td>
<td>投影效果 </td>
<td>
<img src="abc.jpg" style=" filter:progid:dXImageTransform.Microsoft.DropShadow(color=#cccccc,offX=5,offY=5,positives=true)"/>
</td>
<td>马赛克</td>
<td>
<img src="abc.jpg" style="filter:progid:dXImageTransform.Microsoft.Pixelate(maxsquare=3)"/>
</td>
<td>发光效果</td>
<td>
<img src="abc.jpg" style="filter:progid:dXImageTransform.Microsoft.Glow(color=#cccccc,Strength=5)"/>
</td>
<td>柔边效果 </td>
<td>
<img src="abc.jpg" style="filter:alpha(opacity=100, finishOpacity=0,style=2)"/>
</td>
</tr>
</table>
TIOBE编程社区公布了2006年20种程序开发语言排名数据，这个排名依次是：Java、C、C++、Visual Basic、PHP、Perl、Python、C#、JavaScript、Delphi、SAS、Ruby、PL/SQL、D、ABAP、Lisp/Scheme、COBOL、Ada、Pascal、Visual FoxProSql2:='Insert xs values('''+Xh+''','''+Xm+''','+Xb+','''+Cssj+''','''+Zy+''','+Zxf+','''+Bz+''')'//这里有问题！！！！
改成：
Sql2:='Insert xs values('+
''''+Xh+''''+','+
''''+Xm+''''+','+
'''+Xb+''''+','+
DateToStr(Cssj)+','+
''''+Zy+''''+','+
FloatTostr(Zxf)+','+
''''+Bz+''''+')'
以上我假设xh是序号，字符型的，xm是姓名，字符型的，xb是性别字符型的,Cssj时间型的,zy摘要字符型的,Bz备注字符型的。sql2中的引号均为单引号。
