Hola chicos
Por favor, me gustaría saber qué parámetro falta para ejecutar la
procedure TForm1.FormCreate; DENTRO de la
Función InicarHotKey
El error me dice:
Not enough actual parameters (Los parámetros son insuficientes)
Sin que me hagan preguntas para qué lo quiero, sólo díganme si se puede ejecutar la
procedure dentro de la función. Muchas gracias desde ya chicos.
Código Delphi
[-]
FUNCTION InicarHotKey( VAR Params : ARRAY OF PChar; vTitle, p: PChar ) : BOOLEAN;
BEGIN
TForm1.FormCreate();
END;
Código Delphi
[-]
procedure TForm1.FormCreate(Sender: TObject);
const
MOD_ALT = 1;
MOD_CONTROL = 2;
MOD_SHIFT = 4;
MOD_WIN = 8;
VK_A = $41;
VK_R = $52;
VK_F4 = $73;
begin
id1 := GlobalAddAtom('Hotkey1');
RegisterHotKey(Handle, id1, MOD_CONTROL, VK_A);
end;