procedure ShowMoney(Money_Port: String;Money_String:String)
//Moneey_Port 顾显接口Com1 or Com2 Money_String 顾显显示的内容
var
PrnFileName:TextFile;
begin
Assignfile(PrnFileName,Money_Port);
Rewrite(PrnFileName);
write(PRNFileName,chr(12)); //清除顾显
write(PRNFileName,chr(27)+chr(81)+chr(65)+Money_String+chR(13)); //显示信息
CloseFile(PRNFileName);
end;
//Moneey_Port 顾显接口Com1 or Com2 Money_String 顾显显示的内容
var
PrnFileName:TextFile;
begin
Assignfile(PrnFileName,Money_Port);
Rewrite(PrnFileName);
write(PRNFileName,chr(12)); //清除顾显
write(PRNFileName,chr(27)+chr(81)+chr(65)+Money_String+chR(13)); //显示信息
CloseFile(PRNFileName);
end;
以下代码在VS2008中经过测试。不过请注意在C#中使用的均是unicode,如果Money_string涉及到复杂编码的情况该文本的输出编码格式你可能需要修改。public static void ShowMoney(string Money_Port, string Money_string)
{
using (StreamWriter sw = File.CreateText(Money_Port))
{
sw.Write((Char)12);
sw.Write((Char)27 + (Char)81 + (Char)65 + Money_string + (Char)13);
}
}static void Main(string[] args)
{
ShowMoney(@"E:\desktop\2xxx.txt", "sdf");
}