急救！！！出现“类型的实际和正式-增值转卖商参数必须是相同的（英文是： Types of actual and formal var parameters must be identical）”的错误，怎么解决？

Question

声明为var 类型的参数必须和填入的值类型相同
但是你填的市常量，所以不行；
两种解决方案：
1）修改声明：
function printsetup(const nWidth,nHeight,nOrient:word):integer;
2)修改使用的地方：
var
  Width, Height, Orient: word;
  status: integer;
begin
  width := 2000;
  height := 3000;
  orient := 1;
  status := PrintSetup(width, height, orient);
  ....

Answer 1

var nWidth,nHeight,nOrient:word输入参数必须是变量，不是常量