Tam ekran sorunu

[Altıner]

Merhabalar,


Uygulama mobilde Splash Screen'de tam ekran olurken. Form alanında üste boşluk kalıyor ve siyah.

TForm(Sender).BorderStyle := TFmxFormBorderStyle.None;  
    TForm(Sender).FullScreen := True;
    TForm(Sender).WindowState := TWindowState.wsMaximized;

 

[mcuyan]

borderstyle:=none kaldırıp denermisiniz.

[RAD Coder]

Tam ekran için yalnızca FullScreen := True yapmanız yeterli olacaktır. Diğer kod satırlarını silin.

[Altıner]

(07-01-2025, Saat: 09:09)RAD Coder Adlı Kullanıcıdan Alıntı: Tam ekran için yalnızca FullScreen := True yapmanız yeterli olacaktır. Diğer kod satırlarını silin.

  TForm(Sender).FullScreen := True;  yaptım ama bir şey değişmedi

Hatta google play console tarafında sorun olarak algılandı.

[RAD Coder]

Kodu neden aşağıdaki gibi kullanıyorsun?

TForm(Sender).FullScreen := True; 

Sender, ana formu referens almadığında sorun olabilir.  
Şu şekilde kullan

Self.FullScreen := True; 

[Altıner]

(09-01-2025, Saat: 09:04)RAD Coder Adlı Kullanıcıdan Alıntı: Kodu neden aşağıdaki gibi kullanıyorsun?

TForm(Sender).FullScreen := True; 

Sender, ana formu referens almadığında sorun olabilir.  
Şu şekilde kullan

Self.FullScreen := True; 

İnanın bir haftadır uğraşıyorum resmen delphiden soğudum.

Denedim tam ekran olmadı.
Self.FullScreen := True;

[RAD Coder]

(09-01-2025, Saat: 11:31)Altıner Adlı Kullanıcıdan Alıntı:

(09-01-2025, Saat: 09:04)RAD Coder Adlı Kullanıcıdan Alıntı: Kodu neden aşağıdaki gibi kullanıyorsun?

TForm(Sender).FullScreen := True; 

Sender, ana formu referens almadığında sorun olabilir.  
Şu şekilde kullan

Self.FullScreen := True; 

İnanın bir haftadır uğraşıyorum resmen delphiden soğudum.

Denedim tam ekran olmadı.
Self.FullScreen := True;

Bu kodu hangi olayda yazdınız.

[Altıner]

(09-01-2025, Saat: 11:51)RAD Coder Adlı Kullanıcıdan Alıntı:

(09-01-2025, Saat: 11:31)Altıner Adlı Kullanıcıdan Alıntı: İnanın bir haftadır uğraşıyorum resmen delphiden soğudum.

Denedim tam ekran olmadı.
Self.FullScreen := True;

Bu kodu hangi olayda yazdınız.

Tam ekran bir türlü olmuyor. Uygulama ilk açıldığında (Splash) tam ekran, form ekranına geçince tam ekran olmuyor. 
Görseldeki gibi siyah bir alan oluyor. 



Normalde bu şekilde kullanıyorum:

procedure TFormMain.FormCreate(Sender: TObject);
begin
    TForm(Sender).BorderStyle := TFmxFormBorderStyle.None;
    TForm(Sender).BorderIcons := [];
    TForm(Sender).WindowState := TWindowState.wsMaximized;
    TForm(Sender).FullScreen := True;
  DatabaseCreate(Sender);
 end;

Sizin dediğiniz gibi bu şekilde de kullandım:

procedure TFormMain.FormCreate(Sender: TObject);
begin
Self.FullScreen := True;
  DatabaseCreate(Sender);
 end;

ALDIĞIM UYARI:

[RAD Coder]

(09-01-2025, Saat: 12:34)Altıner Adlı Kullanıcıdan Alıntı:

(09-01-2025, Saat: 11:51)RAD Coder Adlı Kullanıcıdan Alıntı: Bu kodu hangi olayda yazdınız.

Tam ekran bir türlü olmuyor. Uygulama ilk açıldığında (Splash) tam ekran, form ekranına geçince tam ekran olmuyor. 
Görseldeki gibi siyah bir alan oluyor. 



Normalde bu şekilde kullanıyorum:

procedure TFormMain.FormCreate(Sender: TObject);
begin
    TForm(Sender).BorderStyle := TFmxFormBorderStyle.None;
    TForm(Sender).BorderIcons := [];
    TForm(Sender).WindowState := TWindowState.wsMaximized;
    TForm(Sender).FullScreen := True;
  DatabaseCreate(Sender);
 end;

Sizin dediğiniz gibi bu şekilde de kullandım:

procedure TFormMain.FormCreate(Sender: TObject);
begin
Self.FullScreen := True;
  DatabaseCreate(Sender);
 end;

ALDIĞIM UYARI:

Self.FullScreen := True;

Bu kodu yeni bir projede test edebilir misiniz?

[Mr.X]

Merhaba,

FormCreate veya herhangi bir yere yazdığınız fullscreen ile alakalı kodları kaldırın.
Aşağıdaki işlemleri uygulayın.

Project-Options sekmesinde
   


Daha sonra Form1 seçili iken properties sekmesinde