帮忙装vb脚本转换成delphi

Question

请加上必要的解释，谢谢
Report.ScaleMode = 0
Report.ScaleHeight = -5.5 / 1.4
Report.ScaleWidth = 7.6 / 1.4
Report.ScaleLeft = -0.9
Report.ScaleTop = 3
Report.DrawWidth = 1
X = Log10(10)
Report.PSet (0, 0)
Report.FontSize = 6
For i = 1 To 10 Step 0.2
    Report.Line (Log10(i), 0)-(Log10(i), Log10(30)) '»­ÊúÏß
    Report.Line (0, Log10(i))-(Log10(10), Log10(i)) '»­ºáÏß
    aaa = i * 10 Mod 10
      If aaa = 0 Then
         Report.CurrentX = Log10(i) - 0.03
         Report.CurrentY = -0.01
         Report.Print i
         Report.CurrentX = -0.08
         Report.CurrentY = Log10(i) + 0.015
         Report.Print i
      End If
Next i

Answer 1

开玩笑，绘图指令两者是相差狠大的，还不如看看到底绘的什么图，然后用DELPHI重写呢。

Answer 2

晕, 两个星星还问这个问题.Report在VB中是什么对象?????

Answer 3

不用管什么对象，ScaleMode、ScaleHeight、ScaleWidth、ScaleLeft、ScaleTop 是设置比例的；DrawWidth 是设置画笔粗细的；PSet 是画点的；FontSize 是设置对象输出字体的；Line 是画线的；CurrentX、CurrentY 是移动画笔的；Print 是输出文字的。只要在DELPHI里面找到Canvas对象，用相应的方法就可以了。