Непонятная ошибка

[stalker1995s]

Пишу программку, и в друг, ошибка неволяжка, гугля не помогает

Ошибка:

[Error] Project1.dpr(41): Missing operator or semicolon
[Error] Project1.dpr(41): Incompatible types

Код:

program Project1;

{$APPTYPE CONSOLE}

uses
SysUtils;

Type

TVector = Record
PosX: Single;
PosY: Single;
PosZ: Single;
end;

var Spawn: TextFile;
Pos: TVector;
NameLoc: String;

Procedure GetVar;
var i: integer;
Count: integer;
begin
AssignFile(Spawn,'Spawn.txt');
Reset(Spawn);

Read(Spawn,NameLoc);
for i:=0 to Length(NameLoc) do
begin

Writeln(Length(NameLoc));

end;
CloseFile(Spawn);
end;

begin
GetVar;

Writeln('Location Name: '+NameLoc);
if Pos('::',NameLoc) > 0 then Writeln('Yes!');

Readln;
end.

Ругается на строку Pos() после первой скобки.

[BDA]

Pos: TVector; и Pos('::',NameLoc) думаем...

Вы перекрыли имя стандартной функции своим описанием.

[stalker1995s]

Черт побери, вот я дубина =D. Спасибо, буду внимательней