FullNameGroup — различия между версиями

Материал из Фабиус wiki
Перейти к: навигация, поиск
м (Смотрите также)
м
 
(не показана одна промежуточная версия этого же участника)
Строка 2: Строка 2:
 
  Функция возвращает полное название группы
 
  Функция возвращает полное название группы
 
[[FullNameGroup]]( KINDDOC, CODEGROUP )
 
[[FullNameGroup]]( KINDDOC, CODEGROUP )
= Полный текст функции =
 
 
type
 
  TQREvFullNameGroup = class(TQREvDbFunction)
 
  public
 
    function Calculate: TQREvResult; override;
 
  end;
 
 
function TQREvFullNameGroup.Calculate: TQREvResult;
 
begin
 
  if (ArgList.Count = 2) and (Argument(0).Kind = ResString) and (Argument(1).Kind = ResString) then
 
    begin
 
      Result.Kind := ResString;
 
      Result.StrResult := [[FullNameGroup]](Argument(0).StrResult, Argument(1).StrResult);
 
    end
 
  else
 
    Result := ErrorCreate(Format(SqrExpWrongArguments, ['FullNameGroup']));
 
end;
 
 
 
= Смотрите также =
 
= Смотрите также =
 
[[FULLNAMEGROUP2]]
 
[[FULLNAMEGROUP2]]
  
 
[[Полезные функции]]
 
[[Полезные функции]]
 
[[Функции Delphi]]
 

Текущая версия на 14:32, 10 января 2020

FullNameGroup - это функция, описанная в файле QrAddFn.pas

Функция возвращает полное название группы

FullNameGroup( KINDDOC, CODEGROUP )

Смотрите также

FULLNAMEGROUP2

Полезные функции