// Borland C++ Builder
// Copyright (c) 1995, 1998 by Borland International
// All rights reserved

// (DO NOT EDIT: machine generated header) 'Kortti.pas' rev: 3.00

#ifndef KorttiHPP
#define KorttiHPP
#include <ExtCtrls.hpp>
#include <Dialogs.hpp>
#include <Forms.hpp>
#include <Controls.hpp>
#include <Graphics.hpp>
#include <Classes.hpp>
#include <Messages.hpp>
#include <Windows.hpp>
#include <SysUtils.hpp>
#include <SysInit.hpp>
#include <System.hpp>

//-- user supplied -----------------------------------------------------------

namespace Kortti
{
//-- type declarations -------------------------------------------------------
enum TNakyy { Piilossa, Selka, Kuva };

typedef void __fastcall (__closure *TKorttiMeth)(System::TObject* sender, TNakyy nakyy);

class DELPHICLASS TKortti;
class PASCALIMPLEMENTATION TKortti : public Extctrls::TPaintBox 
{
	typedef Extctrls::TPaintBox inherited;
	
private:
	int FArvo;
	TNakyy FNakyy;
	TKorttiMeth FOnFlip;
	
protected:
	virtual void __fastcall Paint(void);
	
public:
	__fastcall virtual TKortti(Classes::TComponent* AOwner);
	__fastcall virtual TKortti(Classes::TComponent* AOwner, int i);
	virtual void __fastcall SetArvo(int i);
	virtual void __fastcall SetNakyy(TNakyy n);
	virtual void __fastcall Lataa(void);
	virtual int __fastcall SortValue(void);
	
__published:
	__property int Arvo = {read=FArvo, write=SetArvo, nodefault};
	__property TNakyy Nakyy = {read=FNakyy, write=SetNakyy, nodefault};
	__property TKorttiMeth OnFlip = {read=FOnFlip, write=FOnFlip};
public:
	/* TGraphicControl.Destroy */ __fastcall virtual ~TKortti(void) { }
	
};

class DELPHICLASS TKuvaKortti;
class PASCALIMPLEMENTATION TKuvaKortti : public Kortti::TKortti 
{
	typedef Kortti::TKortti inherited;
	
private:
	System::AnsiString FTausta;
	Controls::TImageList* FImageList;
	
protected:
	virtual void __fastcall Paint(void);
	
public:
	__fastcall virtual TKuvaKortti(Classes::TComponent* AOwner, int i);
	virtual void __fastcall Lataa(void);
	virtual void __fastcall LoadBmp(Graphics::TBitmap* bmp, System::AnsiString name);
	virtual System::AnsiString __fastcall Tiedosto();
	
__published:
	__property System::AnsiString Tausta = {read=FTausta, write=FTausta};
public:
	/* TKortti.Create */ __fastcall virtual TKuvaKortti(Classes::TComponent* AOwner) : Kortti::TKortti(
		AOwner) { }
	
public:
	/* TGraphicControl.Destroy */ __fastcall virtual ~TKuvaKortti(void) { }
	
};

enum TMaa { Ruutu, Hertta, Risti, Pata };

class DELPHICLASS TPeliKortti;
class PASCALIMPLEMENTATION TPeliKortti : public Kortti::TKuvaKortti 
{
	typedef Kortti::TKuvaKortti inherited;
	
private:
	TMaa FMaa;
	
public:
	__fastcall virtual TPeliKortti(Classes::TComponent* AOwner);
	__fastcall virtual TPeliKortti(Classes::TComponent* AOwner, int i, TMaa maa);
	virtual void __fastcall SetArvo(int i);
	virtual void __fastcall SetMaa(TMaa m);
	virtual System::AnsiString __fastcall Tiedosto();
	virtual int __fastcall SortValue(void);
	
__published:
	__property TMaa Maa = {read=FMaa, write=SetMaa, nodefault};
public:
	/* TKuvaKortti.Create2 */ __fastcall virtual TPeliKortti(Classes::TComponent* AOwner, int i) : Kortti::
		TKuvaKortti(AOwner, i) { }
	
public:
	/* TGraphicControl.Destroy */ __fastcall virtual ~TPeliKortti(void) { }
	
};

//-- var, const, procedure ---------------------------------------------------
extern PACKAGE void __fastcall Register(void);

}	/* namespace Kortti */
#if !defined(NO_IMPLICIT_NAMESPACE_USE)
using namespace Kortti;
#endif
//-- end unit ----------------------------------------------------------------
#endif	// Kortti