ksmenu.cpp

来自「一个以前收集的基于C/S架构的ERP客户端源代码」· C++ 代码 · 共 1,372 行 · 第 1/4 页

CPP
1,372
字号
			l_AOwner->Canvas->MoveTo(l_NavArrowX1-l_AOwner->Left+1,l_NavArrowY2-l_AOwner->Top-2);
            l_AOwner->Canvas->LineTo(l_NavArrowX2-l_AOwner->Left,l_NavArrowY2-l_AOwner->Top-2);
            l_AOwner->Canvas->Pen->Color=colors[2];
            l_AOwner->Canvas->MoveTo(l_NavArrowX1-l_AOwner->Left+2,l_NavArrowY2-l_AOwner->Top-1);
            l_AOwner->Canvas->LineTo(l_NavArrowX2-l_AOwner->Left,l_NavArrowY2-l_AOwner->Top-1);
            l_AOwner->Canvas->Pen->Color=colors[3];
            l_AOwner->Canvas->MoveTo(l_NavArrowX1-l_AOwner->Left+3,l_NavArrowY2-l_AOwner->Top);
            l_AOwner->Canvas->LineTo(l_NavArrowX2-l_AOwner->Left,l_NavArrowY2-l_AOwner->Top);
          }
          else
          {
            l_AOwner->Canvas->FillRect(TRect(l_NavArrowX1-l_AOwner->Left,l_NavArrowY1-l_AOwner->Top,l_NavArrowX2-l_AOwner->Left-3,l_NavArrowY2-l_AOwner->Top));
            l_AOwner->Canvas->Pen->Color=colors[0];
            l_AOwner->Canvas->MoveTo(l_NavArrowX2-l_AOwner->Left-3,l_NavArrowY1-l_AOwner->Top);
            l_AOwner->Canvas->LineTo(l_NavArrowX2-l_AOwner->Left-3,l_NavArrowY2-l_AOwner->Top);
            l_AOwner->Canvas->Pen->Color=colors[1];
            l_AOwner->Canvas->MoveTo(l_NavArrowX2-l_AOwner->Left-2,l_NavArrowY1-l_AOwner->Top+1);
			l_AOwner->Canvas->LineTo(l_NavArrowX2-l_AOwner->Left-2,l_NavArrowY2-l_AOwner->Top);
            l_AOwner->Canvas->Pen->Color=colors[2];
			l_AOwner->Canvas->MoveTo(l_NavArrowX2-l_AOwner->Left-1,l_NavArrowY1-l_AOwner->Top+2);
            l_AOwner->Canvas->LineTo(l_NavArrowX2-l_AOwner->Left-1,l_NavArrowY2-l_AOwner->Top);
            l_AOwner->Canvas->Pen->Color=colors[3];
            l_AOwner->Canvas->MoveTo(l_NavArrowX2-l_AOwner->Left,l_NavArrowY1-l_AOwner->Top+3);
            l_AOwner->Canvas->LineTo(l_NavArrowX2-l_AOwner->Left,l_NavArrowY2-l_AOwner->Top);
		  }
        }
        else
          l_AOwner->Canvas->FillRect(TRect(l_NavArrowX1-l_AOwner->Left,l_NavArrowY1-l_AOwner->Top,l_NavArrowX2-l_AOwner->Left,l_NavArrowY2-l_AOwner->Top));
        break;
      case 1:
        if(l_NavArrow3D==1)
        {
          l_AOwner->Canvas->FillRect(TRect(l_NavArrowX1-l_AOwner->Left+10,l_NavArrowY1-l_AOwner->Top,l_NavArrowX2-l_AOwner->Left,l_NavArrowY2-l_AOwner->Top));
          l_AOwner->Canvas->Pen->Color=colors[0];
          l_AOwner->Canvas->MoveTo(l_NavArrowX1-l_AOwner->Left+10,l_NavArrowY2-l_AOwner->Top-3);
          l_AOwner->Canvas->LineTo(l_NavArrowX2-l_AOwner->Left,l_NavArrowY2-l_AOwner->Top-3);
          l_AOwner->Canvas->Pen->Color=colors[1];
          l_AOwner->Canvas->MoveTo(l_NavArrowX1-l_AOwner->Left+10,l_NavArrowY2-l_AOwner->Top-2);
          l_AOwner->Canvas->LineTo(l_NavArrowX2-l_AOwner->Left,l_NavArrowY2-l_AOwner->Top-2);
          l_AOwner->Canvas->Pen->Color=colors[2];
          l_AOwner->Canvas->MoveTo(l_NavArrowX1-l_AOwner->Left+10,l_NavArrowY2-l_AOwner->Top-1);
		  l_AOwner->Canvas->LineTo(l_NavArrowX2-l_AOwner->Left,l_NavArrowY2-l_AOwner->Top-1);
          l_AOwner->Canvas->Pen->Color=colors[3];
          l_AOwner->Canvas->MoveTo(l_NavArrowX1-l_AOwner->Left+10,l_NavArrowY2-l_AOwner->Top);
          l_AOwner->Canvas->LineTo(l_NavArrowX2-l_AOwner->Left,l_NavArrowY2-l_AOwner->Top);

          points[0]=Point(l_NavArrowX1-l_AOwner->Left,l_NavArrowY1+(l_NavArrowY2-l_NavArrowY1)/2-l_AOwner->Top-2);
          points[1]=Point(l_NavArrowX1+10-l_AOwner->Left,l_NavArrowY1-6-l_AOwner->Top);
		  points[2]=Point(l_NavArrowX1+10-l_AOwner->Left,l_NavArrowY2+2-l_AOwner->Top);
          l_AOwner->Canvas->Pen->Color=(TColor)(l_NavArrowColor.ToInt());
		  l_AOwner->Canvas->Polygon(points,2);

          l_AOwner->Canvas->Pen->Color=colors[0];
          l_AOwner->Canvas->MoveTo(l_NavArrowX1-l_AOwner->Left,l_NavArrowY1+(l_NavArrowY2-l_NavArrowY1)/2-l_AOwner->Top-1);
          l_AOwner->Canvas->LineTo(l_NavArrowX1-l_AOwner->Left+10,l_NavArrowY2-l_AOwner->Top+3);
          l_AOwner->Canvas->Pen->Color=colors[1];
          l_AOwner->Canvas->MoveTo(l_NavArrowX1-l_AOwner->Left,l_NavArrowY1+(l_NavArrowY2-l_NavArrowY1)/2-l_AOwner->Top);
          l_AOwner->Canvas->LineTo(l_NavArrowX1-l_AOwner->Left+10,l_NavArrowY2-l_AOwner->Top+4);
          l_AOwner->Canvas->Pen->Color=colors[2];
          l_AOwner->Canvas->MoveTo(l_NavArrowX1-l_AOwner->Left,l_NavArrowY1+(l_NavArrowY2-l_NavArrowY1)/2-l_AOwner->Top+1);
          l_AOwner->Canvas->LineTo(l_NavArrowX1-l_AOwner->Left+10,l_NavArrowY2-l_AOwner->Top+5);
          l_AOwner->Canvas->Pen->Color=colors[3];
          l_AOwner->Canvas->MoveTo(l_NavArrowX1-l_AOwner->Left,l_NavArrowY1+(l_NavArrowY2-l_NavArrowY1)/2-l_AOwner->Top+2);
          l_AOwner->Canvas->LineTo(l_NavArrowX1-l_AOwner->Left+10,l_NavArrowY2-l_AOwner->Top+6);
        }
	 else
        {
          points[0]=Point(l_NavArrowX1-l_AOwner->Left,l_NavArrowY1+(l_NavArrowY2-l_NavArrowY1)/2-l_AOwner->Top);
          points[1]=Point(l_NavArrowX1+10-l_AOwner->Left,l_NavArrowY1-4-l_AOwner->Top);
          points[2]=Point(l_NavArrowX1+10-l_AOwner->Left,l_NavArrowY2+4-l_AOwner->Top);

          l_AOwner->Canvas->FillRect(TRect(l_NavArrowX1-l_AOwner->Left+10,l_NavArrowY1-l_AOwner->Top,l_NavArrowX2-l_AOwner->Left,l_NavArrowY2-l_AOwner->Top));
		  l_AOwner->Canvas->Polygon(points,2);
        }
        break;
      case 2:
        if(l_NavArrow3D==1)
        {
          l_AOwner->Canvas->FillRect(TRect(l_NavArrowX1-l_AOwner->Left,l_NavArrowY1-l_AOwner->Top,l_NavArrowX2-10-l_AOwner->Left,l_NavArrowY2-l_AOwner->Top));
          l_AOwner->Canvas->Pen->Color=colors[0];
          l_AOwner->Canvas->MoveTo(l_NavArrowX1-l_AOwner->Left,l_NavArrowY2-l_AOwner->Top-3);
		  l_AOwner->Canvas->LineTo(l_NavArrowX2-l_AOwner->Left-10,l_NavArrowY2-l_AOwner->Top-3);
          l_AOwner->Canvas->Pen->Color=colors[1];
          l_AOwner->Canvas->MoveTo(l_NavArrowX1-l_AOwner->Left+1,l_NavArrowY2-l_AOwner->Top-2);
          l_AOwner->Canvas->LineTo(l_NavArrowX2-l_AOwner->Left-10,l_NavArrowY2-l_AOwner->Top-2);
          l_AOwner->Canvas->Pen->Color=colors[2];
          l_AOwner->Canvas->MoveTo(l_NavArrowX1-l_AOwner->Left+2,l_NavArrowY2-l_AOwner->Top-1);
          l_AOwner->Canvas->LineTo(l_NavArrowX2-l_AOwner->Left-10,l_NavArrowY2-l_AOwner->Top-1);
          l_AOwner->Canvas->Pen->Color=colors[3];
		  l_AOwner->Canvas->MoveTo(l_NavArrowX1-l_AOwner->Left+3,l_NavArrowY2-l_AOwner->Top);
          l_AOwner->Canvas->LineTo(l_NavArrowX2-l_AOwner->Left-10,l_NavArrowY2-l_AOwner->Top);

          points[0]=Point(l_NavArrowX2-l_AOwner->Left,l_NavArrowY1+(l_NavArrowY2-l_NavArrowY1)/2-l_AOwner->Top-2);
          points[1]=Point(l_NavArrowX2-10-l_AOwner->Left,l_NavArrowY1-6-l_AOwner->Top);
          points[2]=Point(l_NavArrowX2-10-l_AOwner->Left,l_NavArrowY2+2-l_AOwner->Top);
          l_AOwner->Canvas->Pen->Color=(TColor)(l_NavArrowColor.ToInt());
		  l_AOwner->Canvas->Polygon(points,2);

          l_AOwner->Canvas->Pen->Color=colors[0];
          l_AOwner->Canvas->MoveTo(l_NavArrowX2-l_AOwner->Left,l_NavArrowY1+(l_NavArrowY2-l_NavArrowY1)/2-l_AOwner->Top-1);
          l_AOwner->Canvas->LineTo(l_NavArrowX2-l_AOwner->Left-10,l_NavArrowY2-l_AOwner->Top+3);
          l_AOwner->Canvas->Pen->Color=colors[1];
          l_AOwner->Canvas->MoveTo(l_NavArrowX2-l_AOwner->Left,l_NavArrowY1+(l_NavArrowY2-l_NavArrowY1)/2-l_AOwner->Top);
          l_AOwner->Canvas->LineTo(l_NavArrowX2-l_AOwner->Left-10,l_NavArrowY2-l_AOwner->Top+4);
          l_AOwner->Canvas->Pen->Color=colors[2];
          l_AOwner->Canvas->MoveTo(l_NavArrowX2-l_AOwner->Left,l_NavArrowY1+(l_NavArrowY2-l_NavArrowY1)/2-l_AOwner->Top+1);
          l_AOwner->Canvas->LineTo(l_NavArrowX2-l_AOwner->Left-10,l_NavArrowY2-l_AOwner->Top+5);
          l_AOwner->Canvas->Pen->Color=colors[3];
          l_AOwner->Canvas->MoveTo(l_NavArrowX2-l_AOwner->Left,l_NavArrowY1+(l_NavArrowY2-l_NavArrowY1)/2-l_AOwner->Top+2);
          l_AOwner->Canvas->LineTo(l_NavArrowX2-l_AOwner->Left-10,l_NavArrowY2-l_AOwner->Top+6);
        }
        else
		{
		  points[0]=Point(l_NavArrowX2-l_AOwner->Left,l_NavArrowY1+(l_NavArrowY2-l_NavArrowY1)/2-l_AOwner->Top);
          points[1]=Point(l_NavArrowX2-10-l_AOwner->Left,l_NavArrowY1-4-l_AOwner->Top);
          points[2]=Point(l_NavArrowX2-10-l_AOwner->Left,l_NavArrowY2+4-l_AOwner->Top);

          l_AOwner->Canvas->FillRect(TRect(l_NavArrowX1-l_AOwner->Left,l_NavArrowY1-l_AOwner->Top,l_NavArrowX2-10-l_AOwner->Left,l_NavArrowY2-l_AOwner->Top));
          l_AOwner->Canvas->Polygon(points,2);
        }
		break;
      case 3:
        if(l_NavArrow3D==1)
        {
          l_AOwner->Canvas->FillRect(TRect(l_NavArrowX1-l_AOwner->Left,l_NavArrowY1-l_AOwner->Top+10,l_NavArrowX2-l_AOwner->Left,l_NavArrowY2-l_AOwner->Top));
          l_AOwner->Canvas->Pen->Color=colors[0];
          l_AOwner->Canvas->MoveTo(l_NavArrowX2-l_AOwner->Left-3,l_NavArrowY1-l_AOwner->Top+10);
          l_AOwner->Canvas->LineTo(l_NavArrowX2-l_AOwner->Left-3,l_NavArrowY2-l_AOwner->Top);
          l_AOwner->Canvas->Pen->Color=colors[1];
          l_AOwner->Canvas->MoveTo(l_NavArrowX2-l_AOwner->Left-2,l_NavArrowY1-l_AOwner->Top+10);
          l_AOwner->Canvas->LineTo(l_NavArrowX2-l_AOwner->Left-2,l_NavArrowY2-l_AOwner->Top);
          l_AOwner->Canvas->Pen->Color=colors[2];
          l_AOwner->Canvas->MoveTo(l_NavArrowX2-l_AOwner->Left-1,l_NavArrowY1-l_AOwner->Top+10);
          l_AOwner->Canvas->LineTo(l_NavArrowX2-l_AOwner->Left-1,l_NavArrowY2-l_AOwner->Top);
          l_AOwner->Canvas->Pen->Color=colors[3];
          l_AOwner->Canvas->MoveTo(l_NavArrowX2-l_AOwner->Left,l_NavArrowY1-l_AOwner->Top+10);
          l_AOwner->Canvas->LineTo(l_NavArrowX2-l_AOwner->Left,l_NavArrowY2-l_AOwner->Top);

          points[0]=Point(l_NavArrowX1+(l_NavArrowX2-l_NavArrowX1)/2-l_AOwner->Left-2,l_NavArrowY1-l_AOwner->Top);
          points[1]=Point(l_NavArrowX1-6-l_AOwner->Left,l_NavArrowY1+10-l_AOwner->Top);
          points[2]=Point(l_NavArrowX2+2-l_AOwner->Left,l_NavArrowY1+10-l_AOwner->Top);
          l_AOwner->Canvas->Pen->Color=(TColor)(l_NavArrowColor.ToInt());
          l_AOwner->Canvas->Polygon(points,2);

		  l_AOwner->Canvas->Pen->Color=colors[0];
          l_AOwner->Canvas->MoveTo(l_NavArrowX1+(l_NavArrowX2-l_NavArrowX1)/2-l_AOwner->Left-1,l_NavArrowY1-l_AOwner->Top);
          l_AOwner->Canvas->LineTo(l_NavArrowX2-l_AOwner->Left+3,l_NavArrowY1-l_AOwner->Top+10);
          l_AOwner->Canvas->Pen->Color=colors[1];
          l_AOwner->Canvas->MoveTo(l_NavArrowX1+(l_NavArrowX2-l_NavArrowX1)/2-l_AOwner->Left,l_NavArrowY1-l_AOwner->Top);
          l_AOwner->Canvas->LineTo(l_NavArrowX2-l_AOwner->Left+4,l_NavArrowY1-l_AOwner->Top+10);
          l_AOwner->Canvas->Pen->Color=colors[2];
          l_AOwner->Canvas->MoveTo(l_NavArrowX1+(l_NavArrowX2-l_NavArrowX1)/2-l_AOwner->Left+1,l_NavArrowY1-l_AOwner->Top);
          l_AOwner->Canvas->LineTo(l_NavArrowX2-l_AOwner->Left+5,l_NavArrowY1-l_AOwner->Top+10);
          l_AOwner->Canvas->Pen->Color=colors[3];
          l_AOwner->Canvas->MoveTo(l_NavArrowX1+(l_NavArrowX2-l_NavArrowX1)/2-l_AOwner->Left+2,l_NavArrowY1-l_AOwner->Top);
          l_AOwner->Canvas->LineTo(l_NavArrowX2-l_AOwner->Left+6,l_NavArrowY1-l_AOwner->Top+10);
        }
        else
        {
          points[0]=Point(l_NavArrowX1+(l_NavArrowX2-l_NavArrowX1)/2-l_AOwner->Left,l_NavArrowY1-l_AOwner->Top);
          points[1]=Point(l_NavArrowX1-4-l_AOwner->Left,l_NavArrowY1+10-l_AOwner->Top);
		  points[2]=Point(l_NavArrowX2+4-l_AOwner->Left,l_NavArrowY1+10-l_AOwner->Top);

          l_AOwner->Canvas->FillRect(TRect(l_NavArrowX1-l_AOwner->Left,l_NavArrowY1-l_AOwner->Top+10,l_NavArrowX2-l_AOwner->Left,l_NavArrowY2-l_AOwner->Top));
          l_AOwner->Canvas->Polygon(points,2);
        }
        break;
      case 4:
		if(l_NavArrow3D==1)
        {
          l_AOwner->Canvas->FillRect(TRect(l_NavArrowX1-l_AOwner->Left,l_NavArrowY1-l_AOwner->Top,l_NavArrowX2-l_AOwner->Left,l_NavArrowY2-l_AOwner->Top-10));
          l_AOwner->Canvas->Pen->Color=colors[0];
          l_AOwner->Canvas->MoveTo(l_NavArrowX2-l_AOwner->Left-3,l_NavArrowY2-l_AOwner->Top-10);
          l_AOwner->Canvas->LineTo(l_NavArrowX2-l_AOwner->Left-3,l_NavArrowY1-l_AOwner->Top);
		  l_AOwner->Canvas->Pen->Color=colors[1];
          l_AOwner->Canvas->MoveTo(l_NavArrowX2-l_AOwner->Left-2,l_NavArrowY2-l_AOwner->Top-10);
          l_AOwner->Canvas->LineTo(l_NavArrowX2-l_AOwner->Left-2,l_NavArrowY1-l_AOwner->Top);
          l_AOwner->Canvas->Pen->Color=colors[2];
          l_AOwner->Canvas->MoveTo(l_NavArrowX2-l_AOwner->Left-1,l_NavArrowY2-l_AOwner->Top-10);
          l_AOwner->Canvas->LineTo(l_NavArrowX2-l_AOwner->Left-1,l_NavArrowY1-l_AOwner->Top);
          l_AOwner->Canvas->Pen->Color=colors[3];
          l_AOwner->Canvas->MoveTo(l_NavArrowX2-l_AOwner->Left,l_NavArrowY2-l_AOwner->Top-10);
          l_AOwner->Canvas->LineTo(l_NavArrowX2-l_AOwner->Left,l_NavArrowY1-l_AOwner->Top);

          points[0]=Point(l_NavArrowX1+(l_NavArrowX2-l_NavArrowX1)/2-l_AOwner->Left-2,l_NavArrowY2-l_AOwner->Top);
		  points[1]=Point(l_NavArrowX1-6-l_AOwner->Left,l_NavArrowY2-10-l_AOwner->Top);
          points[2]=Point(l_NavArrowX2+2-l_AOwner->Left,l_NavArrowY2-10-l_AOwner->Top);
          l_AOwner->Canvas->Pen->Color=(TColor)(l_NavArrowColor.ToInt());
          l_AOwner->Canvas->Polygon(points,2);

          l_AOwner->Canvas->Pen->Color=colors[0];
          l_AOwner->Canvas->MoveTo(l_NavArrowX1+(l_NavArrowX2-l_NavArrowX1)/2-l_AOwner->Left-1,l_NavArrowY2-l_AOwner->Top);
		  l_AOwner->Canvas->LineTo(l_NavArrowX2-l_AOwner->Left+3,l_NavArrowY2-l_AOwner->Top-10);
          l_AOwner->Canvas->Pen->Color=colors[1];
          l_AOwner->Canvas->MoveTo(l_NavArrowX1+(l_NavArrowX2-l_NavArrowX1)/2-l_AOwner->Left,l_NavArrowY2-l_AOwner->Top);
          l_AOwner->Canvas->LineTo(l_NavArrowX2-l_AOwner->Left+4,l_NavArrowY2-l_AOwner->Top-10);
          l_AOwner->Canvas->Pen->Color=colors[2];
          l_AOwner->Canvas->MoveTo(l_NavArrowX1+(l_NavArrowX2-l_NavArrowX1)/2-l_AOwner->Left+1,l_NavArrowY2-l_AOwner->Top);
          l_AOwner->Canvas->LineTo(l_NavArrowX2-l_AOwner->Left+5,l_NavArrowY2-l_AOwner->Top-10);
          l_AOwner->Canvas->Pen->Color=colors[3];
          l_AOwner->Canvas->MoveTo(l_NavArrowX1+(l_NavArrowX2-l_NavArrowX1)/2-l_AOwner->Left+2,l_NavArrowY2-l_AOwner->Top);
          l_AOwner->Canvas->LineTo(l_NavArrowX2-l_AOwner->Left+6,l_NavArrowY2-l_AOwner->Top-10);
        }
        else
        {
		  points[0]=Point(l_NavArrowX1+(l_NavArrowX2-l_NavArrowX1)/2-l_AOwner->Left,l_NavArrowY2-l_AOwner->Top);
          points[1]=Point(l_NavArrowX1-4-l_AOwner->Left,l_NavArrowY2-10-l_AOwner->Top);
          points[2]=Point(l_NavArrowX2+4-l_AOwner->Left,l_NavArrowY2-10-l_AOwner->Top);

		  l_AOwner->Canvas->FillRect(TRect(l_NavArrowX1-l_AOwner->Left,l_NavArrowY1-l_AOwner->Top,l_NavArrowX2-l_AOwner->Left,l_NavArrowY2-l_AOwner->Top-10));
          l_AOwner->Canvas->Polygon(points,2);
        }
        break;
      case 5:
        if(l_NavArrow3D==1)
        {
		  l_AOwner->Canvas->FillRect(TRect(l_NavArrowX1-l_AOwner->Left+10,l_NavArrowY1-l_AOwner->Top,l_NavArrowX2-l_AOwner->Left-10,l_NavArrowY2-l_AOwner->Top));
          l_AOwner->Canvas->Pen->Color=colors[0];
          l_AOwner->Canvas->MoveTo(l_NavArrowX1-l_AOwner->Left+10,l_NavArrowY2-l_AOwner->Top-3);
          l_AOwner->Canvas->LineTo(l_NavArrowX2-l_AOwner->Left-10,l_NavArrowY2-l_AOwner->Top-3);
          l_AOwner->Canvas->Pen->Color=colors[1];
          l_AOwner->Canvas->MoveTo(l_NavArrowX1-l_AOwner->Left+10,l_NavArrowY2-l_AOwner->Top-2);
          l_AOwner->Canvas->LineTo(l_NavArrowX2-l_AOwner->Left-10,l_NavArrowY2-l_AOwner->Top-2);
          l_AOwner->Canvas->Pen->Color=colors[2];
          l_AOwner->Canvas->MoveTo(l_NavArrowX1-l_AOwner->Left+10,l_NavArrowY2-l_AOwner->Top-1);
          l_AOwner->Canvas->LineTo(l_NavArrowX2-l_AOwner->Left-10,l_NavArrowY2-l_AOwner->Top-1);
          l_AOwner->Canvas->Pen->Color=colors[3];
          l_AOwner->Canvas->MoveTo(l_NavArrowX1-l_AOwner->Left+10,l_NavArrowY2-l_AOwner->Top);
          l_AOwner->Canvas->LineTo(l_NavArrowX2-l_AOwner->Left-10,l_NavArrowY2-l_AOwner->Top);

          points[0]=Point(l_NavArrowX1-l_AOwner->Left,l_NavArrowY1+(l_NavArrowY2-l_NavArrowY1)/2-l_AOwner->Top-2);
          points[1]=Point(l_NavArrowX1+10-l_AOwner->Left,l_NavArrowY1-6-l_AOwner->Top);
          points[2]=Point(l_NavArrowX1+10-l_AOwner->Left,l_NavArrowY2+2-l_AOwner->Top);
		  l_AOwner->Canvas->Pen->Color=(TColor)(l_NavArrowColor.ToInt());
          l_AOwner->Canvas->Polygon(points,2);

		  l_AOwner->Canvas->Pen->Color=colors[0];
          l_AOwner->Canvas->MoveTo(l_NavArrowX1-l_AOwner->Left,l_NavArrowY1+(l_NavArrowY2-l_NavArrowY1)/2-l_AOwner->Top-1);
          l_AOwner->Canvas->LineTo(l_NavArrowX1-l_AOwner->Left+10,l_NavArrowY2-l_AOwner->Top+3);
          l_AOwner->Canvas->Pen->Color=colors[1];
		  l_AOwner->Canvas->MoveTo(l_NavArrowX1-l_AOwner->Left,l_NavArrowY1+(l_NavArrowY2-l_NavArrowY1)/2-l_AOwner->Top);
          l_AOwner->Canvas->LineTo(l_NavArrowX1-l_AOwner->Left+10,l_NavArrowY2-l_AOwner->Top+4);
          l_AOwner->Canvas->Pen->Color=colors[2];
          l_AOwner->Canvas->MoveTo(l_NavArrowX1-l_AOwner->Left,l_NavArrowY1+(l_NavArrowY2-l_NavArrowY1)/2-l_AOwner->Top+1);
          l_AOwner->Canvas->LineTo(l_NavArrowX1-l_AOwner->Left+10,l_NavArrowY2-l_AOwner->Top+5);
          l_AOwner->Canvas->Pen->Color=colors[3];
          l_AOwner->Canvas->MoveTo(l_NavArrowX1-l_AOwner->Left,l_NavArrowY1+(l_NavArrowY2-l_NavArrowY1)/2-l_AOwner->Top+2);
          l_AOwner->Canvas->LineTo(l_NavArrowX1-l_AOwner->Left+10,l_NavArrowY2-l_AOwner->Top+6);

          points[0]=Point(l_NavArrowX2-l_AOwner->Left,l_NavArrowY1+(l_NavArrowY2-l_NavArrowY1)/2-l_AOwner->Top-2);
          points[1]=Point(l_NavArrowX2-10-l_AOwner->Left,l_NavArrowY1-6-l_AOwner->Top);
          points[2]=Point(l_NavArrowX2-10-l_AOwner->Left,l_NavArrowY2+2-l_AOwner->Top);
          l_AOwner->Canvas->Pen->Color=(TColor)(l_NavArrowColor.ToInt());
          l_AOwner->Canvas->Polygon(points,2);

          l_AOwner->Canvas->Pen->Color=colors[0];
          l_AOwner->Canvas->MoveTo(l_NavArrowX2-l_AOwner->Left,l_NavArrowY1+(l_NavArrowY2-l_NavArrowY1)/2-l_AOwner->Top-1);
		  l_AOwner->Canvas->LineTo(l_NavArrowX2-l_AOwner->Left-10,l_NavArrowY2-l_AOwner->Top+3);
          l_AOwner->Canvas->Pen->Color=colors[1];
          l_AOwner->Canvas->MoveTo(l_NavArrowX2-l_AOwner->Left,l_NavArrowY1+(l_NavArrowY2-l_NavArrowY1)/2-l_AOwner->Top);
          l_AOwner->Canvas->LineTo(l_NavArrowX2-l_AOwner->Left-10,l_NavArrowY2-l_AOwner->Top+4);
          l_AOwner->Canvas->Pen->Color=colors[2];
          l_AOwner->Canvas->MoveTo(l_NavArrowX2-l_AOwner->Left,l_NavArrowY1+(l_NavArrowY2-l_NavArrowY1)/2-l_AOwner->Top+1);
          l_AOwner->Canvas->LineTo(l_NavArrowX2-l_AOwner->Left-10,l_NavArrowY2-l_AOwner->Top+5);
		  l_AOwner->Canvas->Pen->Color=colors[3];
          l_AOwner->Canvas->MoveTo(l_NavArrowX2-l_AOwner->Left,l_NavArrowY1+(l_NavArrowY2-l_NavArrowY1)/2-l_AOwner->Top+2);
          l_AOwner->Canvas->LineTo(l_NavArrowX2-l_AOwner->Left-10,l_NavArrowY2-l_AOwner->Top+6);
		}
        else
        {
          l_AOwner->Canvas->FillRect(TRect(l_NavArrowX1-l_AOwner->Left+10,l_NavArrowY1-l_AOwner->Top,l_NavArrowX2-l_AOwner->Left,l_NavArrowY2-l_AOwner->Top-10));

          points[0]=Point(l_NavArrowX1-l_AOwner->Left,l_NavArrowY1+(l_NavArrowY2-l_NavArrowY1)/2-l_AOwner->Top);
          points[1]=Point(l_NavArrowX1+10-l_AOwner->Left,l_NavArrowY1-4-l_AOwner->Top);
          points[2]=Point(l_NavArrowX1+10-l_AOwner->Left,l_NavArrowY2+4-l_AOwner->Top);
          l_AOwner->Canvas->Polygon(points,2);

          points[0]=Point(l_NavArrowX2-l_AOwner->Left,l_NavArrowY1+(l_NavArrowY2-l_NavArrowY1)/2-l_AOwner->Top);
          points[1]=Point(l_NavArrowX2-10-l_AOwner->Left,l_NavArrowY1-4-l_AOwner->Top);
          points[2]=Point(l_NavArrowX2-10-l_AOwner->Left,l_NavArrowY2+4-l_AOwner->Top);
          l_AOwner->Canvas->Polygon(points,2);
		}
        break;
      case 6:
        if(l_NavArrow3D==1)
        {
          l_AOwner->Canvas->FillRect(TRect(l_NavArrowX1-l_AOwner->Left,l_NavArrowY1-l_AOwner->Top+10,l_NavArrowX2-l_AOwner->Left,l_NavArrowY2-l_AOwner->Top-10));
          l_AOwner->Canvas->Pen->Color=colors[0];
		  l_AOwner->Canvas->MoveTo(l_NavArrowX2-l_AOwner->Left-3,l_NavArrowY1-l_AOwner->Top+10);
          l_AOwner->Canvas->LineTo(l_NavArrowX2-l_AOwner->Left-3,l_NavArrowY2-l_AOwner->Top-10);
          l_AOwner->Canvas->Pen->Color=colors[1];
          l_AOwner->Canvas->MoveTo(l_NavArrowX2-l_AOwner->Left-2,l_NavArrowY1-l_AOwner->Top+10);
          l_AOwner->Canvas->LineTo(l_NavArrowX2-l_AOwner->Left-2,l_NavArrowY2-l_AOwner->Top-10);
          l_AOwner->Canvas->Pen->Color=colors[2];
          l_AOwner->Canvas->MoveTo(l_NavArrowX2-l_AOwner->Left-1,l_NavArrowY1-l_AOwner->Top+10);
          l_AOwner->Canvas->LineTo(l_NavArrowX2-l_AOwner->Left-1,l_NavArrowY2-l_AOwner->Top-10);
          l_AOwner->Canvas->Pen->Color=colors[3];
          l_AOwner->Canvas->MoveTo(l_NavArrowX2-l_AOwner->Left,l_NavArrowY1-l_AOwner->Top+10);
		  l_AOwner->Canvas->LineTo(l_NavArrowX2-l_AOwner->Left,l_NavArrowY2-l_AOwner->Top-10);

          points[0]=Point(l_NavArrowX1+(l_NavArrowX2-l_NavArrowX1)/2-l_AOwner->Left-2,l_NavArrowY1-l_AOwner->Top);
          points[1]=Point(l_NavArrowX1-6-l_AOwner->Left,l_NavArrowY1+10-l_AOwner->Top);
          points[2]=Point(l_NavArrowX2+2-l_AOwner->Left,l_NavArrowY1+10-l_AOwner->Top);
          l_AOwner->Canvas->Pen->Color=(TColor)(l_NavArrowColor.ToInt());
          l_AOwner->Canvas->Polygon(points,2);

          l_AOwner->Canvas->Pen->Color=colors[0];
          l_AOwner->Canvas->MoveTo(l_NavArrowX1+(l_NavArrowX2-l_NavArrowX1)/2-l_AOwner->Left-1,l_NavArrowY1-l_AOwner->Top);
          l_AOwner->Canvas->LineTo(l_NavArrowX2-l_AOwner->Left+3,l_NavArrowY1-l_AOwner->Top+10);
          l_AOwner->Canvas->Pen->Color=colors[1];
          l_AOwner->Canvas->MoveTo(l_NavArrowX1+(l_NavArrowX2-l_NavArrowX1)/2-l_AOwner->Left,l_NavArrowY1-l_AOwner->Top);
          l_AOwner->Canvas->LineTo(l_NavArrowX2-l_AOwner->Left+4,l_NavArrowY1-l_AOwner->Top+10);
		  l_AOwner->Canvas->Pen->Color=colors[2];
          l_AOwner->Canvas->MoveTo(l_NavArrowX1+(l_NavArrowX2-l_NavArrowX1)/2-l_AOwner->Left+1,l_NavArrowY1-l_AOwner->Top);
          l_AOwner->Canvas->LineTo(l_NavArrowX2-l_AOwner->Left+5,l_NavArrowY1-l_AOwner->Top+10);
          l_AOwner->Canvas->Pen->Color=colors[3];
          l_AOwner->Canvas->MoveTo(l_NavArrowX1+(l_NavArrowX2-l_NavArrowX1)/2-l_AOwner->Left+2,l_NavArrowY1-l_AOwner->Top);
          l_AOwner->Canvas->LineTo(l_NavArrowX2-l_AOwner->Left+6,l_NavArrowY1-l_AOwner->Top+10);

          points[0]=Point(l_NavArrowX1+(l_NavArrowX2-l_NavArrowX1)/2-l_AOwner->Left-2,l_NavArrowY2-l_AOwner->Top);
          points[1]=Point(l_NavArrowX1-6-l_AOwner->Left,l_NavArrowY2-10-l_AOwner->Top);
          points[2]=Point(l_NavArrowX2+2-l_AOwner->Left,l_NavArrowY2-10-l_AOwner->Top);
          l_AOwner->Canvas->Pen->Color=(TColor)(l_NavArrowColor.ToInt());
          l_AOwner->Canvas->Polygon(points,2);

          l_AOwner->Canvas->Pen->Color=colors[0];
          l_AOwner->Canvas->MoveTo(l_NavArrowX1+(l_NavArrowX2-l_NavArrowX1)/2-l_AOwner->Left-1,l_NavArrowY2-l_AOwner->Top);
          l_AOwner->Canvas->LineTo(l_NavArrowX2-l_AOwner->Left+3,l_NavArrowY2-l_AOwner->Top-10);
          l_AOwner->Canvas->Pen->Color=colors[1];
		  l_AOwner->Canvas->MoveTo(l_NavArrowX1+(l_NavArrowX2-l_NavArrowX1)/2-l_AOwner->Left,l_NavArrowY2-l_AOwner->Top);
          l_AOwner->Canvas->LineTo(l_NavArrowX2-l_AOwner->Left+4,l_NavArrowY2-l_AOwner->Top-10);
          l_AOwner->Canvas->Pen->Color=colors[2];
          l_AOwner->Canvas->MoveTo(l_NavArrowX1+(l_NavArrowX2-l_NavArrowX1)/2-l_AOwner->Left+1,l_NavArrowY2-l_AOwner->Top);
          l_AOwner->Canvas->LineTo(l_NavArrowX2-l_AOwner->Left+5,l_NavArrowY2-l_AOwner->Top-10);
          l_AOwner->Canvas->Pen->Color=colors[3];
          l_AOwner->Canvas->MoveTo(l_NavArrowX1+(l_NavArrowX2-l_NavArrowX1)/2-l_AOwner->Left+2,l_NavArrowY2-l_AOwner->Top);
		  l_AOwner->Canvas->LineTo(l_NavArrowX2-l_AOwner->Left+6,l_NavArrowY2-l_AOwner->Top-10);
        }
        else
        {
          l_AOwner->Canvas->FillRect(TRect(l_NavArrowX1-l_AOwner->Left,l_NavArrowY1-l_AOwner->Top+10,l_NavArrowX2-l_AOwner->Left,l_NavArrowY2-l_AOwner->Top-10));

          points[0]=Point(l_NavArrowX1+(l_NavArrowX2-l_NavArrowX1)/2-l_AOwner->Left,l_NavArrowY1-l_AOwner->Top);

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?