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 (18 years, 2 months ago)
File size:	985 byte(s)
Log Message:
#	Rev	Content
1	3	//---------------------------------------------------------------------------
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		//---------------------------------------------------------------------------