Einzelnen Beitrag anzeigen

Nisbo

Registriert seit: 10. Mär 2005
191 Beiträge
 
Delphi 5 Standard
 
#22

Re: Größen von Objekten in einer Form anpassen

  Alt 26. Mär 2006, 17:04
hatte mich auch gerade mit diesem thema beschäftigt, es aber anders gelöst, war zumindest für mich so am einfachsten

Delphi-Quellcode:
procedure TForm1.FormResize(Sender: TObject);
var w,h : integer;
begin
// differenz
w := form1.Width - 871;
h := form1.Height - 692;

SynEdit1.width := 857 + w;
BitBtn2.width := 857 + w;
GroupBox1.width := 857 + w;
GroupBox2.width := 857 + w;
Edit1.width := 617 + w;
Edit2.width := 617 + w;
Edit3.width := 617 + w;
Edit4.width := 441 + w;
Edit5.width := 441 + w;

BitBtn1.Left := 720 + w;
CheckBox1.Left := 720 + w;
RadioButton1.Left := 544 + w;
RadioButton2.Left := 544 + w;
RadioButton3.Left := 680 + w;

SynEdit1.height := 321 + h;
GroupBox2.top := 536 + h;

end;
das ganze gehört ins onrezize vom form rein, naja ist ja schon das komplete resize wenn vorher nichts drinn war
in w und h wird die differenz berechnet, die beiden zahlen sind die startgröße vom programm

an den ankern habe ich nichts geändert, somit kann man die breite prima bestimmen, nur ist leider halt immer hardgecodet, aber was solls, hauptsache es geht

ach ja sämtliche zahlen hier sind die angaben womit das programm erstellt wurde
muß man dann halt schauen wie man was verändern möchte

width --> ist die breite
top --> position von oben
left --> position von links
Jens
  Mit Zitat antworten Zitat