apuedit.cpp

来自「民航飞机生产管理系统,实现了飞机定检坚控,小时卡起落卡等的坚控,并能生成工作任务」· C++ 代码 · 共 61 行

//---------------------------------------------------------------------------

#include <vcl.h>
#pragma hdrstop

#include "apuedit.h"
#include "main.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma link "KsSkinButtons"
#pragma link "KsSkinForms"
#pragma link "KsSkinLabels"
#pragma link "KsSkinPanels"
#pragma link "ksskinstdcontrol"
#pragma link "KsSkinTabs"
#pragma link "se_controls"
#pragma resource "*.dfm"
TForm20 *Form20;
extern AnsiString lujing;
//---------------------------------------------------------------------------
__fastcall TForm20::TForm20(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm20::FormCreate(TObject *Sender)
{
  Memo1->Lines->LoadFromFile(lujing+"plane.txt");
  Memo2->Lines->LoadFromFile(lujing+"apu.txt");
  Memo3->Lines->LoadFromFile(lujing+"starter.txt");
   Memo4->Lines->LoadFromFile(lujing+"lefteng.txt");
  Memo5->Lines->LoadFromFile(lujing+"righteng.txt");
  Memo6->Lines->LoadFromFile(lujing+"apusn.txt");

}
//---------------------------------------------------------------------------
void __fastcall TForm20::Button1Click(TObject *Sender)
{
Memo1->Lines->SaveToFile(lujing+"plane.txt");
Memo2->Lines->SaveToFile(lujing+"apu.txt");
Memo3->Lines->SaveToFile(lujing+"starter.txt");
Memo4->Lines->SaveToFile(lujing+"lefteng.txt");
Memo5->Lines->SaveToFile(lujing+"righteng.txt");
Memo6->Lines->SaveToFile(lujing+"apusn.txt");

Close();
}
//---------------------------------------------------------------------------
void __fastcall TForm20::Button2Click(TObject *Sender)
{
 Memo1->Lines->LoadFromFile(lujing+"plane.txt");
  Memo2->Lines->LoadFromFile(lujing+"apu.txt");
  Memo3->Lines->LoadFromFile(lujing+"starter.txt");
  Memo4->Lines->LoadFromFile(lujing+"lefteng.txt");
  Memo5->Lines->LoadFromFile(lujing+"righteng.txt");
  Memo6->Lines->LoadFromFile(lujing+"apusn.txt");

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