Jannah Theme License is not validated, Go to the theme options page to validate the license, You need a single license for each domain name.
DelphiPemrograman

Anti Resize Form Delphi #216

Anjing tidak dapat mengeong

andrypein.net : Bagi kalian yang tau kemprog (Baca : Camfrog) pasti kalau ingin mere-size form nya kita mesti buy tuh si aplikasinya, karena form resize nya di disable.

Aing gapernah kemprogan ya, aing cuma mempelajari ternyata free user dibatasi, non multiclient dan un-resizeable.

So di delphi pun kita bisa melakukannya dengan koding bagaimana mendisable sebuah fungsi form agar tidak bisa di resize.

Sample cuma form kosong doangan lah.

Sebelumnya pasang procedure ini di deklarasi privat gan.

private
    { Private declarations }
    procedure WMGetMinMaxInfo(var Msg: TWMGetMinMaxInfo); message WM_GETMINMAXINFO;

Berikut procedure lengkap nya :

procedure TForm1.WMGetMinMaxInfo(var Msg: TWMGetMinMaxInfo);
begin
  inherited;
  with Msg.MinMaxInfo^ do begin
     ptMinTrackSize.x:= Form1.width;
     ptMaxTrackSize.x:= Form1.width;
     ptMinTrackSize.y:= Form1.height;
     ptMaxTrackSize.y:= Form1.height;
  end;
end;

Fix di run kamu telah berhasil membuat form yang sama fungsinya dengan kemprog yang tidak bisa di resize, congrats.

anti resize form delphi

Gas donlod Anti Resize Form Delphi nya disini gan.

Download

*AFK

Related Articles

One Comment

Tinggalkan Balasan

Alamat email Anda tidak akan dipublikasikan. Ruas yang wajib ditandai *

Back to top button