var 

MainForm: TclForm;

PersSwchBtn,MngrSwchBtn : TClProButton;

//Personel 

PersMainPnl: TclProPanel;

PersUserLbl,PersPasswordLbl,PersForgotPassword: TClProLabel;

PersUserEdit,PersPasswordEdit: TclProEdit;

PersLoginBtn,PersRegisterBtn: TClProButton;

PersLoginImg: TCLImage;

PersLogo: TClProImage;

//Yönetici

MngrMainPnl: TclProPanel;

MngrUserLbl,MngrPasswordLbl,MngrForgotPassword: TClProLabel;

MngrUserEdit,MngrPasswordEdit: TclProEdit;

MngrLoginBtn,MngrRegisterBtn: TClProButton;

MngrLoginImg: TCLImage;

MngrLogo: TClProImage;

//Prosödürler

    void managerMainPnlShow;

  {

    MngrMainPnl.Visible = True;

    persMainPnl.Visible = False;

    

    PersSwchBtn.clProSettings.Backgroundcolor= clAlphacolor.clhextocolor('#F8FAFC');

    PersSwchBtn.clProSettings.FontColor = clAlphaColor.clhextocolor('#075660');

    PersSwchBtn.SetclProSettings(PersSwchBtn.clProSettings);

    

    MngrSwchBtn.clProSettings.Backgroundcolor= clAlphacolor.clhextocolor('#075660');

    MngrSwchBtn.clProSettings.FontColor = clAlphaColor.clhextocolor('#F8FAFC');

    MngrSwchBtn.SetclProSettings(MngrSwchBtn.clProSettings);

  }

  

    void personnelMainPnlShow;

  {

    MngrMainPnl.Visible = False;

    persMainPnl.Visible = True;

    

    MngrSwchBtn.clProSettings.Backgroundcolor= clAlphacolor.clhextocolor('#F8FAFC');

    MngrSwchBtn.clProSettings.FontColor = clAlphaColor.clhextocolor('#075660');

    MngrSwchBtn.SetclProSettings(MngrSwchBtn.clProSettings); 

    

    PersSwchBtn.clProSettings.Backgroundcolor= clAlphacolor.clhextocolor('#075660');

    PersSwchBtn.clProSettings.FontColor = clAlphaColor.clhextocolor('#F8FAFC');

    PersSwchBtn.SetclProSettings(PersSwchBtn.clProSettings);

  }

  

    void goToPersAnaSayfa;

  {

    if ((PersUserEdit.text=='1') && (PersPasswordEdit.text=='1'))

    { 

      ShowMessage('Giriş Başarılı! Sayfaya yönlendiriliyorsunuz.');

      Clomosy.RunUnit('PersAnaSayfa');

      MainForm.clHide;

    }

   

    else

    {

      ShowMessage('Bilgileri kontrol ediniz.');

    }

  }

  

  void goToKayitSayfasi;

  {

    Clomosy.RunUnit('kayitSayfasi');

    

  }

