Скачать: CL | DM;

Как из процедуры обратится к классу?   Найти похожие ветки 

← →
CrowD ©   (2002-10-24 17:34) [0]

Привет, All!
как обратится к классу из функций и процедур этого класса, пример
(~~~~
unit Unit1;

interface

uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls;

type c_Class1 = class
x,y : integer;
procedure Proc;
end;

TForm1 = class(TForm)
Button1: TButton;
private
{ Private declarations }
public
Class1 : c_Class1;
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.DFM}

procedure c_Class1.Proc;
var
i : integer;
begin
i := Class1.x;
...
end;

end.
~~~~)
как обратится к объекту Class1?

Спасибо.

---

← →
MBo ©   (2002-10-24 17:43) [1]

Вообще-то self, но в методах класса это подразумевается автоматически и просто
i:=x;

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.44 MB
Время: 0.013 c