Let's look at the following steps:
- Perform the necessary steps to obtain a form like this (design time):
Figure 2.3: Form at design time
First of all, we have to give a correct representation (in terms of OOP) of the fields on the form.
- Declare the BO:
TCustomer = class(TObject) private FEmail: String; FLastname: String; FPassword: String; FFirstname: String; procedure SetEmail(const Value: String); procedure SetFirstname(const Value: String); procedure SetLastname(const Value: String); procedure SetPassword(const Value: String); public property Firstname: String read FFirstname write SetFirstname; property Lastname: ...
