TForm.Setbounds

[mentaltec]

Hallo,

ich hab heut mal wieder ein Mysterium:

ich hab 'n MainForm und 'n 2. Form, dass idR rechts am Mainform klebt - also das wollte ich zumindest.

das 2. Form wird aber immer n paar Pixel zu gross egal, ob ich Setbound oder .top|.left|.width|.height benutze

siehe Anhang.

Code:

      
secondForm.SetBounds(mainform.left + mainform.width, mainform.top, 300, mainform.height);

//oder auch
secondform.Width := 300;
secondform.height := mainform.height;
secondform.Top := mainform.top;
secondform.Left := mainform.left + mainform.width;

wenn ich die WM_WindowPosChanging-Parameter benutze, siehts genauso aus

Zielsystem ist zZt. Win 7

ich könnte das natürlich mit DeflateRect von Hand zurechtrücken, aber das widerstrebt mir

mfg