The following worked fine in Delphi. I can't get it to work in Lazarus.
Tips, please!
procedure FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
const FunctionKeys:array[vk_f1..vk_f12] of string[3]=
('F1','F2','F3','F4','F5','F6','F7','F8','F9','F10','F11','F12');
Am 2015-06-12 um 15:08 schrieb Larry Dalton:
The following worked fine in Delphi. I can't get it to work in Lazarus. Tips,
please!
What is the problem?
const FunctionKeys:array[vk_f1..vk_f12] of string[3]=
('F1','F2','F3','F4','F5','F6','F7','F8','F9','F10','F11','F12');
Where do you use
Will try that, but first problem is nothing happens when key pressed
Sent from my iPhone
On Jun 12, 2015, at 11:02, Jürgen Hestermann juergen.hesterm...@gmx.de
wrote:
Am 2015-06-12 um 15:08 schrieb Larry Dalton:
The following worked fine in Delphi. I can't get it to work in Lazarus.
I forgot to include that this is on Windows 7 platform
Sent from my iPhone
On Jun 12, 2015, at 11:02, Jürgen Hestermann juergen.hesterm...@gmx.de
wrote:
Am 2015-06-12 um 15:08 schrieb Larry Dalton:
The following worked fine in Delphi. I can't get it to work in Lazarus.
Tips, please!
Will try that, but first problem is nothing happens when key pressed
Did you set KeyPreview to true?
--
View this message in context:
http://free-pascal-lazarus.989080.n3.nabble.com/Lazarus-Formkeydown-tp4042578p4042588.html
Sent from the Free Pascal - Lazarus mailing list archive