Fixar tamanho e posicionamento indepedente de resolução

[Read]

eu gostaria q indepedente de resolução meu programa fosse mantido

no mesmo posicionamento e tamanho q na 1024x768..

em 800x600 meu programa quase q some...

tamanho

width 276

Height 154

posição

top: 581

Left: 745

alterando o posicionamento pra em vez de esquera, topo para direita, fundo deve resolver a questão de posicionamento mais sei fazer isso não, alguém me dá uma luz q meu projeto ta empacado aqui heheh..

Editado Janeiro 14, 2011 por Read

[Jhonas]

Favor Pesquisar no forum antes de postar a sua dúvida

http://scriptbrasil.com.br/forum/index.php...st&p=528172

ou pesquise pela palavra resolução

abraço

[Read]

funcionou não

continua ficando fora de foco

tem nenhum outro script não

tentei assim

const
  sw : longint = 800;
  sh : longint = 600;

e assim

const
  sw : longint = 1024;
  sh : longint = 768;

procedure TForm1.FormCreate(Sender: TObject);
AQUI COLOQUEI O RESTANTE DO TEU CODIGO
begin
injetado:=0;
end;

Editado Janeiro 15, 2011 por Read

[Jhonas]

Funciona sim... veja o que voce pode estar fazendo de errado ... olhe o código com mais cuidado

abraço

[Read]

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, jpeg, ExtCtrls, WinSkinData, uallProcess, uallHook, StdCtrls,
  Buttons, TlHelp32, TypInfo;

  const
  sw : longint = 1024;
  sh : longint = 768;


procedure TForm1.FormCreate(Sender: TObject);
var i , w : integer;
begin
w := width; // automatico ou pode usar a constante sh
Scaled := true;
if (Screen.width <> sw) then
Scaleby(screen.width,sw);
for i := ComponentCount-1 downto 0 do
with Components[i] do
begin
if GetPropInfo(ClassInfo, 'Font') <> nil then
Font.Size := (width div w) * font.Size;
begin
injetado:=0;
begin
SetWindowLong( application.handle, GWL_EXSTYLE,
GetWindowLong( application.handle, GWL_EXSTYLE )
or WS_EX_TOOLWINDOW and not WS_EX_APPWINDOW );
end;
end;
end;
end;

meu programa é um injetor q ataca um jogo, esse jogo roda em 800x600, quando minimizo o jogo pra area de trabalho a resolução fica em 800x600 então como o programa é posicionando em 1024x768 ele fica fora de foco..