Object Pascal

Матеріал з Вікіпедії — вільної енциклопедії.

Object Pascal - це об'єктно-орієнтований нащадок мови програмування Pascal, більш відомий як основна мова програмування середовища CodeGear Delphi. Компілятори Pascal'я, включно і для Object Pascal, в основному працюють дуже швидко, генеруючи дуже добре оптимізований код.

Borland використала назву "Object Pascal" для мови програмування у перших версіях Delphi, проте пізніше назвала її "мовою програмування Delphi". Однак, компілятори, що заявлені як Object Pascal-сумісні, дуже часто намагаєьтся бути сумісними із вихідними кодами Delphi.

CodeGear продає інтегровані середовища розробки, що підтримують мову програмування Delphi, здатні компілювати під Microsoft Windows, Microsoft .NET Framework та Linux. Open source-проект Free Pascal підтримує цілий ряд операційних систем включаючи Linux, Mac OS/Mac OS X, Win32, Win64, Windows CE, та для кількох різних архітектур. Також розроблений вільний компілятор Turbo51 програмування для чіпів Intel 8051.

Тож тепер термін Object Pascal використовується для позначення різних об'єктно-орієнтовних діалектів мови Pascal, які в основному сумісні з реалізацією компанії CodeGear.

[ред.] Компілятори

Є багато компіляторів, які в основному сумісні з Object Pascal, який використовувався в Delphi. Вони дозволяють будувати програми на Object Pascal під різноманітними платформи та підпадають під різні ліцензії.

• CodeGear Delphi є мабуть найбільш відомим компілятором. Дозволяє компілювати для Win16 (Delphi 1), Win32 (Delphi 2+) та для .NET 1.x, 2.0 (Delphi 8, Delphi 2005 - 2007).
• Borland Kylix - це варіант Delphi для Linux.
• Free Pascal
• GNU Pascal
• Virtual Pascal
• Oxygene
• MIDletPascal
• PocketStudio

[ред.] Приклади програми «Hello, world!»

[ред.] Object Pascal (Apple)

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.

[ред.] Object Pascal (Turbo Pascal)

program ObjectPascalExample;
 
   type
      PHelloWorld = ^THelloWorld;
      THelloWorld = object
         procedure Put;
      end;
 
   var
      HelloWorld: PHelloWorld; { це вказівник на THelloWorld }
 
   procedure THelloWorld.Put;
   begin
      WriteLn('Hello, World!');
   end;
 
begin
   New(HelloWorld);
   HelloWorld^.Put;
   Dispose(HelloWorld);
end.

[ред.] Object Pascal (Delphi та Free Pascal)

program ObjectPascalExample;
 
type
  THelloWorld = class
    procedure Put;
  end;
 
procedure THelloWorld.Put;
begin
  Writeln('Hello, World!');
end;
 
var
  HelloWorld: THelloWorld;               { це неявний вказівник }
 
begin
  HelloWorld := THelloWorld.Create;      { конструктор повертає вказівник }
  HelloWorld.Put;                        { розіменування вказівника}
  HelloWorld.Free;
end.

[ред.] Object Pascal (Oxygene)

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.

[ред.] Дивіться також

• Об'єктно-орієнтоване програмування

[ред.] Посилання

• Домашня сторінка CodeGear Delphi. (англ.)