Class..Object (Java and Delphi Cross Reference Guide)

//Declare class.

public class Cyborg {

  //Fields.

  private String cyborgName;

  private int age;

  //Constructor.

  public Person() {

  cyborgName = "unknown";

  age = 0;

  }

}

//Create object from class.

Cyborg p = new Cyborg();

p.getClass(); //From the Object base class.

//Interface section:

TCyborg = class(TObject)
public
 procedure IntroduceYourself;
end;

//Implementation section;

procedure TCyborg.IntroduceYourself;
begin
 ShowMessage('Hi, I do not have a name yet.');
end;

//Some event like a button click:

var
  T1: TCyborg;
begin
  T1 := T1.Create;
  T1.IntroduceYourself;

  FreeAndNil(T1);      //Be sure to clean up!
end;