DELPHI5.0从入门到精通有这样的例子.
解决方案 »
- delphi中如何将DBgrid中显示的从SQL sever数据库中查询到的数据导入EXCEL(可以导入到TXT文本中吗 ?)中
- webBrowser链接跳转,在线等,听说有这3个字,别人回答会快一些。。。。
- 窗口间的切换问题
- TQRExpr的问题:如果取两个TQRExpr值的相除结果,并四舍五入
- 在PaintBox上画线遇到的问题
- 求Delphi网络蜘蛛实例,找了好久了,实在没辙。。谢谢!
- 关于Twebbrowse控件使用问题。大大、高手请进->->->
- delphi与RS232窜口编程资料
- 重新登陆时如何关闭前面的事务
- 如何获得本机的DNS设置,谢谢,不断加分!!!
- ★★★ 招 聘 ★★★
- Access加上密码后,为何ADO不能联接?
:)
用API,会了吗!
txt: TStringList;
begin
txt := TStringList.Creat;
txt.LoadFromFile(YourFileName);
Result := 0;
while Result < txt.Count do
if Pos(YourString, txt.Strings[Result]) > 0 then Break
else Inc(Result);
if Result >= txt.Count then Result := -1;
txt.Free;
end;