From b17ae5c53983d94a1c4d0e33636a342b0a18424c Mon Sep 17 00:00:00 2001 From: Merlijn Wajer Date: Sat, 25 Sep 2010 18:16:12 +0200 Subject: [PATCH] Add rs_GetUpTextAtEx. --- Units/MMLAddon/PSInc/Wrappers/ocr.inc | 5 +++++ Units/MMLAddon/PSInc/psexportedmethods.inc | 1 + 2 files changed, 6 insertions(+) diff --git a/Units/MMLAddon/PSInc/Wrappers/ocr.inc b/Units/MMLAddon/PSInc/Wrappers/ocr.inc index c8ce773..a9f7bc2 100644 --- a/Units/MMLAddon/PSInc/Wrappers/ocr.inc +++ b/Units/MMLAddon/PSInc/Wrappers/ocr.inc @@ -3,6 +3,11 @@ begin Result := CurrThread.Client.MOCR.GetUpTextAtEx(7, 7, true); end; +function ps_rs_GetUpTextAtEx(x, y: integer; shadow: boolean): string; extdecl; +begin + result := CurrThread.Client.MOCR.GetUpTextAtEx(x, y, shadow); +end; + function ps_rs_GetUpTextAt(x, y : integer): string; extdecl; begin result := CurrThread.Client.MOCR.GetUpTextAtEx(x,y,true); diff --git a/Units/MMLAddon/PSInc/psexportedmethods.inc b/Units/MMLAddon/PSInc/psexportedmethods.inc index 66b5c98..887a3ce 100644 --- a/Units/MMLAddon/PSInc/psexportedmethods.inc +++ b/Units/MMLAddon/PSInc/psexportedmethods.inc @@ -316,6 +316,7 @@ AddFunction(@ps_GetKeyCode,'function GetKeyCode(c : char) : integer;'); SetCurrSection('OCR'); AddFunction(@ps_rs_GetUpText, 'function rs_GetUpText: string;'); AddFunction(@ps_rs_GetUpTextAt, 'function rs_GetUpTextAt(x, y : integer): string;'); +AddFunction(@ps_rs_GetUpTextAtEx, 'function rs_GetUpTextAtEx(x, y: integer; shadow: boolean): string'); AddFunction(@ps_BitmapFromText, 'function BitmapFromText(const text, font: String): integer;'); AddFunction(@ps_TPAFromText, 'function TPAFromText(const text, font: String;var w,h : integer): TPointArray;'); AddFunction(@ps_TPAFromTextWrap,'procedure TPAFromTextWrap(const text, font: String;var w,h : integer;var TPA : TPointArray);');