Создание справки для процедуры

[guz14]

Нужно создать справку для процедуры AddLogFile.
Что значит создать справку?если можно с примером

procedure AddLogFile(Action, ResAction, DetailInfo, FilePath: String; MaxSize: Integer);
const Bite = 1024; Proc = 90;
var
 User, StrLog, TextLog, NewTextLog: String;
 DateTimeAction: DateTime;
 Size, MaxSizeB, NewSize, NewStrPos: Integer;
begin
 // Дата и время действия, информация о котором записывается в лог 
  DateTimeAction := Today
 // Имя пользователя, от которого запущен процесс
  User := UserName
 // Символ перевода строки
  NewLine := "\r\n"

 // Сформировать строку лога
  StrLog := DateTimeAction + "	" + User
  StrLog := StrLog + "	" +  Action + "	" +  ResAction + "	" + DetailInfo
  StrLog := StrLog + NewLine

 // Записывать новую строку в файл
  FileWrite(FilePath; "Add"; StrLog)
  
 // Уменьшить размер лог-файла при необходимости
  if MaxSize <> "" 
  then
  begin
   // Определить текущий размер файла
    Size := FileSize(FilePath)
   // Перевести максимальный размер в байты
    MaxSizeB := MaxSize * Bite
    if Size > MaxSizeB then
    begin 
      TextLog = FileRead(FilePath)
     // Оставить 90% от максимального содержимого лог-файла 
      NewSize := Round(MaxSizeB * Proc / 100; 0)
     // Выделить последние записи
      NewTextLog := SubString(TextLog; Size - NewSize + 1; NewSize)
      NewStrPos := CharIndex(NewLine; NewTextLog)
      NewTextLog := SubString(NewTextLog; NewStrPos + 1; Size - NewStrPos)
      FileWrite(FilePath; "Rewrite"; NewTextLog)
    end
  end
end