Access Violation

[Alejo15x]

Hola!

Tengo un problema con un codigo, el cual solo aparecé al ser llamado directamente desde un TTimer.

Mi codigó se vé así:

TTimer:

Código Delphi [-]
    // Mana Train 1
    if (Mana >= StrToInt(Edit8.Text)) then
    begin
      SendString(Edit9.Text);
      Delay(5000);
    end;

SendString:

Código Delphi [-]
procedure SendString(FVal:String);
var I:Integer;
begin
  for I := 0 to Length(FVal) do
  begin
    SendMessage(FMemory.Hwnd, WM_CHAR, Ord(FVal[i]), 0);
    Delay(VTypeWaitTime);
  end;
  PostMessage(TibiaHwnd, WM_KEYDOWN, VK_RETURN, 0);
end;

En rojo puse el area del error, donde me da una intrución como "Access Violation Error".

Puedo llamar al SendString normalmente y sin ningun problema desde un boton, o cualquier cosa, pero menos del TTimer.

Sabén que sucede?. Que eh echo mal?.

Saludos!