寻找写日志的控件,谢谢! 如题。 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 sjlsy(烟鬼) 大哥你好:怎么写 代码呀?? 能不能给写一下,我也不会。谢谢了!! procedure WriteTxt(TextStr, FileName: string);//TextStr为要写的内容,FileName为路径及文件名var TextF: TextFile;begin AssignFile(TextF,FileName); if FileExists(FileName) then Append(TextF) else Rewrite(TextF); Writeln(TextF, TextStr); CloseFile(TextF);end; 高手!问题是这样的。 保存修改记录和多用户同时操作保证同步的问题!谢谢兄弟姐妹帮忙看看! TcpClient和TcpServer连接的问题! ★★★★1000分-寻找最酷的脚本控件:fastScript★★★★ delphi5 怎么连接dbf文件.database中的连接字符怎么写,谢谢大虾 谁会try呀 如何用访问已经用EXCEL打开的DBF 这条语句怎么写? 向高手请教有关sql server存储过程的问题????????7 MediaPlayer控件如何控制自动循环播放? 如何在COM组件中获得客户进程所在磁盘路径? 请教Adodataset事件使用方法
怎么写 代码呀?? 能不能给写一下,我也不会。谢谢了!!
//TextStr为要写的内容,FileName为路径及文件名
var
TextF: TextFile;
begin
AssignFile(TextF,FileName);
if FileExists(FileName) then
Append(TextF)
else
Rewrite(TextF); Writeln(TextF, TextStr);
CloseFile(TextF);
end;