1,221
社区成员
发帖
与我相关
我的任务
分享
pt->text="lpt1";
void __fastcall TForm1::bsSkinButton1Click(TObject *Sender)
{
FILE * fp;
fp=fopen(pt->Text.c_str(),"wb+");
if(fp==NULL)
{
ShowMessage("端口打开失败!");
return;
}
else
{
fputc(27,fp);
fputc(112,fp);
fputc(0,fp);
fputc(128,fp);
fputc(128,fp);
fclose(fp);
}
}