Class TfmNewReality

Unit

Declaration

type TfmNewReality = class()

Description

Fields

	Name	Description
	BitBtn1
	BitBtn2
	btnBarren
	btnDirty
	btnGrass
	btnWatery
	cbContinents
	cbFrozenPoles
	cbFuzzy
	cbHalo
	cbIslands
	cbSun
	edContinents
	edCreator
	edEnvironment
	edHeight
	edHumidity
	edIslands
	edLandHeight
	edPlanetRadius
	edTemp
	edTension
	edWater
	edWidth
	Label1
	Label2
	Panel1
	Panel10
	Panel11
	Panel12
	Panel13
	Panel14
	Panel15
	Panel16
	Panel17
	Panel18
	Panel19
	Panel2
	Panel20
	Panel21
	Panel22
	Panel23
	Panel24
	Panel25
	Panel26
	Panel27
	Panel3
	Panel4
	Panel5
	Panel6
	Panel7
	Panel8
	Panel9
	UpDownContinents
	UpDownHeight
	UpDownHumidity
	UpDownIslands
	UpDownLandHeight
	UpDownRadius
	UpDownTemp
	UpDownTension
	UpDownWater
	UpDownWidth

Methods

Overview

	procedure btnBarrenClick(Sender: TObject);
	procedure btnDirtyClick(Sender: TObject);
	procedure btnGrassClick(Sender: TObject);
	procedure btnWateryClick(Sender: TObject);
	procedure ExtractValues(aReality: AIReality);
	procedure UpDownContinentsClick(Sender: TObject; Button: TUDBtnType);
	procedure UpDownHeightClick(Sender: TObject; Button: TUDBtnType);
	procedure UpDownHumidityClick(Sender: TObject; Button: TUDBtnType);
	procedure UpDownIslandsClick(Sender: TObject; Button: TUDBtnType);
	procedure UpDownLandHeightClick(Sender: TObject; Button: TUDBtnType);
	procedure UpDownRadiusClick(Sender: TObject; Button: TUDBtnType);
	procedure UpDownTempClick(Sender: TObject; Button: TUDBtnType);
	procedure UpDownTensionClick(Sender: TObject; Button: TUDBtnType);
	procedure UpDownWaterClick(Sender: TObject; Button: TUDBtnType);
	procedure UpDownWidthClick(Sender: TObject; Button: TUDBtnType);

Description

procedure btnBarrenClick(Sender: TObject);

procedure btnDirtyClick(Sender: TObject);

procedure btnGrassClick(Sender: TObject);

procedure btnWateryClick(Sender: TObject);

procedure ExtractValues(aReality: AIReality);

Public declarations

procedure UpDownContinentsClick(Sender: TObject; Button: TUDBtnType);

procedure UpDownHeightClick(Sender: TObject; Button: TUDBtnType);

procedure UpDownHumidityClick(Sender: TObject; Button: TUDBtnType);

procedure UpDownIslandsClick(Sender: TObject; Button: TUDBtnType);

procedure UpDownLandHeightClick(Sender: TObject; Button: TUDBtnType);

procedure UpDownRadiusClick(Sender: TObject; Button: TUDBtnType);

procedure UpDownTempClick(Sender: TObject; Button: TUDBtnType);

procedure UpDownTensionClick(Sender: TObject; Button: TUDBtnType);

procedure UpDownWaterClick(Sender: TObject; Button: TUDBtnType);

procedure UpDownWidthClick(Sender: TObject; Button: TUDBtnType);