SRL Archive - Help and Support

Anyone know how to activate the SMART? (gain focus/go infront)
ActivateClient doesn't work for SMART.

EIOS Doesn't support ActivateClient… Tho you could do something like this.

{$DEFINE SMART}
{$i srl-6/srl.simba}

procedure BringToFront(const PID: Integer);
var
  Processes: TSysProcArr;
  i: Integer;
begin
  Processes := GetProcesses();
  for i := 0 to High(Processes) do
    if (Pos(Format('[%d]', [PID]), Processes[i].Title) > 0) then
    begin
      SetTarget(Processes[i]);
      ActivateClient();
    end;
end;


begin
  setupSRL();

  BringToFront(__smartCurrentPid);
end.       

From: Olly
EIOS Doesn't support ActivateClient… Tho you could do something like this.

{$DEFINE SMART}
{$i srl-6/srl.simba}

procedure BringToFront(const PID: Integer);
var
  Processes: TSysProcArr;
  i: Integer;
begin
  Processes := GetProcesses();
  for i := 0 to High(Processes) do
    if (Pos(Format('[%d]', [PID]), Processes[i].Title) > 0) then
    begin
      SetTarget(Processes[i]);
      ActivateClient();
    end;
end;


begin
  setupSRL();

  BringToFront(__smartCurrentPid);
end.       

ahh right thanks! +rep