Проблема с TDateTime

Комментарии

• AlexTZ

  April 2004 отредактировано 06:48

  Ошибка в fs_isysrtti.pas:
  

  function TFunctions.CallMethod2(Instance: TObject; ClassType: TClass;
    const MethodName: String; var Params: Variant): Variant;
  begin
    if MethodName = 'STRTOINT' then
      Result := StrToInt(Params[0])
    else if MethodName = 'STRTOFLOAT' then
      Result := StrToFloat(Params[0])
    else if MethodName = 'STRTODATE' then
      Result := StrToDate(Params[0])
    else if MethodName = 'STRTOTIME' then
      Result := StrToTime(Params[0])
  // here
    else if MethodName = 'STRTODATETIME' then
  //
      Result := StrToDateTime(Params[0])
  end;
  
• pvk

  April 2004 отредактировано April 2004

  Долго глядел в попытке понять в чем ошибка - оказывается две буквы "D". Спасибо, помогло...