分数很少,请问一个初学者级的有关问题,99%的人都会

分数很少,请教一个菜鸟级的问题,99%的人都会
我是菜鸟,我需要写一个简单的类.
这个类名字叫  

ClassData

他的作用就是,
有3个整型的成员变量   n1,   n2,   n3

需要6个成员函数   分别是set和get这三个成员函数
比如GetN1   SetN2
GetN2   SetN2
GetN3     SetN3


请知道的告诉我一下,这个类怎么写?
然后我在创建这个类的实例和怎么销毁这个类的实例?

非常感谢!!

------解决方案--------------------
type
TClassData = class
private
n1, n2, n3: Integer;
public
function GetN1: Integer;
function GetN2: Integer;
function GetN3: Integer;
procedure SetN1(Value: Integer);
procedure SetN2(Value: Integer);
procedure SetN3(Value: Integer);
end;

{ TClassData }

function TClassData.GetN1: Integer;
begin
Result := n1;
end;

function TClassData.GetN2: Integer;
begin
Result := n2;
end;

function TClassData.GetN3: Integer;
begin
Result := n3;
end;

procedure TClassData.SetN1(Value: Integer);
begin
if n1 <> Value then
n1 := Value;
end;

procedure TClassData.SetN2(Value: Integer);
begin
if n2 <> Value then
n2 := Value;
end;

procedure TClassData.SetN3(Value: Integer);
begin
if n3 <> Value then
n3 := Value;
end;