Справочник функций и процедур Delphi: Self

  Навигация по первой букве:

A  B  C  D  E  F  G  H  I  J  K  L  M  N  O  P  Q  R  S  T  U  V  W  X  Y  Z

  Навигация по категории:

Compiler directives, Directives, Keywords / Types, Variables, Constants / Functions, Procedures

Self
Переменная
Скрытый параметр на метод - ссылка на содержание объекта System unit
  var Self : Class Type;


Описание
Переменная Self скрытый параметр для каждого метода в объекте. Он позволяет методу обратиться к объекту.

Это особенно важно, когда параметры метода такие же, как переменные класса, предназначенные для содержания этих переданных значений.
Похожие команды
As  Используется для приведения объектных ссылок

Class  Начинает объявление типа объектного класса

Function  Определяет подпрограмму, которая возвращает значение

Is  Проверяет, является ли объект потомком класса или его родителем

Procedure  Определяет подпрограмму, которая не возвращает значение

 
Пример кода : Установка нескольких свойств основной формы программы
// Полный код Модуля.
// -----------------------------------------------------------
// Вы должны поместить этот код в модуль с именем Unit1 и с формой
// названную Form1, которая имеет событие OnCreate названное FormCreate.

unit Unit1;

interface

uses
  Forms, Dialogs, Classes, Controls, StdCtrls, Windows;

type
  TForm1 = class(TForm)
    procedure FormCreate(Sender: TObject);
  end;

var
  Form1: TForm1;

implementation
{$R *.dfm} // Вложение определений формы

procedure TForm1.FormCreate(Sender: TObject);
begin
  // Использование Self для идентификации формы позволяя нам
  // установить некоторые атрибуты формы
  Self.Caption := 'Test program';
  Self.Visible := True;
end;

end.
Форма отобразится с загаловком:

Test Program
 


Последние добавленные на сайт исходники

TDictionary Custom Sort

Fast Watermark Sources

3D Designer

Sik Screen Capture

Patch Maker

Айболит (remote control)

 

ListBox Drag & Drop

Доска для игры Реверси

Графические эффекты

Рисование по маске

Перетаскивание изображений

Canvas Drawing

 

Copyright © 2004-2022 "Delphi Sources" by BrokenByte Software (источник – "DelphiBasics")

Группа ВКонтакте   Facebook   Ссылка на Twitter   Ссылка на Telegram