REPOS_ERICCA/mesh/s_valeur.cpp

//---------------------------------------------------------------------------
#include <vcl\vcl.h>
#pragma hdrstop

#include "s_valeur.h"
#include "fenetre.h"
//---------------------------------------------------------------------------
#pragma resource "*.dfm"
TValeur *Valeur;
//---------------------------------------------------------------------------
__fastcall TValeur::TValeur(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TValeur::Button1Click(TObject *Sender)
{
Valeur->Close();        
}
//---------------------------------------------------------------------------
void __fastcall TValeur::FormShow(TObject *Sender)
{
Valeur->Font->Color=clWindowText;
Valeur->Edit1->Font->Color=clWindowText;
Valeur->Label1->Caption=Fenp->info;
Valeur->Left=Fenp->Left+57;
Valeur->Top=Fenp->Top+101;
}
//---------------------------------------------------------------------------
Revision:	3
Committed:	Tue Jun 12 12:42:51 2007 UTC (17 years, 11 months ago)
File size:	985 byte(s)
Log Message:
#	Content
1	//---------------------------------------------------------------------------
2	#include <vcl\vcl.h>
3	#pragma hdrstop
4
5	#include "s_valeur.h"
6	#include "fenetre.h"
7	//---------------------------------------------------------------------------
8	#pragma resource "*.dfm"
9	TValeur *Valeur;
10	//---------------------------------------------------------------------------
11	__fastcall TValeur::TValeur(TComponent* Owner)
12	: TForm(Owner)
13	{
14	}
15	//---------------------------------------------------------------------------
16	void __fastcall TValeur::Button1Click(TObject *Sender)
17	{
18	Valeur->Close();
19	}
20	//---------------------------------------------------------------------------
21	void __fastcall TValeur::FormShow(TObject *Sender)
22	{
23	Valeur->Font->Color=clWindowText;
24	Valeur->Edit1->Font->Color=clWindowText;
25	Valeur->Label1->Caption=Fenp->info;
26	Valeur->Left=Fenp->Left+57;
27	Valeur->Top=Fenp->Top+101;
28	}
29	//---------------------------------------------------------------------------