or dendro do case delphi code example
Example: case delphi
case key of
VK_Escape : close;
VK_F2 : BtF2.Click;
VK_F3 : BtF3.Click;
VK_F4 : BTF4.click;
end;
case key of
VK_Escape : close;
VK_F2 : BtF2.Click;
VK_F3 : BtF3.Click;
VK_F4 : BTF4.click;
end;