Index

Adam Boduch

index - słowo kluczowe języka Delphi

Eksportowanie funkcji

Słowo kluczowe używane podczas eksportowania procedur oraz funkcji z biblioteki DLL. Eksportować funkcje oraz procedury można na dwa sposoby: przez nazwę oraz przez indeks.

Wyeksportowanie procedury czy też funkcji poprzez indeks polega jedynie na użyciu dyrektywy index.

exports
  About index 1,
  SomeFunc index 2;

Jeśli w takim wypadku chcemy wykorzystać owe funkcje, należałoby w naszej aplikacji zapamiętać indeksy, z jakimi są one eksportowane z biblioteki DLL. Łatwiej jest jednak zapamiętać nazwy niż cyfry, stąd eksportowanie przez indeks jest używane dość rzadko.

Właściwości klas

Słowo kluczowe index jest używane także przy definiowaniu właściwości klas, które są odczytywane (i zapisywane) przez metodę, która posiada dodatkowy argument, typu integer. Najczęściej to rozwiązanie stosuje się w celu uniknięcia wielokrotnego kopiowania bardzo podobnych metod, zwracających wartości właściwości.
Składnia:

property Nazwa: Typ index stała_typu_integer read Nazwa_metody1 write Nazwa_metody2;

Przy czym, definicja metody powina wtedy wyglądać np. tak (argument idx ma wartość, która znajduje się za słowem index, w definicji właściwości, którą odczytujemy):

function Nazwa(idx:integer):Typ;

Przykład:

type
  TRectangle = class
  private
    FCoordinates: array[0..3] of Longint;
    function GetCoordinate(Index: Integer): Longint;
    procedure SetCoordinate(Index: Integer; Value: Longint);
  public
    property Left: Longint index 0 read GetCoordinate write SetCoordinate;
    property Top: Longint index 1 read GetCoordinate write SetCoordinate;

    property Right: Longint index 2 read GetCoordinate write SetCoordinate;
    property Bottom: Longint index 3 read GetCoordinate write SetCoordinate;
    property Coordinates[Index: Integer]: Longint read GetCoordinate write SetCoordinate;
  end;
//...

Zobacz też:

0 komentarzy