Einzelnen Beitrag anzeigen

SearchBot

Registriert seit: 27. Jun 2004
Ort: N-W vom Bodensee
313 Beiträge
 
Delphi 12 Athens
 
#9

AW: Mausklick simulieren klappt einfach nicht :-(

  Alt 16. Aug 2012, 22:49
Oooooooooooooooooooooooooh, ich bin ein Vollpfosten!!!

In einer App mit 'nur Klicken' geht es - in meiner geht es nicht (jetzt aber endlich schon).

Hier ist der Grund - siehst du ihn auch?

Auszug, wie ich den Script für die Mausposition zerlege... s='@ML400,200;';
Code:
        case upcase(s[i+1]) of
         'M','V':begin
              t:=copy(s,i+3,pos(';',s)-(i+3)); inc(i,length(t)+4);
              u:=copy(t,1,pos(',',t)-1); delete(t,1,pos(',',t));
              x:=strtoint(u); y:=strtoint(t);
              if upcase(s[i+1])='M' then MClick2(upcase(s[i+2]),x,y)
              else SetCursorPos(x,y);
             end;
Dieser kleine Teufelsbug hat mich jetzt 10 Stunden rumgebastele gekostet
..und ich hoffe, daß es dann auch in FoxPro so funzt...
  Mit Zitat antworten Zitat