Object Pascal

From Wikipedia, the free encyclopedia

Object Pascal is an object oriented derivative of Pascal mostly known as the primary programming language of Borland Delphi. It is also known as the "Delphi programming language" when describing the dialect used by Borland Delphi.

Borland used the name "Object Pascal" for the programming language in the first versions of Borland Delphi, but later renamed it to the "Delphi programming language". However, compilers that claim to be Object Pascal compatible, are often trying to be compatible with Delphi source code.

Borland sells integrated development environments (IDEs) that compile the Delphi programming language to Microsoft Windows, the Microsoft .NET Framework and Linux. The open source Free Pascal project allows the language to be compiled for Mac OS X, Win64 and Windows CE.

1 Early history at Apple
2 The Borland years
- 2.1 Version 3
3 Compilers
4 Hello world example
5 See also
6 External links

[edit] Early history at Apple

Object Pascal is an extension to the Pascal programming language that was developed at Apple Computer by a team led by Larry Tesler in consultation with Niklaus Wirth, the inventor of Pascal. It is descended from an earlier attempt at an object-oriented version of Pascal called Clascal, which was available on the Lisa computer.

Object Pascal was needed in order to allow the creation of MacApp, an expandable Macintosh application framework that would now be called a class library. Object Pascal extensions and MacApp itself were done by Barry Hanes, Ken Doyle, Larry Rosenstein, and tested by Dan Allen. Larry Tesler oversaw the project which began in very early 1985 and became a product in 1986.

Apple dropped support for Object Pascal when they moved from Motorola 68K chips to IBM's PowerPC architecture in 1994.

[edit] The Borland years

In 1986, Borland introduced similar extensions, also called Object Pascal, to the Turbo Pascal product for the Macintosh, and in 1989 for Turbo Pascal 5.5 for DOS. When Borland refocused from DOS to Windows in 1994, they created a successor to Turbo Pascal, called Delphi and introduced a new set of extensions to create what is now known as the Delphi language. It featured an incompatible syntax using the keyword class in preference to object, the Create constructor and a virtual Destroy destructor (and negating having to call the New and Dispose procedures), properties, method pointers, and some other things. These were obviously inspired by the ISO working draft for object-oriented extensions, but many of the differences to Turbo Pascal's dialect (such as the draft's requirement that all methods be virtual) were ignored. The Delphi language continued to evolve throughout the years to support new language concepts such as 64-bit integers and dynamic arrays.

[edit] Version 3

Delphi 3.0 documentation says it works with Microsoft Windows 95, NT 3.51 (SP5+), or NT 4.0 Workstation. It came with a Delphi-edition of Install Shield Wizard. Depending on options installed, 50 to 170 MB of disk space on the developer's machine were required. Required hardware was shown as:

Windows 95; 80486 or better processor; 8Mb of system memory (12 recommended); VGA (640x480 pixel) or higher resolution monitor; CD-ROM drive; and a pointing device.
Windows NT; 80486 or better processor; 16Mb of system memory; VGA (640x480 pixel) or higher resolution monitor; CD-ROM drive; and a pointing device.

Version 3 had options for native database connectivity with Oracle, Sybase Db-Lib, Microsoft SQL Server, Informix, DB/2, and InterBase back-ends. Some packages were bundled with Borland's InterBase SQL which was supposed to run on either Windows 95 or NT. This development version of Interbase was limited to four simultaneous users.

A 16-bit version of Delphi compatible with Windows 3.1 was included.

[edit] Compilers

There are a number of compilers that are more or less compatible with the Object Pascal language from Delphi. Many of these exist because they enable the use of Object Pascal source code on specific platforms or have specific licenses.

Borland Delphi is probably the best known compiler. It targets Win16, Win32 and .net.
Borland Kylix is a Linux variant of Delphi, and only targets Intel 32-bit Linux using Qt.
Free Pascal A commandline compiler that aims source compatibility with the core feature set of both the Turbo Pascal and Delphi dialects. The current version is 2.0(.4), which are highly Delphi6/7 compatible. Operates on most x86 operating systems. Supports Linux, Mac OS and Mac OS X (including an Xcode implementation) on PowerPC family, and Linux on AMD64. SPARC and Acorn RISC Machine (ARM) architectures are working and formally released but not 100% end-user ready yet.
GNU Pascal (Separately distributed part of the GNU Compiler Collection) While formally not aimed at the Borland dialects of Pascal, it does contain a Borland Pascal compatibility mode, and is very slowly absorbing Delphi language features, though not yet directly suitable for recompiling large bodies of Delphi code. It is the most prolific compiler in terms of operating systems and processors though, and therefore deserves mentioning as a last resort.
InnerFuse is a Delphi interpreter for embedding in applications. It is rumoured to work with several of the alternatives too.
Virtual Pascal is a x86 32-bit Turbo Pascal and Delphi compatible compiler mainly aimed at OS/2 and Windows, though it developed a DOS+Extender and an experimental Linux cross-compiler too. The compiler is stuck on the level of about Delphi V2, and the site hasn't changed significantly in two years, and development of Virtual Pascal has stopped. Nevertheless, of the free alternatives, it is still the one with the best polished IDE and debugger though Free Pascal is getting nearer and nearer.
Chrome programming language. Chrome is an Object Pascal plug-in compiler for Visual Studio and as a native .NET/Mono command-line compiler. Target .NET and Mono platforms. Newest of the compiler options.

[edit] Hello world example

[edit] Apple's Object Pascal

 program ObjectPascalExample;

 type
   THelloWorld = object
     procedure Put;
   end;

 var
   HelloWorld: THelloWorld;

 procedure THelloWorld.Put;
 begin
   WriteLn('Hello, World!');
 end;

 begin
   New(HelloWorld);
   HelloWorld.Put;
   Dispose(HelloWorld);
 end.

[edit] Turbo Pascal's Object Pascal

 program ObjectPascalExample;

 type
   PHelloWorld = ^THelloWorld;
   THelloWorld = object
     procedure Put;
   end;

 var
   HelloWorld: THelloWorld;

 procedure THelloWorld.Put;
 begin
   WriteLn('Hello, World!');
 end;

 begin
   New(HelloWorld);
   HelloWorld^.Put;
   Dispose(HelloWorld);
 end.

[edit] Delphi's Object Pascal

 program ObjectPascalExample;

 type
   THelloWorld = class
     procedure Put;
   end;

 var
   HelloWorld: THelloWorld;

 procedure THelloWorld.Put;
 begin
   WriteLn('Hello, World!');
 end;

 begin
   HelloWorld := THelloWorld.Create;
   HelloWorld.Put;
   HelloWorld.Free;
 end.

[edit] Chrome's Object Pascal

-> Chrome programming language

 namespace ObjectPascalExample;

 interface

 type
   ConsoleApp = class
     class method Main;
   end;

   THelloWorld = class
     method Put;
   end;

 implementation

 method THelloWorld.Put;
 begin
   Console.WriteLine('Hello, World!');
 end;

 class method ConsoleApp.Main;
 begin
   var HelloWorld := new THelloWorld;
   HelloWorld.Put;
 end;

 end.