//---------------------------------------------------------------------------
#include?
#pragma?hdrstop

#include?“NeoWin.h“
#include?“main.h“

//---------------------------------------------------------------------------
#pragma?package（smart_init）
#pragma?resource?“*.dfm“
TNeoForm?*NeoForm;
//---------------------------------------------------------------------------
__fastcall?TNeoForm::TNeoForm（TComponent*?Owner）
????????:?TForm（Owner）
{
??Sizeable?=?true;
??FPopedMenuIndex?=?-1;
??FLastPopedMenuIndex?=?-1;
??FBorderMouseDown?=?false;
??FCaptionmousedown?=?false;

??Color?=?（TColor）0x00CFCFCF;
??CaptionLabel->Caption?=?TForm::Caption;
??MinImage->Visible?=?（BorderIcons.Contains（biMinimize））;
??MaxImage->Visible?=?（BorderIcons.Contains（biMaximize））;
}
//---------------------------------------------------------------------------
void?__fastcall?TNeoForm::FormCreate（Tobject?*Sender）
{
//
}
//---------------------------------------------------------------------------
void?__fastcall?TNeoForm::FormShow（Tobject?*Sender）
{
//
}
//---------------------------------------------------------------------------
void?__fastcall?TNeoForm::FormResize（Tobject?*Sender）
{
//
}
//---------------------------------------------------------------------------
void?__fastcall?TNeoForm::FormCanResize（Tobject?*Sender?int?&NewWidth
??????int?&NewHeight?bool?&Resize）
{
??if?（NewWidth???else
??{
????TRect?R;
????R?=?GetWorkAreaRect（）;
????if?（NewWidth?>?R.Width（））{?NewWidth?=?R.Width（）;?}//Resize?=?false;?}
????if?（NewHeight?>?R.Height（））{?NewHeight?=?R.Height（）;?}//Resize?=?false;?}
??}
}
//---------------------------------------------------------------------------
void?__fastcall?TNeoForm::WndProc（Messages::TMessage?&Message）
{
??inherited::WndProc（Message）;
??switch?（Message.Msg）
??{
????case?WM_SIZE:
??????switch?（Message.WParam）
??????{
????????case?SIZE_MAXIMIZED:
????????{
??????????if?（BorderIcons.Contains（biMaximize））
??????????{
????????????MaxImage->Visible?=?false;
????????????RestoreImage->Visible?=?true;
??????????}
??????????SetSizeableCursor（false）;
??????????break;
????????}
????????case?SIZE_MINIMIZED:
??????????break;
????????case?SIZE_RESTORED:
????????{
??????????if?（BorderIcons.Contains（biMaximize））
??????????{
????????????MaxImage->Visible?=?true;
????????????RestoreImage->Visible?=?false;
??????????}
??????????SetSizeableCursor（FSizeable）;
??????????break;
????????}
??????}//switch?（Message.wParam）
??????break;

????case?WM_ACTIVATE:
??????switch?（Message.WParamLo）
??????{
????????case?WA_ACTIVE:
????????case?WA_CLICKACTIVE:
????????{
??????????TopLeftImage->Picture?=?GetFTopLeftImage->Picture;
??????????TopCenterImage->Picture?=?GetFTopCenterImage->Picture;
??????????TopRightImage->Picture?=?GetFTopRightImage->Picture;
??????????TopPanel->Refresh（）;
??????????break;
????????}
????????case?WA_INACTIVE:

?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----

?????目錄??????????0??2003-07-01?09:19??Neowin

?????文件??????17368??2002-06-26?17:41??Neowin\NeoWin.cpp

?????文件?????458318??2002-06-26?17:41??Neowin\NeoWin.dfm

?????文件???????6497??1999-10-01?18:52??Neowin\NeoWin.h

?????目錄??????????0??2003-07-01?09:25??網絡跳棋

?????文件???????1210??2001-09-28?08:49??網絡跳棋\1.BMP

?????文件???????1270??2001-09-21?10:27??網絡跳棋\2.BMP

?????文件????????374??2001-09-21?10:28??網絡跳棋\3.BMP

?????文件????????246??2001-09-21?10:28??網絡跳棋\4.BMP

?????文件????????478??2001-09-28?11:27??網絡跳棋\5.BMP

?????文件????????477??2002-09-23?16:39??網絡跳棋\about.cpp

?????文件???????2038??2002-09-23?16:47??網絡跳棋\about.dfm

?????文件???????1012??2002-09-23?16:40??網絡跳棋\about.h

?????文件????????142??1999-06-16?06:43??網絡跳棋\A_DEL.BAT

?????文件???????1834??2001-09-15?13:13??網絡跳棋\BLUE.BMP

?????文件????????766??2001-03-03?12:53??網絡跳棋\ICO.ICO

?????文件??????20777??2002-09-23?16:43??網絡跳棋\main.cpp

?????文件?????156682??2003-07-01?09:15??網絡跳棋\main.dfm

?????文件???????5380??2002-09-23?16:43??網絡跳棋\main.h

?????文件???????1806??2001-09-15?13:13??網絡跳棋\RED.BMP

?????文件???????3649??2002-09-23?16:39??網絡跳棋\Tq.bpr

?????文件????????842??2002-09-23?16:39??網絡跳棋\TQ.cpp

?????文件????????876??2001-10-25?08:19??網絡跳棋\TQ.RES

?????文件?????109230??2001-09-05?08:32??網絡跳棋\標準.JPG

-----------?---------??----------?-----??----

???????????????791272????????????????????24