Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Menu screen
Message
From
20/06/2001 05:05:13
 
 
To
20/06/2001 03:37:13
General information
Forum:
Visual FoxPro
Category:
Menus & Menu designer
Title:
Miscellaneous
Thread ID:
00521285
Message ID:
00521309
Views:
18
>>Hi Budianto
>>
>>I would add an Image control for the Company logo and an Label control for the
>>Company name.
>>
>>Thisform.Createobject(
>>OR
>>Thisform.Addobject(
>
>
>Benn,
>
>To display the setting of the menu, I make some code and put it in the code section of the project.
>
>The code is like this :
>With _Screen
> .Left = 0
> .Top = 0
> .Height =400
> .Width = 640
> .LockScreen=.T.
> .BorderStyle=3
> .Closable=.T.
> .ControlBox=.T.
> .MaxButton=.T.
> .MinButton=.T.
> .Movable=.T.
> .Caption="Microsoft Visual FoxPro"
> .LockScreen=.F.
> .Picture='bck.jpg'
> .Icon='HASI.ico'
> .windowstate=2
>Endwith
>do menu.mpr
>read events
>return
>
>So how to add the image control and a label control, I haven't used image control before, could you show me the way ?


Budianto,

You could do as follows:
WITH _Screen
*-- Create image for company logo
.addobject("CompanyLogo","Image")
.CompanyLogo.Picture = "CompanyLogo.bmp"
.CompanyLogo.Visible = .T.

*-- Create label for Company name
.addobject("CompanyLabel","label")
.CompanyLabel.Caption = "My Company"
.CompanyLabel.Visible = .T.
ENDWITH
Benn Kjaer
MS Certified Professional - Visual Foxpro

"There is something rotten in the state of Denmark"
"Why make user-friendly programs, when there aren’t any friendly users :o)"
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform