How Do I turn them on? (IN A DELPHI PROGRAM OF COURSE) i have tried and asked around
i emplore you
if you know
please
mail
me
 KRaS...@worldnet.att.net

   Thanks!

In article <5h9uml$...@mtinsc03.worldnet.att.net>,
   David Rewak <KRaS...@geocities.com> wrote:
]-How Do I turn them on? (IN A DELPHI PROGRAM OF COURSE) i have tried and asked around
]-i emplore you
]-if you know
]-please
]-mail
]-me
]- KRaS...@worldnet.att.net
]-
]-
]-   Thanks!
]-

try this...

procedure TMyForm.Button1Click(Sender: TObject);
  Var
    KeyState  :  TKeyboardState;
  begin
    GetKeyboardState(KeyState);
    if (KeyState[VK_NUMLOCK] = 0) then
      KeyState[VK_NUMLOCK] := 1
    else
      KeyState[VK_NUMLOCK] := 0;
    SetKeyboardState(KeyState);
  end;

for caps lock substitute VK_CAPITAL for VK_NUMLOCK.

Mark Vaughan