mainform.cpp

来自「C++ BUILDER精彩编程实例集锦(源码)2 第三部分 文件操作 第四部」· C++ 代码 · 共 34 行

//---------------------------------------------------------------------------
//Filename: Mainform.cpp
#include <vcl.h>
#pragma hdrstop

#include "Mainform.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm1::BitBtn1Click(TObject *Sender)
{
  mciSendString("open Clock.avi alias video", NULL,0, 0);
  mciSendString("window video handle 0", NULL,0, 0);
  mciSendString("window video state show maximized", NULL,0, 0);
  mciSendString("play video notify", NULL, 0, Handle);
/*
  mciSendString("open Clock.avi type avivideo alias video", NULL,0, 0);
  mciSendString("set video time format ms", NULL,0, 0);
  mciSendString("play video from 0", NULL, 0, 0);
*/
}
//---------------------------------------------------------------------------
void __fastcall TForm1::mciNotify(TMessage& Msg)
{
  mciSendString("close video", NULL,0, 0);
}