Форум программистов [Powered by Invision Power Board]

Код


#ifndef _GUARD_func_h
#define _GUARD_func_h

#include <vector>
#include <math.h>

double LgotKoeff=0;

struct AccDate
{
    int Day, Month, Year;
}SaveDate;

std::vector<AccDate> Date;

double Round(double Argument, int Precision)
{
    double div = 1.0;

    if(Precision >= 0)

        while(Precision--)
        div *= 10.0;
    else
        while(Precision++)
           div /= 10.0;

    return floor(Argument * div + 0.5)/div;
}

int Service(int S_Day, int S_Month, int S_Year, int E_Day, int E_Month, int E_Year)
{
    if(S_Year>E_Year)
    {
        MessageBox(NULL, "...", "...", MB_OK|MB_ICONERROR);
        return 1;
    }
    else
    {
        if(S_Year<E_Year)
            SaveDate.Year=E_Year-S_Year-1;
        if(S_Year==E_Year)
            SaveDate.Year=0;
    }


    if(S_Year==E_Year && S_Month>E_Month)
    {
        MessageBox(NULL, "...", "...", MB_OK|MB_ICONERROR);
        return 1;
    }
    else
            SaveDate.Month=(12-S_Month)+(E_Month-1);

    if(S_Year==E_Year && S_Month==E_Month && S_Day>E_Day)
    {
        MessageBox(NULL, "...", "...", MB_OK|MB_ICONERROR);
        return 1;
    }
    else
    {
        int MonNum[]={29,31,28,31,30,31,30,31,31,30,31,30,31};

        if(S_Month==2)
        {
            if((S_Year%4)==0)
                SaveDate.Day=(MonNum[0]-S_Day+1)+E_Day;
            else
                SaveDate.Day=(MonNum[S_Month]-S_Day+1)+E_Day;
        }
        else
            SaveDate.Day=(MonNum[S_Month]-S_Day+1)+E_Day;
    }

    Date.push_back(SaveDate);

    if(Date[2].Day>=30)
    {
        Date[2].Day-=30;
        Date[2].Month+=1;
    }
    if(Date[2].Month>=12)
    {
        Date[2].Month-=12;
        Date[2].Year+=1;
    }

    return 0;
}

AccDate GracePeriod()
{
    SaveDate.Day=Round(Date[2].Day*LgotKoeff, 0);

    double d=Date[2].Month*LgotKoeff, p;
    if(modf(d, &p)==0)
        SaveDate.Month=p;
    else
    {
        double m=modf(d, &p);
        SaveDate.Month=p;
        modf(m*30, &p);
        SaveDate.Day+=p;
    }

    d=Date[2].Year*LgotKoeff;
    if(modf(d, &p)==0)
        SaveDate.Year=p;
    else
    {
        double m=modf(d, &p);
        SaveDate.Year=p;
        modf(m*12, &p);
        SaveDate.Month+=p;        
    }

    Date.push_back(SaveDate);
        
    if(Date[3].Day>=30)
    {
        Date[3].Day-=30;
        Date[3].Month+=1;
    }
    if(Date[3].Month>=12)
    {
        Date[3].Month-=12;
        Date[3].Year+=1;
    }

    return Date[3];
}

#endif

Цитата

ну и припиши ему Sysutils:: перед Date где нужно ...

Цитата

Есть еще одна ситуация, которая требует явного приведения типов: в некоторых случаях компилятор не может выбрать среди перегруженных функций, если под данный тип параметра подходит несколько из них. Напишите, например, код

TPoint P;
P.x = 5;
P.y = 1;
Label1->Caption = "Координата x = " + IntToStr(P.x);

и вы получите сообщение компилятора об ошибке: "Ambiguity between '_fastcall Sysutils::IntToStr(__int64)' and '_fastcall Sysutils::IntToStr(int)'" (Неоднозначность применения функции IntToStr параметра типа __int64 и int).
Помочь компилятору легко, применив в последнем из приведенных операторов явное указание типа int:

Label1->Caption = "Координата x = " + IntToStr((int)P.x);

Подобный текст компилятор обработает без проблем.