Hallo Aviator,
ich spiele gerade ein wenig meiner Deiner Version. Das meiste davon habe ich ja bereits auch schon so gelöst. Allerdings bekomme ich z.B. wenn ich auf
Delphi-Quellcode:
ActiveControl
//z.B. wie bei Dir
if (ActiveControl = vstMain) and (Ord(Key) = VK_TAB) then
Key := #0;
bekomme ich eine Fehlermeldung.
Die
property ActiveControl;
befindet sich ja in der
vcl.Forms
. Doch auf diese habe ich scheinbar aus meiner eigenen
Unit kein Zugriff. Ich habe den Editor in eine eigene
Unit gelegt und dort die
vcl.Forms
eingebunden.