Uno escucha la frase «lenguaje Object Pascal» y piensa que es un lenguaje de programación de por allá de los 90, cuando los computadores eran unas cajas grandes. Lo cierto es que, el lenguaje Object Pascal aún está en vigencia, pues se usa en Delphi, Free Pascal y Lazarus. Esto nos indica que es un lenguaje bastante potente del que vale la pena aprender. Por eso, voy a explicarte qué es y para qué lo puedes utilizar, en caso de que se te ofrezca para algún proyecto.
¿Qué es el lenguaje Object Pascal?
El Object Pascal es un lenguaje de programación que surgió como una versión mejorada del Pascal. Apple lo creó en los años 80, pero fue Borland quien lo hizo realmente popular gracias a sus herramientas de desarrollo como Turbo Pascal y Delphi.
Un equipo dirigido por Larry Tesler, con la colaboración de Niklaus Wirth (quien creó Pascal), desarrolló Object Pascal para agregar la programación orientada a objetos a Pascal. La idea era que sirviera para crear aplicaciones en Macintosh, permitiendo un software más modular, reutilizable y fácil de mantener.
Escribiendo código en Object Pascal
Veamos cómo se ve un «Hola Mundo» en el lenguaje Object Pascal. De hecho, puedes usar este código en Object Pascal y te funcionará.
program HolaMundo;
begin
WriteLn('¡Hola, mundo desde Object Pascal!');
end.¿Para qué se utiliza Object Pascal?
Como te dije, el lenguaje Object Pascal sigue siendo bastante útil en distintos ámbitos del desarrollo de software. Aquí voy a mostrarte sus usos más comunes con ejemplos prácticos para que los pruebes de una vez.
Desarrollo de aplicaciones de escritorio
Uno de los usos más populares de Object Pascal es la creación de aplicaciones de escritorio con Delphi y Lazarus. Su enfoque en el desarrollo rápido de aplicaciones (RAD) permite diseñar interfaces gráficas de manera sencilla.
Ejemplo:
Con este código crearás una ventana con un botón y, al hacer clic, se mostrará un mensaje emergente.
unit Unit1;
{$mode objfpc}{$H+}
interface
uses
Classes, SysUtils, Forms, Controls, Graphics, Dialogs, StdCtrls;
type
TForm1 = class(TForm)
Button1: TButton;
procedure Button1Click(Sender: TObject);
end;
var
Form1: TForm1;
implementation
{$R *.lfm}
procedure TForm1.Button1Click(Sender: TObject);
begin
ShowMessage('¡Hola desde Object Pascal!');
end;
end.
Manejo de bases de datos
Con Object Pascal y la biblioteca FireDAC, puedes conectar aplicaciones a bases de datos como MySQL, PostgreSQL o SQLite. Créeme que es bastante bueno para crear software de gestión, ERPs o sistemas de control de inventarios.
Ejemplo:
Ahora vas a conectar a una base de datos SQLite y realizar una consulta. Mira que este código conecta una aplicación a una base de datos SQLite y muestra una lista de nombres de usuarios.
uses
FireDAC.Comp.Client, FireDAC.Stan.Def, FireDAC.Phys.SQLite, FireDAC.DApt;
var
Conexion: TFDConnection;
Consulta: TFDQuery;
begin
Conexion := TFDConnection.Create(nil);
try
Conexion.DriverName := 'SQLite';
Conexion.Params.Database := 'mi_base_de_datos.db';
Conexion.Connected := True;
Consulta := TFDQuery.Create(nil);
Consulta.Connection := Conexion;
Consulta.SQL.Text := 'SELECT nombre FROM usuarios';
Consulta.Open;
while not Consulta.Eof do
begin
WriteLn('Usuario: ' + Consulta.FieldByName('nombre').AsString);
Consulta.Next;
end;
finally
Consulta.Free;
Conexion.Free;
end;
end.
Desarrollo web con Pascal Server Pages (PSP)
Aunque no es su uso más común, el lenguaje Object Pascal también permite desarrollar aplicaciones web usando Pascal Server Pages (PSP) o WebBroker en Delphi.
Ejemplo:
Vas a generar una página web con Pascal Server Pages. Verás que este programa genera una página HTML dinámica usando Object Pascal.
program WebApp;
uses
PSP, SysUtils;
begin
WriteLn('<html>');
WriteLn('<head><title>Mi primera página web en Pascal</title></head>');
WriteLn('<body>');
WriteLn('<h1>¡Hola desde Object Pascal en la web!</h1>');
WriteLn('</body>');
WriteLn('</html>');
end.
Creación de utilidades y automatización de tareas
El lenguaje Object Pascal es ideal para automatizar procesos y crear pequeñas herramientas que faciliten el trabajo en el día a día.
Ejemplo:
Aquí verás cómo leer y escribir en un archivo de texto. Mira cómo este programa crea un archivo de texto, escribe en él y luego lo lee.
program ManejoDeArchivos;
var
Archivo: TextFile;
Texto: string;
begin
AssignFile(Archivo, 'archivo.txt');
Rewrite(Archivo);
WriteLn(Archivo, 'Este es un archivo generado en Object Pascal.');
CloseFile(Archivo);
Reset(Archivo);
ReadLn(Archivo, Texto);
WriteLn('El archivo contiene: ', Texto);
CloseFile(Archivo);
end.
Práctica: Crea tu primer programa en Object Pascal
Ahora que ya sabes para qué se usa el lenguaje Object Pascal, te reto a que escribas tu primer programa.
Ejercicio: Escribe un programa que pida el nombre del usuario y lo salude.
program SaludoPersonalizado;
var
nombre: string;
begin
Write('¿Cuál es tu nombre? ');
ReadLn(nombre);
WriteLn('¡Hola, ', nombre, '!');
end.
Prueba este código en el sandbox o en Lazarus y dime si te funcionó. Además, anímate a conocer los lenguajes de programación más usados, en caso de que quieras usar alguno.
Si quieres aprender a programar con tecnologías actuales, en el Bootcamp Desarrollo Web te enseñamos desde los fundamentos hasta desarrollo avanzado con lenguajes modernos. Descubre el mundo de la programación y da el siguiente paso en tu carrera tecnológica. ¡Únete ahora!
