<div dir="ltr"><div class="gmail_default" style="font-family:tahoma,sans-serif">chequea por Shift=ssNone para tener F2 sola.</div></div><div class="gmail_extra"><br><br><div class="gmail_quote">2013/8/17 Paola Bruccoleri <span dir="ltr"><<a href="mailto:pbruccoleri@adinet.com.uy" target="_blank">pbruccoleri@adinet.com.uy</a>></span><br>
<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex"><div class="im">El 13/08/2013 20:37, José Mejuto escribió:<br>
</div><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">
El 14/08/2013 0:51, Paola Bruccoleri escribió:<div><div class="h5"><br>
<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">
El 13/08/2013 18:51, José Mejuto escribió:<br>
<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">
El 13/08/2013 16:53, Paola Bruccoleri escribió:<br>
<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">
Hola todos..<br>
<br>
existe la constante para la combinación de teclas CTRL F10??<br>
no la encuentro; quizás aquí no se puedan capturar esas combinaciones de<br>
tecla para ejecutar algo...<br>
<br>
</blockquote>
<br>
Las virtual keys son sólo de una key ;) Creo que te refieres a esto:<br>
<br>
procedure LoQueSea.KeyDown(var Key: Word; Shift: TShiftState);<br>
begin<br>
  if key=VK_F10 and Shift=[ssCtrl] then begin<br>
    blah;<br>
    blah;<br>
  end;<br>
end;<br>
<br>
</blockquote>
Hola José..<br>
lo probé recién y me sale este error al compilar:<br>
Error: Incompatible types: got "TShiftState" expected "LongInt"<br>
</blockquote>
<br>
Hola,<br>
<br>
Se me han quedado atrás un par de paréntesis:<br>
<br>
procedure LoQueSea.KeyDown(var Key: Word; Shift: TShiftState);<br>
begin<br>
  if (key=VK_F10) and (Shift=[ssCtrl]) then begin<br>
    blah;<br>
    blah;<br>
  end;<br>
end;<br>
<br>
<br>
</div></div></blockquote>
Hola José...<br>
<br>
se me ha presentado un petit problemita con esto de las combinaciones de teclas.<br>
En el formKeyDown capturo varias Fx, y entre ellas tengo definidas F2 y CTRL F2 que obviamente hacen diferentes cosas.<br>
<br>
if (key=VK_F2) then begin<br>
----<br>
end;<br>
if(key=VK_F2) and (Shift=[ssCtrl]) then begin<br>
----<br>
end;<br>
<br>
PERO... si presiono CTRL F2, primero pasa por la rutina de F2 y luego por la de CTRL F2<br>
<br>
si cambio la estructura y pongo el 2do if dentro del else del primer if, por más que presione ctrl f2, siempre ejecuta F2<br>
<br>
existirá alguna otra forma de solucionarlo??<br>
muchas gracias!<div class="HOEnZb"><div class="h5"><br>
<br>
<br>
<br>
<br>
______________________________<u></u>_________________<br>
Lazarus-es mailing list<br>
<a href="mailto:Lazarus-es@lists.lazarus.freepascal.org" target="_blank">Lazarus-es@lists.lazarus.<u></u>freepascal.org</a><br>
<a href="http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus-es" target="_blank">http://lists.lazarus.<u></u>freepascal.org/mailman/<u></u>listinfo/lazarus-es</a><br>
</div></div></blockquote></div><br><br clear="all"><div><br></div>-- <br><div><span style="font-family:tahoma,sans-serif">Try not to become a man of success but rather to become a man of value. <i>Albert Einstein</i></span></div>

</div>