переменные функции

[Host-2013]

видел бывают функции где в фактических параметрах стоит переменная типа работающего только для этой функции.
например: DayOfWeek(Date: TDateTime): Integer
где Date это как раз такая переменная
так вот интересует как их создавать? можно ли описать тип внутри функции? и главное где записать список таких переменных: в варе функции или в типе? если в типе то какой этим переменным задавать тип? учитывая что они нужны только для сравнения типа
if Date = variable1 then ...
if Date = variable2 then ...

п.с. ну может Date не совсем удачный пример, вот лучше:
StringReplace(const S, OldPattern, NewPattern: string; Flags: TReplaceFlags): String
где Flags такая переменная

[evg_m]

обявление процедуры и типов данных которые она использует

type
  TEnumtype  =(enum1, enum2, ..., enum99);
  TSetEnum = set of TenumType;
  TmySymleType =integer;
  TmyRange =1..100;

procedure X(val: TEnumtype; vals: TSetEnum; i: TmysympleType; k: Tmyrange);

TreplaceFlags +F1 =

Delphi syntax:
type TReplaceFlags = set of (rfReplaceAll, rfIgnoreCase);

[Serge_Bliznykov]

так вот интересует как их создавать?

как и любой другой - описывать в секции type ...
например, для flags
в исходниках модуля SysUtils.pas
написано:

type
  TReplaceFlags = set of (rfReplaceAll, rfIgnoreCase);

можно ли описать тип внутри функции?

имхо, нет, нельзя. Да и зачем это нужно?!

и главное где записать список таких переменных: в варе функции или в типе? если в типе то какой этим переменным задавать тип? учитывая что они нужны только для сравнения типа

о!! может быть, Вы расскажете, для чего это Вам нужно, что Вы изобретаете?

[Host-2013]

Сообщение от evg_m

type TEnumtype  =(enum1, enum2, ..., enum99);

помогло спасибо

[superedward]

Сообщение от Serge_Bliznykov

имхо, нет, нельзя. Да и зачем это нужно?!

Вообще говоря, можно. Но и использовать такой тип можно только внутри функции.