feng.cpp

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

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

#include <vcl.h>
#pragma hdrstop

#include "feng.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TSplashForm *SplashForm;
Graphics::TBitmap *bmp;
//---------------------------------------------------------------------------
__fastcall TSplashForm::TSplashForm(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------

void __fastcall TSplashForm::FormCreate(TObject *Sender)
{
bmp=new Graphics::TBitmap();
AnsiString strname=ExtractFileDir(Application->ExeName);
bmp->LoadFromFile(strname+"\\splash.bmp");

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


void __fastcall TSplashForm::FormClose(TObject *Sender,
      TCloseAction &Action)
{
delete bmp;        
}
//---------------------------------------------------------------------------

void __fastcall TSplashForm::FormPaint(TObject *Sender)
{
Image1->Canvas->Draw(0,0,bmp);        
}
//---------------------------------------------------------------------------

void __fastcall TSplashForm::FormShow(TObject *Sender)
{
Image1->Canvas->Draw(0,0,bmp);        
}
//---------------------------------------------------------------------------