您所在位置：主题：求教：free pascal 的graph单元怎么使用？
zhucezhuce
[专家分：0] 发布于 2009-02-27 17:45:00
原学TP现改FP，graph单元在FP中怎么使用？从目录来看，FP的graph单元在fpc\2.2.2\units\i386-w32\graph下，但老是提示无法找到graph单元。难道还要重新下或用法有变化？
以下是一个在TP下正常的程序，FP死活不行。还有FP的在线帮助文件比TP差远了，例子极少。
Program ex1;
Uses graph;
Var Gm,Gd,R :integer;
Begin
Gd:=0;
Write('Please enter the radius:');readln(R);
Initgraph(Gm,Gd,'d:\fpc\2.2.2\units\i386-w32\graph');
Circle(320,240,R);
Readln;
Closegraph;
End.
以下是一个在TP下正常的程序，FP死活不行。还有FP的在线帮助文件比TP差远了，例子极少。
Program ex1;
Uses graph;
Var Gm,Gd,R :integer;
Begin
Gd:=0;
Write('Please enter the radius:');readln(R);
Initgraph(Gm,Gd,'d:\fpc\2.2.2\units\i386-w32\graph');
Circle(320,240,R);
Readln;
Closegraph;
End.