Ayuda con canvas en Delphi

[Duargi]

Gracias por ver esto.. Mi problema y duda es el siguiente, debo realizar un plano cartesiano en una Timage utilizando Canvas y tengo el siguiente codigo:

{i:=-150;
ii:=0;
while i<200 do
begin
imageMRU.Canvas.TextOut(ii,(trunc(imageMRU.height div 2)),'|');
i:=i+10;
ii:=ii+10;
end;

i:=-150;
ii:=0;
while i<=200 do
begin
imageMRU.Canvas.Textout(trunc(imageMRU.HEIGHT div 2),ii,'__');
i:=-150;
ii:=ii+10;
end;}


Pero por alguna razon este me da un error que no compila mi projecto, alguien que sepa cual es el problema y que pueda solucionarlo o darme una mejor idea.

De antemano Gracias.

Att: Duargi