在DWScript中,可以通过以下步骤来初始化对象:
type
Person = class
private
FName: string;
FAge: Integer;
public
property Name: string read FName write FName;
property Age: Integer read FAge write FAge;
constructor Create(AName: string; AAge: Integer);
procedure SayHello;
end;
constructor Person.Create(AName: string; AAge: Integer);
begin
FName := AName;
FAge := AAge;
end;
procedure Person.SayHello;
begin
WriteLn('Hello, my name is ' + FName + ' and I am ' + IntToStr(FAge) + ' years old.');
end;
var
person: Person;
begin
person := Person.Create('John', 25);
person.SayHello;
// 输出:Hello, my name is John and I am 25 years old.
// 使用完对象后,记得释放内存
person.Free;
end;
在上述代码中,首先使用Person.Create
方法创建一个Person对象,并传入初始化参数。然后,可以通过对象的属性和方法来操作对象。最后,使用person.Free
释放对象所占用的内存。
需要注意的是,在使用完对象后,应该及时释放对象所占用的内存,以避免内存泄漏。可以通过调用对象的Free
方法来实现内存释放。
推荐的腾讯云相关产品和产品介绍链接地址:
领取专属 10元无门槛券
手把手带您无忧上云