Solved

Anchor Property

Posted on 2010-09-22
3
730 Views
Last Modified: 2012-05-10
I have been working for last 2 weeks to get it done but to no avail. What the hell is wrong with the Anchor Property???

I have seen someone suggesting Anchor to be 15 (resize widith and height with form) but this is not mentioned in VFP help????

The Anchor=15 works fine but this is not what I'm looking for..

for example:

I draw a form as below:


PUBLIC MyItem1
      MyItem1=NEWOBJECT("MyForm")
      MyItem1.Show
      READ EVENTS
 
DEFINE CLASS MyForm AS form
      Top = 0
      Left = 0
      Height = 500
      AlwaysOnTop = .f.
      Width = 600
      borderstyle = 3
      controbox=.f.
      MinButton=.t.
      MaxButton=.t.
      autocenter = .t.
      Name = "MyForm"
      Forecolor = RGB(192,192,192)
      backcolor = RGB(192,192,192)      
      showwindow = 2
      TitleBar=0
      windowState = 0

      ADD Object TopShape1 AS Container WITH Top = 1, Left = -1, Width = 1280, Height = 710, Curvature = 0, specialeffect=0, Visible=.t., Anchor=15

      ADD Object BottomCont AS Container WITH Top = 400, Left = -1, Width = 600, Height = 50, Curvature = 0, specialeffect=1, Visible=.t., Anchor=64

enddefine


Questions:
======

OK...what happens when I resize the form ( I click on Max button) and then form is resized but the control's width (BottonCont) is set to something else....???

Thanks!
SP
0
Comment
Question by:Nick Sui
  • 2
3 Comments
 
LVL 29

Expert Comment

by:Olaf Doschke
Comment Utility
Have you tried doubleclicking the anchor property from the property window? You get a visual interface for setting the anchor with absolute vs relative anchoring vs no anchoring to all four directions.

When I run your example the width of the ButtomCont is not changes, as that is not anchored in regard to right/left position at all. So it stays left=0, but width does not change. You might want to anchor relative towards the bottom and absolute toward the left and right border, then you need Anchor = 2+8+64=74

Especially not anchoring to the right means width never changes. You also might want to change height, eg anchor relative towards the top border (16), so you might try 90.

Take the visual anchor property editor and play around with it to see what settings mean what.

Other useful anchor settings are: Buttons in the lower right corner anchored to right bottom absolute to not change position and size: 4+8=12

Bye, Olaf.
0
 
LVL 29

Accepted Solution

by:
Olaf Doschke earned 500 total points
Comment Utility
Also keep in mind anchor settings are always to the next parent container, so you anchor controls which you put into a container in respect to the container, not the form. This enables you to "cascade" anchors. Perhaps you already realized and therefore are working with containers, both with visible and non visible borders as some kind of analogon to a DIV container of HTML pages.

Bye, Olaf.
0
 
LVL 35

Author Comment

by:Nick Sui
Comment Utility
Thank You so much for your help, Olaf!

It was really helpful.

SP
0

Featured Post

Better Security Awareness With Threat Intelligence

See how one of the leading financial services organizations uses Recorded Future as part of a holistic threat intelligence program to promote security awareness and proactively and efficiently identify threats.

Join & Write a Comment

Suggested Solutions

Microsoft Visual FoxPro (short VFP) is a programming language with it’s own IDE and database, ranking somewhat between Access and VB.NET + SQL Server (Express). Product Description: http://msdn.microsoft.com/en-us/vfoxpro/default.aspx (http://msd…
A procedure for exporting installed hotfix details of remote computers using powershell
Excel styles will make formatting consistent and let you apply and change formatting faster. In this tutorial, you'll learn how to use Excel's built-in styles, how to modify styles, and how to create your own. You'll also learn how to use your custo…
Get a first impression of how PRTG looks and learn how it works.   This video is a short introduction to PRTG, as an initial overview or as a quick start for new PRTG users.

728 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

11 Experts available now in Live!

Get 1:1 Help Now