Розьніца паміж вэрсіямі «Кляса (праграмаваньне)»

→‎Прыклады: +Delphi + Oberon
д (robot Adding: en:Class (computer science))
(→‎Прыклады: +Delphi + Oberon)
== Прыклады ==
 
=== [[С++]] ===
 
#include <iostream>
}
 
Гэты прыклад паказвае, як на [[C++]] стварыць кляс з назвай «Hello». Ён мае прыватнае радковае поле з назвай «what» і агульны мэтад з назвай «say».
 
=== [[Java]] ===
 
==== Прыклад 1 ====
}
 
Гэты прыклад паказвае, як апісаць самы просты [[Java]]-кляс.
 
==== Прыклад 2 ====
Гэты прыклад паказвае кляс, які мае вызначаны канструктар, адно поле дадзеных, мэтад атрыманьня доступу да дадзеных (getData) і мэтад зьмяненьня дадзеных (setData) для поля. Ён пашырае кляс, прыведзены ў папярэднім прыкладзе. У Java усе клясы аўтаматычна пашыраюць кляс Object. Гэта стварае магчымаць пісаць унівэрсальны код, які можа працаваць з аб'ектамі любога тыпу.
 
=== [[PHP]] ===
==== Прыклад 1 ====
<?php
?>
 
=== [[C#]] ===
==== Прыклад 1 ====
using System;
 
Гэта згаданы вышэй прыклад на мове C++, перапісаны на мове C#. Кляс, які называецца Hello, ствараецца канструктарам, які прымае радковы парамэтар. Калі выклікаецца мэтад Say(), экзэмпляр кляса Hello выведзе «Hello {what}!» на кансоль. Тут варта зьвярнуць увагу на тое, што мэтад Main() (кропка ўваходу) утрымліваецца ў самім клясе.
 
=== Object Pascal/[[Delphi]] ===
type
THello = class(TObject)
private
FWhat: string;
public
procedure Hello(s:string);
procedure Say
end;
procedure THello.Hello(s:string);
begin
FWhat := s;
end;
procedure THello.Say;
begin
WriteLn('Hello '+FWhat+'!');
end;
procedure SayHello;
begin
with THello.Create do
begin
Hello('world');
Say;
Free
end
end;
 
=== [[Oberon-2]] ===
TYPE
HelloObj = RECORD
what: ARRAY 32 OF CHAR
END;
PROCEDURE (hello:HelloObj) Hello(s: ARRAY OF CHAR)
BEGIN
COPY(what, s);
RETURN
END Add;
PROCEDURE (hello:HelloObj) Say(s: ARRAY OF CHAR)
BEGIN
InOut.WriteStr(what);
RETURN
END Add;
 
[[Катэгорыя:Праграмаваньне]]
1501

зьмена