So, i made thisbut it isnt working and i dont know why??SCAR Code:program Spidek;
{.include srl/srl.scar}
var
x, y, chars1: integer;
text: string;
begin
SetUpSrl;
chars1 := LoadChars2(AppPath + 'Fonts\SpidekChars');
x := 15;
y := 9;
text := Trim(GetTextAtEx(x, y, 100, chars1, false, false, 0, 5, 16777215, 500, false, tr_AllChars));
WriteLn(text);
end.
a004 is text to find.





Reply With Quote

