FrmDummy=CREATEOBJECT("Form") FrmDummy.ADDOBJECT("OleGraph","OleBoundControl") WITH FrmDummy.OleGraph .Height = 900 .Width = 600 .ControlSource = "GraphBmp.GraphBmp" .ChartArea.Border.Color = RGB(0,0,128) .ChartArea.Interior.Color = RGB(255,255,128) .HasLegend = .T. .HasTitle = .F. .Legend.LegendEntries(4).Legendkey.Interior.Color = RGB(255,0,0) && Red .Legend.LegendEntries(3).Legendkey.Interior.Color = RGB(255,255,0) && Yellow .Legend.LegendEntries(2).Legendkey.Interior.Color = RGB(0,255,255) && Cyan .Legend.LegendEntries(1).Legendkey.Interior.Color = RGB(0,0,128) && Blue .HasLegend = .F. .Axes(2).HasTitle = .T. .Axes(2).AxisTitle.Caption = "Square Footage in Thousands" .Axes(2).AxisTitle.Font.Size = 10 .Axes(2).TickLabels.Font.Size = 10 .Axes(1).TickLabels.Font.Size = 10 ENDWITH RELEASE FrmDummyMarcia