{

//AnaForm

  MainForm=TclForm.Create(Self);

  //MainForm.clSetWindowState(fwsMaximized);

  MainForm.BtnFormMenu.Visible = False;

  MainForm.BtnGoBack.Visible = False;

  MainForm.clSetCaption('----- Flodola ----- ');

  MainForm.SetFormColor('#075660','',clGNone);

  

//Personel Switch (Button)

  PersSwchBtn = MainForm.AddNewProButton(MainForm, 'PersSwchBtn', 'Personel');

  PersSwchBtn.align=alNone;

  PersSwchBtn.Position.X =(MainForm.clWidth*30)/100;

  PersSwchBtn.Position.y =(MainForm.clHeight*22.5)/100;

  PersSwchBtn.height = (MainForm.clHeight*10)/100;

  PersSwchBtn.Width = (MainForm.clWidth*20)/100;

  PersSwchBtn.clProSettings.FontColor = clAlphaColor.clhextocolor('#F8FAFC');

  PersSwchBtn.clProSettings.FontSize = 18;

  PersSwchBtn.clProSettings.Backgroundcolor= clAlphacolor.clhextocolor('#075660');

  PersSwchBtn.clProSettings.Bordercolor= clAlphacolor.clhextocolor('#00000');

  PersSwchBtn.clProSettings.BorderWidth = 1;

  PersSwchBtn.clProSettings.RoundHeight = 8;

  PersSwchBtn.clProSettings.RoundWidth = 8;

  PersSwchBtn.SetclProSettings(PersSwchBtn.clProSettings);

//Yönetici Switch (Button)

  MngrSwchBtn = MainForm.AddNewProButton(MainForm, 'MngrSwchBtn', 'Yönetici');

  MngrSwchBtn.align=alNone;

  MngrSwchBtn.Position.X =(MainForm.clWidth*50)/100;

  MngrSwchBtn.Position.y =(MainForm.clHeight*22.5)/100;

  MngrSwchBtn.height = (MainForm.clHeight*10)/100;

  MngrSwchBtn.Width = (MainForm.clWidth*20)/100;

  MngrSwchBtn.clProSettings.FontColor = clAlphaColor.clhextocolor('#075660');

  MngrSwchBtn.clProSettings.FontSize = 18; 

  MngrSwchBtn.clProSettings.Backgroundcolor= clAlphacolor.clhextocolor('#F8FAFC');

  MngrSwchBtn.clProSettings.Bordercolor= clAlphacolor.clhextocolor('#00000');

  MngrSwchBtn.clProSettings.BorderWidth = 1;

  MngrSwchBtn.clProSettings.RoundHeight = 8;

  MngrSwchBtn.clProSettings.RoundWidth = 8;

  MngrSwchBtn.SetclProSettings(MngrSwchBtn.clProSettings);

  

//Personel Panel

  PersMainPnl= MainForm.AddNewProPanel(MainForm, 'PersMainPnl');

  PersMainPnl.align= alCenter;

  PersMainPnl.Height= (MainForm.clHeight* 70)/100;

  PersMainPnl.Width= (MainForm.clWidth*50)/100;

  PersMainPnl.clProSettings.BackgroundColor=clAlphaColor.clHexToColor('#F8FAFC');

  PersMainPnl.clProSettings.BorderColor=clAlphaColor.clHexToColor('#000000');

  PersMainPnl.clProSettings.BorderWidth= 1;

  PersMainPnl.clProSettings.RoundHeight= 35;

  PersMainPnl.clProSettings.RoundWidth= 35;

  PersMainPnl.SetclProSettings(PersMainPnl.clProSettings);

  

//Personel Logo - BİTMEDİ

  /*

  Logo= MainForm.AddNewProImage(PersMainPnl, 'Logo');

  Logo.clProSettings.PictureSource = ' https://clomosy.com/demos/computerNetwork.png" rel="nofollow - https://clomosy.com/demos/computerNetwork.png ';

  Logo.align= alNone;

  Logo.Position.y =(PersMainPnl.Height*10)/100;

  Logo.Position.X =(PersMainPnl.Width*5)/100;

  Logo.Height= (PersMainPnl.Height* 20)/100;

  Logo.Width= (PersMainPnl.Width*90)/100;

  Logo.SetclProSettings(Logo.clProSettings);

  */

  

//Personel Kullanıcı Adı Label

  PersUserLbl=MainForm.AddNewProLabel(PersMainPnl, 'PersUserLbl', 'Kullanıcı Adı');

  PersUserLbl.align =alNone;

  PersUserLbl.Position.X =(PersMainPnl.Width*15)/100;

  PersUserLbl.Position.y =(PersMainPnl.Height*25)/100;

  PersUserLbl.clProSettings.FontColor = clAlphaColor.clhextocolor('#075660');

  PersUserLbl.clProSettings.FontSize = 12;

  PersUserLbl.SetclProSettings(PersUserLbl.clProSettings);

//Personel Kullanıcı Adı Edit

  PersUserEdit= MainForm.AddNewProEdit(PersMainPnl,'PersUserEdit', 'Kullanıcı adınızı giriniz ');

  PersUserEdit.align= alNone;

  PersUserEdit.Height= (PersMainPnl.Height*12)/100;

  PersUserEdit.Width= (PersMainPnl.Width*75)/100;

  PersUserEdit.Position.X =(PersMainPnl.Width*15)/100;

  PersUserEdit.Position.y =(PersMainPnl.Height*30)/100;

  PersUserEdit.clProSettings.Bordercolor= clAlphacolor.clhextocolor('#00000');

  PersUserEdit.clProSettings.BorderWidth = 1;

  PersUserEdit.clProSettings.RoundHeight = 8;

  PersUserEdit.clProSettings.RoundWidth = 8;

  PersUserEdit.clProSettings.BackgroundColor=clAlphaColor.clHexToColor('#e8e8e8');

  PersUserEdit.SetclProSettings(PersUserEdit.clProSettings);

//Personel Şifre Label

  PersPasswordLbl=MainForm.AddNewProLabel(PersMainPnl, 'PersPasswordLbl', 'Şifre');

  PersPasswordLbl.align =alNone;

  PersPasswordLbl.Position.X =(PersMainPnl.Width*15)/100;

  PersPasswordLbl.Position.y =(PersMainPnl.Height*45)/100;

  PersPasswordLbl.clProSettings.FontColor = clAlphaColor.clhextocolor('#075660');

  PersPasswordLbl.clProSettings.FontSize = 12;

  PersPasswordLbl.SetclProSettings(PersPasswordLbl.clProSettings);

  

//Personel Şifre Edit

  PersPasswordEdit= MainForm.AddNewProEdit(PersMainPnl,'PersPasswordEdit', 'Şifrenizi giriniz ');

  PersPasswordEdit.align= alNone;

  PersPasswordEdit.Height= (PersMainPnl.Height*12)/100;

  PersPasswordEdit.Width= (PersMainPnl.Width*75)/100;

  PersPasswordEdit.Position.X =(PersMainPnl.Width*15)/100;

  PersPasswordEdit.Position.y =(PersMainPnl.Height*50)/100;

  PersPasswordEdit.clProSettings.Bordercolor= clAlphacolor.clhextocolor('#00000');

  PersPasswordEdit.clProSettings.BorderWidth = 1;

  PersPasswordEdit.clProSettings.RoundHeight = 8;

  PersPasswordEdit.clProSettings.RoundWidth = 8;

  PersPasswordEdit.clProSettings.BackgroundColor=clAlphaColor.clHexToColor('#e8e8e8');

  PersPasswordEdit.SetclProSettings(PersPasswordEdit.clProSettings);

  

//Personel Şifremi Unuttum Label

  PersForgotPassword=MainForm.AddNewProLabel(PersMainPnl, 'PersForgotPassword', 'Şifremi unuttum?');

  PersForgotPassword.align =alNone;

  PersForgotPassword.Position.X =(PersMainPnl.Width*65)/100;

  PersForgotPassword.Position.Y =(PersMainPnl.Height*65)/100;

  PersForgotPassword.clProSettings.FontColor = clAlphaColor.clhextocolor('#075660');

  PersForgotPassword.clProSettings.FontSize = 12;

  PersForgotPassword.SetclProSettings(PersForgotPassword.clProSettings);

//Personel Giriş Butonu

  PersLoginBtn = MainForm.AddNewProButton(PersMainPnl, 'PersLoginBtn', 'Giriş Yap');

  PersLoginBtn.align=alNone;

  PersLoginBtn.Position.X =(PersMainPnl.Width*15)/100;

  PersLoginBtn.Position.y =(PersMainPnl.Height*75)/100;

  PersLoginBtn.height = (PersMainPnl.Height*12)/100;

  PersLoginBtn.Width = (PersMainPnl.Width*75)/100;

  PersLoginBtn.clProSettings.FontColor = clAlphaColor.clhextocolor('#F8FAFC');

  PersLoginBtn.clProSettings.FontSize = 18;

  PersLoginBtn.clProSettings.Backgroundcolor= clAlphacolor.clhextocolor('#075660');//clAlphacolor.clRed

  PersLoginBtn.clProSettings.Bordercolor= clAlphacolor.clhextocolor('#00000');

  PersLoginBtn.clProSettings.BorderWidth = 1;

  PersLoginBtn.clProSettings.RoundHeight = 8;

  PersLoginBtn.clProSettings.RoundWidth = 8;

  PersLoginBtn.SetclProSettings(PersLoginBtn.clProSettings);

  

//Personel Giriş Butonu Image

  PersLoginImg =MainForm.AddNewImage(PersLoginBtn,'PersLoginImg');

  MainForm.SetImage(PersLoginImg,'LoginIcon');

  PersLoginImg.align =alNone;

  PersLoginImg.Position.X = (PersLoginBtn.Width*80)/100;

  PersLoginImg.Position.Y = (PersLoginBtn.Height*25)/100;

  PersLoginImg.height = (PersLoginBtn.Height*60)/100;

  PersLoginImg.Width = (PersLoginBtn.Height*60)/100;

  

//Personel Kayıt Ol Butonu

  /*

  PersRegisterBtn = MainForm.AddNewProButton(PersMainPnl, 'PersRegisterBtn', 'Kayıt Ol');

  PersRegisterBtn.align=alNone;

  PersRegisterBtn.Position.X =(PersMainPnl.Width*15)/100;

  PersRegisterBtn.Position.y =(PersMainPnl.Height*50)/100;

  PersRegisterBtn.height = (PersMainPnl.Height*7)/100;

  PersRegisterBtn.Width = (PersMainPnl.Width*30)/100;

  PersRegisterBtn.clProSettings.FontColor = clAlphaColor.clblack;

  PersRegisterBtn.clProSettings.FontSize = 12;

  PersRegisterBtn.clProSettings.Backgroundcolor= clAlphacolor.clhextocolor('#11ac23');//clAlphacolor.clRed

  PersRegisterBtn.clProSettings.Bordercolor= clAlphacolor.clhextocolor('#00000');

  PersRegisterBtn.clProSettings.BorderWidth = 1;

  PersRegisterBtn.clProSettings.RoundHeight = 8;

  PersRegisterBtn.clProSettings.RoundWidth = 8;

  PersRegisterBtn.SetclProSettings(PersRegisterBtn.clProSettings);

  */

  

//Yönetici Panel

  MngrMainPnl= MainForm.AddNewProPanel(MainForm, 'MngrMainPnl');

  MngrMainPnl.align= alCenter;

  MngrMainPnl.Height= (MainForm.clHeight* 70)/100;

  MngrMainPnl.Width= (MainForm.clWidth*50)/100;

  MngrMainPnl.clProSettings.BackgroundColor=clAlphaColor.clHexToColor('#F8FAFC');

  MngrMainPnl.clProSettings.BorderColor=clAlphaColor.clHexToColor('#000000');

  MngrMainPnl.clProSettings.BorderWidth= 1;

  MngrMainPnl.clProSettings.RoundHeight= 35;

  MngrMainPnl.clProSettings.RoundWidth= 35;

  MngrMainPnl.SetclProSettings(MngrMainPnl.clProSettings);

//Yönetici Logo - BİTMEDİ

//Yönetici Kullanıcı Adı Label

  MngrUserLbl=MainForm.AddNewProLabel(MngrMainPnl, 'MngrUserLbl', 'Kullanıcı Adı');

  MngrUserLbl.align =alNone;

  MngrUserLbl.Position.X =(MngrMainPnl.Width*15)/100;

  MngrUserLbl.Position.y =(MngrMainPnl.Height*25)/100;

  MngrUserLbl.clProSettings.FontColor = clAlphaColor.clhextocolor('#075660');

  MngrUserLbl.clProSettings.FontSize = 12;

  MngrUserLbl.SetclProSettings(MngrUserLbl.clProSettings);

//Yönetici Kullanıcı Adı Edit

  MngrUserEdit= MainForm.AddNewProEdit(MngrMainPnl,'MngrUserEdit', 'Kullanıcı adınızı giriniz ');

  MngrUserEdit.align= alNone;

  MngrUserEdit.Height= (MngrMainPnl.Height*12)/100;

  MngrUserEdit.Width= (MngrMainPnl.Width*75)/100;

  MngrUserEdit.Position.X =(MngrMainPnl.Width*15)/100;

  MngrUserEdit.Position.y =(MngrMainPnl.Height*30)/100;

  MngrUserEdit.clProSettings.Bordercolor= clAlphacolor.clhextocolor('#00000');

  MngrUserEdit.clProSettings.BorderWidth = 1;

  MngrUserEdit.clProSettings.RoundHeight = 8;

  MngrUserEdit.clProSettings.RoundWidth = 8;

  MngrUserEdit.clProSettings.BackgroundColor=clAlphaColor.clHexToColor('#e8e8e8');

  MngrUserEdit.SetclProSettings(MngrUserEdit.clProSettings);

//Yönetici Şifre Label

  MngrPasswordLbl=MainForm.AddNewProLabel(MngrMainPnl, 'MngrPasswordLbl', 'Şifre');

  MngrPasswordLbl.align =alNone;

  MngrPasswordLbl.Position.X =(MngrMainPnl.Width*15)/100;

  MngrPasswordLbl.Position.y =(MngrMainPnl.Height*45)/100;

  MngrPasswordLbl.clProSettings.FontColor = clAlphaColor.clhextocolor('#075660');

  MngrPasswordLbl.clProSettings.FontSize = 12;

  MngrPasswordLbl.SetclProSettings(MngrPasswordLbl.clProSettings);

//Yönetici Şifre Edit

  MngrPasswordEdit= MainForm.AddNewProEdit(MngrMainPnl,'MngrPasswordEdit', 'Şifrenizi giriniz ');

  MngrPasswordEdit.align= alNone;

  MngrPasswordEdit.Height= (MngrMainPnl.Height*12)/100;

  MngrPasswordEdit.Width= (MngrMainPnl.Width*75)/100;

  MngrPasswordEdit.Position.X =(MngrMainPnl.Width*15)/100;

  MngrPasswordEdit.Position.y =(MngrMainPnl.Height*50)/100;

  MngrPasswordEdit.clProSettings.Bordercolor= clAlphacolor.clhextocolor('#00000');

  MngrPasswordEdit.clProSettings.BorderWidth = 1;

  MngrPasswordEdit.clProSettings.RoundHeight = 8;

  MngrPasswordEdit.clProSettings.RoundWidth = 8;

  MngrPasswordEdit.clProSettings.BackgroundColor=clAlphaColor.clHexToColor('#e8e8e8');

  MngrPasswordEdit.SetclProSettings(MngrPasswordEdit.clProSettings);

//Yönetici Şifremi Unuttum Label

  MngrForgotPassword=MainForm.AddNewProLabel(MngrMainPnl, 'MngrForgotPassword', 'Şifremi unuttum?');

  MngrForgotPassword.align =alNone;

  MngrForgotPassword.Position.X =(MngrMainPnl.Width*65)/100;

  MngrForgotPassword.Position.y =(MngrMainPnl.Height*65)/100;

  MngrForgotPassword.clProSettings.FontColor = clAlphaColor.clhextocolor('#075660');

  MngrForgotPassword.clProSettings.FontSize = 12;

  MngrForgotPassword.SetclProSettings(MngrForgotPassword.clProSettings);

//Yönetici Giriş Butonu

  MngrLoginBtn = MainForm.AddNewProButton(MngrMainPnl, 'MngrLoginBtn', 'Giriş Yap');

  MngrLoginBtn.align=alNone;

  MngrLoginBtn.Position.X =(MngrMainPnl.Width*15)/100;

  MngrLoginBtn.Position.y =(MngrMainPnl.Height*75)/100;

  MngrLoginBtn.height = (MngrMainPnl.Height*12)/100;

  MngrLoginBtn.Width = (MngrMainPnl.Width*75)/100;

  MngrLoginBtn.clProSettings.FontColor = clAlphaColor.clhextocolor('#F8FAFC');

  MngrLoginBtn.clProSettings.FontSize = 18;

  MngrLoginBtn.clProSettings.Backgroundcolor= clAlphacolor.clhextocolor('#075660');//clAlphacolor.clRed

  MngrLoginBtn.clProSettings.Bordercolor= clAlphacolor.clhextocolor('#00000');

  MngrLoginBtn.clProSettings.BorderWidth = 1;

  MngrLoginBtn.clProSettings.RoundHeight = 8;

  MngrLoginBtn.clProSettings.RoundWidth = 8;

  MngrLoginBtn.SetclProSettings(MngrLoginBtn.clProSettings);

//Yönetici Giriş Butonu Image

  MngrLoginImg =MainForm.AddNewImage(MngrLoginBtn,'MngrLoginImg');

  MainForm.SetImage(PersLoginImg,'LoginIcon');

  MngrLoginImg.align =alNone;

  MngrLoginImg.Position.X = (MngrLoginBtn.Width*80)/100;

  MngrLoginImg.Position.Y = (MngrLoginBtn.Height*25)/100;

  MngrLoginImg.height = (MngrLoginBtn.Height*60)/100;

  MngrLoginImg.Width = (MngrLoginBtn.Height*60)/100;

//Yönetici Kayıt Ol Butonu 

  /*

  PersRegisterBtn = MainForm.AddNewProButton(PersMainPnl, 'PersRegisterBtn', 'Kayıt Ol');

  PersRegisterBtn.align=alNone;

  PersRegisterBtn.Position.X =(PersMainPnl.Width*15)/100;

  PersRegisterBtn.Position.y =(PersMainPnl.Height*50)/100;

  PersRegisterBtn.height = (PersMainPnl.Height*7)/100;

  PersRegisterBtn.Width = (PersMainPnl.Width*30)/100;

  PersRegisterBtn.clProSettings.FontColor = clAlphaColor.clblack;

  PersRegisterBtn.clProSettings.FontSize = 12;

  PersRegisterBtn.clProSettings.Backgroundcolor= clAlphacolor.clhextocolor('#11ac23');//clAlphacolor.clRed

  PersRegisterBtn.clProSettings.Bordercolor= clAlphacolor.clhextocolor('#00000');

  PersRegisterBtn.clProSettings.BorderWidth = 1;

  PersRegisterBtn.clProSettings.RoundHeight = 8;

  PersRegisterBtn.clProSettings.RoundWidth = 8;

  PersRegisterBtn.SetclProSettings(PersRegisterBtn.clProSettings);

 */

 

//------------

  MngrMainPnl.Visible = False;

  PersSwchBtn.BringToFront;

  MngrSwchBtn.BringToFront;

 

//Eventler

  MainForm.AddNewEvent(PersLoginBtn,tbeOnClick,'goToPersAnaSayfa');

 //MainForm.AddNewEvent(PersRegisterBtn,tbeOnClick,'goToKayitSayfasi');

  MainForm.AddNewEvent(MngrSwchBtn,tbeOnClick,'managerMainPnlShow');

  MainForm.AddNewEvent(persSwchBtn,tbeOnClick,'personnelMainPnlShow');

  MainForm.Run;

}

Kodlar bu şekilde
PersSwchBtn ve MngrSwchBtn main forma bağlı. Tam ekran veya pencereli kullanım arasında geçiş yaparken butonlar kayıyor panele koyduğumda/bağladığımda panel gizlendiğinde swicth butonlar da gizleniyor. 
Nasıl bir çözüm uygulanabilir?  

 Karşılaştığın bu kayma sorunu mobil ve masaüstü arayüz tasarımlarında en sık yaşanılan sorunlardan biridir. Tam ekran ile pencereli mod arasında geçiş yaptığında formun boyutlarında da değişme meydana geliyor. butonlar da position.x ve position.y değerleri ilk hesaplandığı yerde alıyor
çözüm için kapsayıcı panel mantığını kullanmak daha sağlıklı olur 
güncellenmiş kodu aşağıya bırakıyorum