怎样创建一个.TXT文件,并把str:widestring写入到这个文件中? 大哥们:怎样创建一个.TXT文件,并把str:widestring写入到这个文件中? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 procedure TForm1.Button3Click(Sender: TObject);var Str:wideString; F:TextFile; i:integer;beginStr:='sfdsfsfdsfwteqtewqr工';AssignFile(F,'C:\1.txt');try ReWrite(F); for i:=0 to Length(Str) do Write(F,Str[i]);finally CloseFile(F);end;end; 写入后是UNICODE符。用记笔本打开是乱码的。你可以先用WideCharToString 转换为ANSI 我用的delphi7开发环境,总是报错 按扭和菜单放到dll 有什么方法和建议? 请问一下如何定义array property 如何让Dbgrid指定某特殊数据地行显示在第一行 excel中图表的字体大小怎么设置? Image画图的菜鸟级问题! 怎样取得ADOQuery的计算字段的值的和呀? 为什么pagecontrol在加完new page 之后大小和位置就不能改变了? 哪里有DELPHI控件下载??? 再次请问谁知道,用DELPHI3编的程序如何打开NOVELL上的DBF数据库 关于错误的问题: BDE不能及时刷新?
var
Str:wideString;
F:TextFile;
i:integer;
begin
Str:='sfdsfsfdsfwteqtewqr工';
AssignFile(F,'C:\1.txt');
try
ReWrite(F);
for i:=0 to Length(Str) do
Write(F,Str[i]);
finally
CloseFile(F);
end;
end;