Ejemplo n.º 1
0
//---------------------------------------------------------------------------
__fastcall TLabelDetailForm::TLabelDetailForm(TComponent* Owner)
	: TForm(Owner)
{
	
	// window position and size
	ReadWindowBasicInformationFromIniFile("LabelDetail", this);
}
Ejemplo n.º 2
0
//---------------------------------------------------------------------------
__fastcall TLinkDetailForm::TLinkDetailForm(TComponent* Owner)
	: TForm(Owner)
{
	StopPlay();

	FReader = NULL;
	FMagnify = 0;
	FManager = NULL;
	LinkNum = 0;

	Dragging = false;
	BeforeOrAfter = false;
	FirstMouseDownPos = 0;
	FirstMouseDownX = 0;

	WaveAreaHasFocus = true;

	WaveAreaPanel->DoubleBuffered = true;
	PlayBeforePaintBoxPanel->DoubleBuffered = true;

	PlayBeforeLength = 0;
	PlayStartPos = 0;

	EditLinkAttribFrame->OnInfoChanged = EditLinkAttribFrameInfoChanged;
	EditLinkAttribFrame->OnEraseRedo   = EditLinkAttribFrameEraseRedo;

	BeforeLinkLabel->Font->Color = C_WAVE_B_FG_BASE;
	AfterLinkLabel ->Font->Color = C_WAVE_A_FG_BASE;

	UpdateLayout();
	UpdateDisplay();

	
	// window position and size
	ReadWindowBasicInformationFromIniFile("LinkDetail", this);

	// assign mainwindow's icon
	Icon->Assign(((TForm*)Owner)->Icon);
}