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;
borderstyle:=none kaldırıp denermisiniz.
Tam ekran için yalnızca FullScreen := True yapmanız yeterli olacaktır. Diğer kod satırlarını silin.
(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ı.
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;
(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;
(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.
(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:
(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?
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
[
attachment=2860]
Daha sonra Form1 seçili iken properties sekmesinde
[
attachment=2859]
