Simba Code:Function FourNumToTBox(VarName: String; TehCoords: Array [0..3] of Integer): String;
Begin
Result:=Writeln(VarName+'.X1:='+IntToStr(TehCoords[0])+';'+VarName+'.Y1:='+IntToStr(TehCoords[1])+';'+VarName+'.X2:='+IntToStr(TehCoords[2])+';'+VarName+'.Y2:='+IntToStr(TehCoords[3])+';');
End;
Whats wrong with it? I get type mismatch at the end of the long line.




Reply With Quote




