Class TfmPhotograph

Unit

Declaration

type TfmPhotograph = class()

Description

Fields

	Name	Description
	BitBtn1
	BitBtn2
	btnPhotograph
	btnThumbnail
	cbCreateThumbnail
	edName
	edPhotograph
	edPhotoHeight
	edPhotoWidth
	edThumbHeight
	edThumbnail
	edThumbWidth
	Label1
	Label2
	Label3
	Label4
	Label5
	Label6
	Label7
	Panel1
	Panel2
	Panel4
	SaveDialog

Methods

Overview

	procedure btnPhotographClick(Sender: TObject);
	procedure btnThumbnailClick(Sender: TObject);
	procedure edNameChange(Sender: TObject);
	procedure FormShow(Sender: TObject);

Description

procedure btnPhotographClick(Sender: TObject);

procedure btnThumbnailClick(Sender: TObject);

procedure edNameChange(Sender: TObject);

procedure FormShow(Sender: TObject);

Properties

Overview

	property Name: string;
	property Photodir: string;

Description

property Name: string;

Public declarations

property Photodir: string;