Shuttleu
2010-12-07 17:21:42
returns which bank tab you are on
:D
~shut
BANK_TAB_ACTIVE = 1419;
{*******************************************************************************
function R_CurrentBankTab: Integer;
By: Shuttleu
Description: Returns which tab you are currntly on.
*******************************************************************************}
function R_CurrentBankTab: Integer;
var
i, x: Integer;
begin
for i:= 62 downto 46 do
begin
x:= GetInterfaceComponentTextureID(INTERFACE_BANK, i);
if (x = BANK_TAB_ACTIVE) then break;
end;
if InIntArrayEx([62, 60, 58, 56, 54, 52, 50, 48, 46], x, i) then
Result:= (x+1) else Result:= -1;
end; :D
~shut