Recent

Author Topic: Simple Perspective program (included)  (Read 2322 times)

Handoko

  • Hero Member
  • *****
  • Posts: 4087
  • My goal: build my own game engine using Lazarus
Re: Simple Perspective program (included)
« Reply #30 on: December 19, 2020, 06:38:05 am »
I had no idea setting tabstop=false had so little effect. :P

It can be solved by set the Key to 0 in the OnKeyDown event. Tested on Linux GTK2, it works.

Code: Pascal  [Select][+][-]
  1. procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState
  2.   );
  3. begin
  4.   if (Key in [37..40, 49..57, 97..105]) then Key := 0;
  5. end;

trev

  • Global Moderator
  • Hero Member
  • *****
  • Posts: 1282
  • Former Delphi 1-7, 10.2 User
Re: Simple Perspective program (included)
« Reply #31 on: December 19, 2020, 06:59:42 am »
I had no idea setting tabstop=false had so little effect. :P

It can be solved by set the Key to 0 in the OnKeyDown event. Tested on Linux GTK2, it works.

Tested on macOS - it works :)
Lazarus 2.1 r64368 FPC 3.3.1 r48100 macOS 10.14.6 Xcode 11.3.1
Lazarus 2.1 r64455 3.3.1 r48840   macOS 11.2.2 aarch64 Xcode 12.4
Lazarus 2.1 r61574 3.3.1 r42318 FreeBSD 12.1 amd64 VMware VM
Lazarus 2.1 r61574 3.0.4 Ubuntu 20.04 Parallels VM
Lazarus 2.0.10 3.2.0 Win10 Parallels VM

speter

  • Full Member
  • ***
  • Posts: 163
Re: Simple Perspective program (included)
« Reply #32 on: December 19, 2020, 07:12:02 am »
I had no idea setting tabstop=false had so little effect. :P

It can be solved by set the Key to 0 in the OnKeyDown event. Tested on Linux GTK2, it works.

Tested on macOS - it works :)
Tested on Windows 10 - it works there as well.
I climbed mighty mountains, and saw that they were actually tiny foothills. :)

Laz 2.0.10 / FPC 3.2.0 / Windows 10 (64bit)

 

TinyPortal © 2005-2018