unit1.cpp

来自「C++Builder高级应用开发指南随书源码」· C++ 代码 · 共 32 行

//$$---- Property page CPP ---- (stPropertyPageSource)
//---------------------------------------------------------------------------

#include <vcl.h>
#pragma hdrstop
#include <atl\atlvcl.h>

#include <initguid.h>
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma link "CSPIN"
#pragma resource "*.dfm"
TPropertyPage1 *PropertyPage1;
//---------------------------------------------------------------------------
__fastcall TPropertyPage1::TPropertyPage1(Classes::TComponent *Component)
    : TPropertyPage(Component)
{
}
//---------------------------------------------------------------------------
void __fastcall TPropertyPage1::UpdatePropertyPage(void)
{
    long tmpL;
    edCount->Value = OleObject.OlePropertyGet(OLETEXT("Count"));
}
//---------------------------------------------------------------------------
void __fastcall TPropertyPage1::UpdateObject(void)
{
  // Update OleObjects from your controls
}
//---------------------------------------------------------------------------