⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 unit1.cpp

📁 有视频
💻 CPP
字号:
//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop

#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
  int ii;
  AnsiString fieldname;
  if(!OpenDialog1->Execute())return;
//Table1初始化
  Table1->Active=False;
  Table1->TableName=OpenDialog1->FileName;
//  Table1->Active=True;
//Table2初始化
  Table2->Active=False;
  Table2->TableName="~temp";
//复制到临时文件
  BatchMove1->Source=Table1;
  BatchMove1->Destination=Table2;
  BatchMove1->Mappings->Clear();
  for(ii=0;ii<Table1->FieldCount;ii++)
  {
    fieldname=Table1->Fields->Fields[ii]->FieldName;
    BatchMove1->Mappings->Add(fieldname);
  }
  BatchMove1->Mode=batCopy;
  BatchMove1->Execute();
//从临时文件拷回
  Table1->Active=False;
  Table1->EmptyTable();
  BatchMove1->Source=Table2;
  BatchMove1->Destination=Table1;
  BatchMove1->Mode=batAppend;
  BatchMove1->Execute();
}
//---------------------------------------------------------------------------

⌨️ 快捷键说明

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