قائمة منسدلة بالـ button و تكبير البرنامج

[kachwahed]

بهذا الشكل يمكنك ذلك أثناء التصميم من خلال Object Inspector:

كود :

procedure TForm1.FormCreate(Sender: TObject); begin Button5.Anchors := [akTop, akRight]; Button6.Anchors := [akTop, akRight]; Button7.Anchors := [akTop, akRight]; Button8.Anchors := [akTop, akRight]; DBGrid1.Anchors := [akLeft, akTop, akRight, akBottom]; Edit1.Anchors := [akTop, akLeft, akRight]; Edit2.Anchors := [akTop, akLeft, akRight]; Edit3.Anchors := [akTop, akLeft, akRight]; Edit6.Anchors := [akTop, akLeft, akRight]; Constraints.MinHeight := Height; Constraints.MinWidth := Width; end;

غير أني أفضل أن يكون التصميم في شكل Panels متلاصقة مثل الويب المرفق
بالتوفيق.