Steema Central

Code: Select all

void TInputForm::MakeISOAxis(TCustomChart *AChart)
{
    double tmpX, tmpY, XRange, YRange, Offset, XYScreen;

    if ((AChart->ChartHeight > 0)&&(AChart->ChartWidth > 0))
    {
        XRange = AChart->BottomAxis->Maximum - AChart->BottomAxis->Minimum;
        YRange = AChart->LeftAxis->Maximum - AChart->LeftAxis->Minimum;

        XYScreen = 1.0*(GetDeviceCaps(AChart->Canvas->Handle,HORZRES)/Screen->Width)
            /(GetDeviceCaps(AChart->Canvas->Handle,VERTRES)/Screen->Height);

        tmpX = XRange/AChart->ChartWidth;
        tmpY = (YRange/AChart->ChartHeight)*XYScreen;

        if (tmpX > tmpY)
        {
            if (tmpY != 0.0)
            {
                Offset = ((YRange*tmpX/tmpY)-YRange)/2.0;
                AChart->LeftAxis->SetMinMax(AChart->LeftAxis->Minimum-Offset,
                    AChart->LeftAxis->Maximum+Offset);
            }
        }
        else
        {
            if (tmpX != 0.0)
            {
                Offset = ((XRange*tmpY/tmpX)-XRange)/2.0;
                AChart->BottomAxis->SetMinMax(AChart->BottomAxis->Minimum-Offset,
                    AChart->BottomAxis->Maximum+Offset);
            }
        }
    }
}