mainform.cpp

来自「C++ BUILDER精彩编程实例集锦(源码)3 第五部分 系统编程 第六部」· C++ 代码 · 共 56 行

CPP
56
字号
//---------------------------------------------------------------------------

#include <vcl.h>
#pragma hdrstop

#include "MainForm.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
  this->Memo1->Text="";
}
//---------------------------------------------------------------------------
void __fastcall TForm1::BitBtn1Click(TObject *Sender)
{
   this->Memo1->Text="";
   int i=0,j=0;
   Table1->First();
   for(i=0;i<Table1->RecordCount;i++)
   {
     AnsiString StrRecord="";
     for(j=0;j<Table1->FieldCount;j++)
     {
       StrRecord+=Table1->Fields->Fields[j]->AsString+"\t";
     }
     Memo1->Lines->Add(StrRecord);
     Table1->Next();
   }
   try
   {
   this->Memo1->Lines->SaveToFile("C:\\BCText.txt");
   }
   catch(...)
   {
     MessageBox(NULL,"文件已经存在!","信息提示",MB_OK);
     return;
   }

}
//---------------------------------------------------------------------------

void __fastcall TForm1::BitBtn2Click(TObject *Sender)
{
    this->Table1->Close();
    this->Table1->DatabaseName="C:\\";
    this->Table1->TableType=ttASCII;
    this->Table1->TableName="C:\\BCText.txt";
    this->Table1->Open();
}
//---------------------------------------------------------------------------

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?