Delphi - Objektni Pascal, OOP

Objektni Pascal je programski jezik koji se koristi u Delphi programskom okruženju. Vrlo je sličan Turbo Pascal-u, samo što je Borland dodao neke mogućnosti. Objektni Pascal je, što i samo ime kaže, objektno orijentisan jezik.

Ideja objektno-orijentisanog programiranja je da se i podaci i program smeste u jedan "kontejner". Ovaj kontejner nazivamo objekat. U strukturnom programiranju jednu deklaraciju bi izveli na sledeći način:

var
  MojByte: Byte;
  Naziv: String;
procedure UradiNesto;
function Neka: Byte;

Sve ovo bi mogli da smestimo u jedan objekt. Objekat deklarišemo navodeći "object"- naredbu:

type
  PMojObject = ^TObject;
  TMojObject = object
    MojByte: Byte;
    Naziv: String;
    procedure UradiNesto;
    function Neka: byte;
end;

Ovo nije zapravo objekat, ovo je u stvari novi tip podataka (šablon). Ovaj šablon možete koristiti da kreirate različite objekte. To se radi na sledeći način:

var
  MojObject: PMyObject;
begin
  MojObject:= TMojObject.Create;
//...
  MojObject.Free;
end.

"MojObject" je ono sa čim ćete raditi. Takođe, potrebno je da kažete Delphi-ju da kreira objekt (kreiranje se naziva constructor). Na ovaj način se rezerviše potrebna radna memorija. Kada ste završili sa korišćenjem nekog objekta, potrebno je da oslobodite memoriju korišćenjem MojObject.Free; (free je destructor).

Ono što objekte čini moćnim je to što oni mogu da "naslede" varijable i metode (constructors, destructors, functions i procedures) od drugih objekata. Ovo znači da, ako vam je potrebno da starom objektu (MojObject) dodate neku novu osobinu, npr. NovaOsobina: String, iskoristite nasleđivanje. Novi objekt će naslediti sve osobine drugog i biće mu dodate neke nove:

type
  TMojDrugiObject = object(TMojObject)
    NovaOsobina: String;
end;

Znači, nije potrebno ponovo programirati ceo objekat.