VMM/win32/log.cpp

//---------------------------------------------------------------------------

#include <vcl.h>
#pragma hdrstop

#include "log.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
Twinlog *winlog;
//---------------------------------------------------------------------------
__fastcall Twinlog::Twinlog(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall Twinlog::FormClose(TObject *Sender, TCloseAction &Action)
{
Action=caFree;        
}
//---------------------------------------------------------------------------


void Twinlog::ajouter(char *mess)
{
Memo1->Lines->Add(mess); 
}

Revision:	253
Committed:	Tue Jul 13 19:40:46 2010 UTC (15 years, 1 month ago) by francois
File size:	782 byte(s)
Log Message:	changement de hiearchie et utilisation de ccmake + mise a jour
#	Rev	Content
1	5	//---------------------------------------------------------------------------
2
3		#include <vcl.h>
4		#pragma hdrstop
5
6		#include "log.h"
7		//---------------------------------------------------------------------------
8		#pragma package(smart_init)
9		#pragma resource "*.dfm"
10		Twinlog *winlog;
11		//---------------------------------------------------------------------------
12		__fastcall Twinlog::Twinlog(TComponent* Owner)
13		: TForm(Owner)
14		{
15		}
16		//---------------------------------------------------------------------------
17		void __fastcall Twinlog::FormClose(TObject *Sender, TCloseAction &Action)
18		{
19		Action=caFree;
20		}
21		//---------------------------------------------------------------------------
22
23
24		void Twinlog::ajouter(char *mess)
25		{
26		Memo1->Lines->Add(mess);
27		}
28