Probleme mit Adobe Reader

[gangs-taas]

hey
könnt ihr euch das nochmal angucken ?
ich hab das jetzt so gelöst :

Delphi-Quellcode:

begin
  Handle := Handle_suchen_Edit  ;
  if Handle <> 0 then
  begin
    for I := 49 to 48 + StrToInt(E_SZ.Text) do
    begin
      if (i > 57) then
      begin
        ZString := IntToStr(i-48);
        SendMEssage(Handle, VK_Clear,0,0);
        for y := 1 to Length(ZString) do
        begin
          ZZahl := StrToInt(ZString[y]);
          SendMessage(Handle, WM_CHAR, Ord(ZZahl+48), 0);
        end;
        PostMessage(Handle, WM_KEYDOWN, VK_RETURN, 0);
        PostMessage(Handle, WM_KEYUP, VK_RETURN, 0);
      end
      else
      begin
        SendMEssage(Handle, VK_Clear,0,0);
        SendMessage(Handle, WM_CHAR, Ord(i), 0);
        PostMessage(Handle, WM_KEYDOWN, VK_RETURN, 0);
        PostMessage(Handle, WM_KEYUP, VK_RETURN, 0);
      end;
    end;
  end;
end;

aber wenn ich das programm nicht schritt-für-schritt mit F7 durchstepp, sondern einfach durchlaufen lasse gibt mir der Reader die MEldung : 'In dem dokiment ist keine seite mit der Zahl "" vorhanden'

aber ich versteh nicht wo ich denn eine Zahl, die es nicht gibt an das dokument sende ?
vorallem wenn ich jede Zeile durchgeh kommt der fehler irg. nicht ....