Footy
2012-07-17 16:50:53
I was wondering how to manually fix isuptext, I cant work my maple chopper withount it. Thanks guys!
2012-07-17 16:50:53
2012-07-22 06:01:19
(*
FindTextEx
~~~~~~~~
.. code-block:: pascal
function FindTextEx(var cx, cy: Integer; txt,font: TStringArray; xs, ys, xe, ye: Integer): Boolean;
Searches for text or texts in specified box with specified font or fonts returns
true on first find of one of the texts with one of the fonts in the specified
box, returns x, y values aswell.
.. note::
by Stupid3ooo, modified by LordJashin
Example:
.. code-block:: pascal
var
x, y, w, h: Integer;
fonts, txts: TStringArray;
begin
fonts := ['MyOwnFontSet', 'SmallCharacters'];
txts := ['Simba', 'HakunaMatata'];
SetDesktopAsClient;
GetClientDimensions(w, h);
if FindTextEx(x, y, txts, fonts, 0, 0, w - 1, h - 1) then
MoveMouse(x, y);
end.
*)Or one of its other forms (like FindText).2012-07-22 06:21:49
function PGetUpText: string;
begin
Result := rs_GetUpTextAt(x co-ord, y co-ord);
end;2012-07-22 07:27:06
2012-07-22 10:03:45