Olá delphianos !
preciso fazer um controle em um form, para que ele nunca receba o foco, esse
sistema é responsavel por exibir precos de produtos na forma de video, os
videos (varios) sao disparados por outro sistema no mesmo micro via:
PostMessage(FrmReceptora, CM_EXIBE_TELA_FILME1, 0, 0)
estou usando uma DLL para exibicao de videos que encontrei na Torrys Delphi
(Dr.SAGURA Media Player v.1.0), estava usando o componente do Windows Media
Player, mas achei pesado
essa DLL é leve mas quando carrega um video, o form dos videos fica com o foco,
no momento uso o comando:
SetForegroundWindow(FindWindow('TNomeForm',nil));
para voltar o foco para o sistema principal, mas como os videos mudam sempre, o
foco fica alternando muito entre os sistemas.
Tentei algo com :
procedure TDemoForm.WMActivate(var Msg: TWMActivate);
begin
WA_ACTIVE :begin
Msg.Result := 0;// cancelar foco
end;
end;
e
procedure TDemoForm.WndProc(var Message: TMessage);
begin
if (Message.Msg = WM_ACTIVATE) then
begin
Msg.Result := 0;// cancelar foco
end;
end;
mas sem sucesso, o foco sempre fica no form dos videos !
como posso evitar o foco no form ?
OBrigado
Jean Alysson
