Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
How can I change field alignment to right in wizard
Message
From
21/07/2001 04:55:27
Cetin Basoz
Engineerica Inc.
Izmir, Turkey
 
General information
Forum:
Visual FoxPro
Category:
Classes - VCX
Miscellaneous
Thread ID:
00532488
Message ID:
00533464
Views:
16
>Thank you Mr. Cetin and Santosh
>
>Only textbox alignment is easy and I did it before.
>I want to change the label in right side and text box in left side as Mr. Cetin explained in the reply. I want to modify the class that combines the label and text boxes in left to right. I want this combination (label and text) from right to left position in form wizard (embossed).
>I made my other forms manually (right to left) and all others are working ok. Just for simple forms I want to use wizard so that I can save the time. Which class I should modify to do this operation?
>
>Thanks

Zaheer,
AFAIK for that none of the classes but the wizard.app itself. However IMHO it's a long run. Instead let the wizard do its job as usual then run your little custom prg to change it right to left. For example :
aselobj(aCont,1)
for each oControl in aCont[1].Controls
  with oControl
    if lower(.Baseclass) = 'label' and ;
	right(.Caption,1) = ':' and ;
	type('aCont[1].'+substr(.Name,4))='O'
      loControl = eval('aCont[1].'+substr(.Name,4))
      loControl.Left = .Left
      .Left = .Left + loControl.Width + 20
    endif
  endwith
endfor
With the above code you could select any control on wiz generated form, go to command window and run this. What it does is to switch fields to left and labels to right. Of course no extra code for aligning their right edges etc but you can enhance as you see fit.
Hope helps.
Cetin
Çetin Basöz

The way to Go
Flutter - For mobile, web and desktop.
World's most advanced open source relational database.
.Net for foxheads - Blog (main)
FoxSharp - Blog (mirror)
Welcome to FoxyClasses

LinqPad - C#,VB,F#,SQL,eSQL ... scratchpad
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform