dectar se shift esta pressionada

Question

como dectar que a tecla shift esta apertada?seria if dbgrid1.shift = ssShift then          begin             processamento           end????ou como???...

Debora · Answer

tenta o seguinte:No evento OnKeyPress  if key = chr(16) then begin     //processamento  end;...

Bilouro · Answer

[quote:acd3c6334f=�Debora�]tenta o seguinte:No evento OnKeyPress  if key = chr(16) then begin     //processamento  end;[/quote:acd3c6334f]ValueMeaningssShiftThe Shift key is held down.ssAltThe Alt key is held down.ssCtrlThe Ctrl key is held down.ssLeftThe left mouse button is held down.ssRightThe right mouse button is held down.ssMiddleThe middle mouse button is held down.ssDoubleThe mouse was double-clicked.procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;  Shift: TShiftState);begin  if shift =ssShift then    // xxxxend;[]�s...

Anonymous · Answer

no evento onkeydownif tbKeyIsDown(VK_SHIFT) then...

F�rum dectar se shift esta pressionada #146867