Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by microtronx,
10. Mär 2005
Hier ein Schnippsel, der bestimmt weiterhilft.
procedure TMyForm.ApplicationShortcut(var Msg: TWMKey; var Handled: Boolean);
begin
// wenn ALT + STRG + H gedrückt ist ...
if (msg.CharCode=ord('H')) or (msg.charcode=ord('h')) then
if (GetKeyState(VK_CONTROL) < 0) and (GetKeyState(VK_MENU) < 0) then begin
MyHideFunction;
end;
end;
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by microtronx,
10. Mär 2005
Hi Supasta,
ich würde es einfach über die FORM.OnShortCut abfangen und dem Editfeld den Focus mit "editfeld02.setfocus" zuweisen.
Mfg.