diff --git a/components/tvplanit/source/vpedelem.pas b/components/tvplanit/source/vpedelem.pas
index 05fd46611..35ce12598 100644
--- a/components/tvplanit/source/vpedelem.pas
+++ b/components/tvplanit/source/vpedelem.pas
@@ -368,10 +368,10 @@ begin
   btnCancel.AnchorSideRight.Side := asrBottom;
   btnCancel.TabOrder := 2;
  {$ELSE}
-  btnCancel.AnchorSideRight.Control := ButtonPanel;
-  btnCancel.TabOrder := 1;
   btnOK.AnchorSideRight.Control := ButtonPanel;
   btnOK.AnchorSideRight.Side := asrBottom;
+  btnCancel.AnchorSideRight.Control := btnOK;
+  btnCancel.TabOrder := 1;
   btnOK.TabOrder := 2;
  {$ENDIF}