RegisterHotKey Probleme

[Sim_Star]

Super, vielen Dank für die Hilfe. Also der erste Key Parameter ist reserviert für CTRL, Shift, usw. Braucht man ne single taste, so lässt man key1 frei und nutzt nur key2.


Vielen Dank.

PS. Drei Tasten kann men nicht zufällig definieren als Hotkey?

[BUG]

Zitat:

Zitat von Sim_Star (Beitrag 1305429)

Drei Tasten kann men nicht zufällig definieren als Hotkey?

Klar, man kann mehrere Modifier übergeben; dafür werden die verodert, zB.

Delphi-Quellcode:

MOD_ALT and MOD_CONTROL and MOD_SHIFT

[Photoner]

ach ja. habe folgendes eingefügt:

Delphi-Quellcode:

procedure SetHotKey(aKey1, aKey2 : cardinal; aNumber : integer);
begin
  Form1.Memo1.Lines.Add(pchar('HotKey.' + IntToStr(aNumber)) + ' ---> ' + Form1.HotKeyList[aNumber].HotKeyName);


  Form1.HotKeyList[aNumber].HotKey := GlobalAddAtom(pchar('HotKey.' + IntToStr(aNumber)));
  if RegisterHotKey(Form1.Handle, form1.HotKeyList[aNumber].HotKey ,aKey1, aKey2) then Form1.Memo1.Lines.Add('Erfolg')
  else Form1.Memo1.Lines.Add('Fehler: '+IntToStr(GetLastError));
end;

[Photoner]

Zitat:

Zitat von BUG (Beitrag 1305430)

Zitat:

Zitat von Sim_Star (Beitrag 1305429)

Drei Tasten kann men nicht zufällig definieren als Hotkey?

Klar, man kann mehrere Modifier übergeben; dafür werden die verodert, zB.

Delphi-Quellcode:

MOD_ALT and MOD_CONTROL and MOD_SHIFT

Delphi-Quellcode:

MOD_ALT or MOD_CONTROL or MOD_SHIFT

Delphi-Quellcode:

  
if (aString = 'CTRL-ALT') or (aString = 'ALT-CTRL') then result :=  MOD_CONTROL or MOD_ALT;

[BUG]

Zitat:

Zitat von BUG (Beitrag 1305430)

dafür werden die verodert, zB.

Delphi-Quellcode:

MOD_ALT and MOD_CONTROL and MOD_SHIFT

:oops: