Delphi formunu nasıl otomatik tam ekran yapabilirim ?

[erdemklt0]

Delphi formunu nasıl otomatik tam ekran yapabilirim ? Objelerinde aynı orantıda büyümesini istiyorum.

[hi_selamlar]

(22-01-2026, Saat: 22:06)erdemklt0 Adlı Kullanıcıdan Alıntı: Delphi formunu nasıl otomatik tam ekran yapabilirim ? Objelerinde aynı orantıda büyümesini istiyorum.

Merhabalar,

Daha önce paylaşılmış konu ile ilgili link'ler. Umarım yardımcı olur.

https://www.delphican.com/showthread.php?tid=2487
https://www.delphican.com/showthread.php?tid=2916



Kolay gelsin.

[csunguray]

(22-01-2026, Saat: 22:06)erdemklt0 Adlı Kullanıcıdan Alıntı: Delphi formunu nasıl otomatik tam ekran yapabilirim ? Objelerinde aynı orantıda büyümesini istiyorum.

Formun ScaleBy metodu veya ChangeScale metodu ile bu işi yapabilirsin. Bu metotları form görüntülendikten sonra çağırmalısın. Ama Delphi'de formun AfterShow diye bir event'ı yok. Bu durumda AfterShow event'ını aşağıdaki gibi kendin yazmalısın.

type
  TForm1 = class(TForm)
  private
    { Private declarations }
    procedure WmAfterShow(var Msg: TMessage); message WM_AFTER_SHOW;
  public
  end;

implementation

procedure TForm1.WmAfterShow(var Msg: TMessage);
begin
  ScaleBy(Width, Screen.Width);
  // Veya ChangeScale(Width, Screen.Width, true);
end;

Eğer bu yöntemin tüm formlara aynı anda etki etmesini istiyorsan bir taban form oluşturup diğer tüm formları bu formdan miras (inherit) almalısın. Form Inheritance ile ilgili aşağıdaki videoyu izleyebilirsin. (Delphi İle Göresel Form Kalıtsallığı (Delphi Visual Form Inheritance) - Türkçe)