En este tema, exploraremos los conceptos fundamentales de la Programación Orientada a Objetos (POO) en Delphi/Object Pascal, centrándonos en las clases y los objetos. Estos son los bloques de construcción esenciales para cualquier aplicación orientada a objetos.

1. Clase: Una plantilla o modelo que define las propiedades y comportamientos (métodos) comunes a todos los objetos de ese tipo.
2. Objeto: Una instancia de una clase. Es una entidad concreta que tiene un estado y un comportamiento definido por su clase.
3. Propiedades: Atributos o datos que describen el estado de un objeto.
4. Métodos: Funciones o procedimientos que definen el comportamiento de un objeto.

En Delphi, una clase se define utilizando la palabra clave class. Aquí hay un ejemplo básico de una clase llamada TPerson:

• type: Define un nuevo tipo.
• TPerson = class: Declara una nueva clase llamada TPerson.
• private: Sección donde se declaran los campos privados de la clase. Estos campos solo son accesibles desde dentro de la clase.
  • FName: Un campo privado que almacena el nombre de la persona.
  • FAge: Un campo privado que almacena la edad de la persona.
• public: Sección donde se declaran los métodos y propiedades públicas de la clase. Estos son accesibles desde fuera de la clase.
  • constructor Create(Name: string; Age: Integer): Un constructor que inicializa una nueva instancia de TPerson.
  • procedure DisplayInfo: Un método que muestra la información de la persona.

Para crear un objeto de la clase TPerson, utilizamos el constructor definido en la clase:

• var Person: TPerson: Declara una variable Person de tipo TPerson.
• Person := TPerson.Create('John Doe', 30): Crea una nueva instancia de TPerson y la asigna a la variable Person.
• Person.DisplayInfo: Llama al método DisplayInfo del objeto Person.

A continuación, implementamos el constructor y el método DisplayInfo de la clase TPerson:

• constructor TPerson.Create(Name: string; Age: Integer): Implementa el constructor de la clase TPerson.
  • FName := Name: Asigna el valor del parámetro Name al campo privado FName.
  • FAge := Age: Asigna el valor del parámetro Age al campo privado FAge.
• procedure TPerson.DisplayInfo: Implementa el método DisplayInfo de la clase TPerson.
  • WriteLn('Name: ', FName): Muestra el nombre de la persona.
  • WriteLn('Age: ', FAge): Muestra la edad de la persona.

1. Define una clase TCar con las siguientes propiedades privadas:
   • FMake: Marca del coche (string).
   • FModel: Modelo del coche (string).
   • FYear: Año del coche (Integer).
2. Implementa un constructor que inicialice estas propiedades.
3. Implementa un método DisplayInfo que muestre la información del coche.

• TCar = class: Declara una nueva clase llamada TCar.
• private: Sección donde se declaran los campos privados de la clase.
  • FMake: Almacena la marca del coche.
  • FModel: Almacena el modelo del coche.
  • FYear: Almacena el año del coche.
• public: Sección donde se declaran los métodos y propiedades públicas de la clase.
  • constructor Create(Make, Model: string; Year: Integer): Un constructor que inicializa una nueva instancia de TCar.
  • procedure DisplayInfo: Un método que muestra la información del coche.
• Car := TCar.Create('Toyota', 'Corolla', 2020): Crea una nueva instancia de TCar y la asigna a la variable Car.
• Car.DisplayInfo: Llama al método DisplayInfo del objeto Car.

En esta sección, hemos aprendido los conceptos básicos de las clases y los objetos en Delphi/Object Pascal. Hemos visto cómo definir una clase, crear objetos y cómo implementar métodos. Estos conceptos son fundamentales para la Programación Orientada a Objetos y serán la base para temas más avanzados en los próximos módulos.