Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Jumping of image in button
Message
From
09/09/2001 09:09:06
 
 
To
07/09/2001 12:29:31
General information
Forum:
Visual FoxPro
Category:
Classes - VCX
Miscellaneous
Thread ID:
00552379
Message ID:
00554385
Views:
62
Hi!

Ok, I sent you my own bitmap and msk file which I used to reproduce problem.

VFP6.0, SP3.

>Vlad-
>
>>>Well, since you're talking with me :), send it to my work address, please, I'll play with it.
>
>>Thanks! Catch it.
>>
>
>Guess I'm chopped liver, eh? Oh, well.
>
>I'm not able to duplicate the problem with the code that follows. However, I have no idea that the bmp I chose is one that you would have trouble with. It was helpful that you included your version number finally. A couple of thoughts: it might be a localization/language issue. Which language resource file are you using? (Not sure I'm phrasing that correctly.) Also, if you can install service pack 5, that might be helpful.
>
>Otherwise, here's the code I tried (I added a bunch of textboxes to see if that helped but it didn't).
>
PUBLIC oform1
>
>oform1=NEWOBJECT("form1")
>oform1.Show
>RETURN
>
>
>	**************************************************
>*-- Form:         form1 (c:\temp\temp.scx)
>*-- ParentClass:  form
>*-- BaseClass:    form
>*-- Time Stamp:   09/07/01 09:20:05 AM
>*
>DEFINE CLASS form1 AS form
>
>
>	Top = 0
>	Left = 0
>	Height = 360
>	Width = 793
>	DoCreate = .T.
>	Caption = "Form1"
>	Name = "Form1"
>
>
>	ADD OBJECT cmdexit AS commandbutton WITH ;
>		Top = 3, ;
>		Left = 745, ;
>		Height = 40, ;
>		Width = 44, ;
>		FontName = "MS Sans Serif", ;
>		FontSize = 8, ;
>		Picture = "..\program files\microsoft visual studio\vfp98\wizards\wizbmps\wzclose.bmp", ;
>		Cancel = .T., ;
>		Caption = "Koniec", ;
>		TabIndex = 12, ;
>		ToolTipText = "Zatvorenie okna", ;
>		Name = "cmdExit"
>
>
>	ADD OBJECT text1 AS textbox WITH ;
>		Height = 23, ;
>		Left = 36, ;
>		Top = 24, ;
>		Width = 100, ;
>		Name = "Text1"
>
>
>	ADD OBJECT text2 AS textbox WITH ;
>		Height = 23, ;
>		Left = 36, ;
>		Top = 52, ;
>		Width = 100, ;
>		Name = "Text2"
>
>
>	ADD OBJECT text3 AS textbox WITH ;
>		Height = 23, ;
>		Left = 36, ;
>		Top = 80, ;
>		Width = 100, ;
>		Name = "Text3"
>
>
>	ADD OBJECT text4 AS textbox WITH ;
>		Height = 23, ;
>		Left = 36, ;
>		Top = 108, ;
>		Width = 100, ;
>		Name = "Text4"
>
>
>	ADD OBJECT text5 AS textbox WITH ;
>		Height = 23, ;
>		Left = 36, ;
>		Top = 136, ;
>		Width = 100, ;
>		Name = "Text5"
>
>
>	ADD OBJECT text6 AS textbox WITH ;
>		Height = 23, ;
>		Left = 36, ;
>		Top = 164, ;
>		Width = 100, ;
>		Name = "Text6"
>
>
>	ADD OBJECT text7 AS textbox WITH ;
>		Height = 23, ;
>		Left = 36, ;
>		Top = 192, ;
>		Width = 100, ;
>		Name = "Text7"
>
>
>	ADD OBJECT text8 AS textbox WITH ;
>		Height = 23, ;
>		Left = 36, ;
>		Top = 220, ;
>		Width = 100, ;
>		Name = "Text8"
>
>
>	ADD OBJECT text9 AS textbox WITH ;
>		Height = 23, ;
>		Left = 36, ;
>		Top = 248, ;
>		Width = 100, ;
>		Name = "Text9"
>
>
>	ADD OBJECT text10 AS textbox WITH ;
>		Height = 23, ;
>		Left = 36, ;
>		Top = 276, ;
>		Width = 100, ;
>		Name = "Text10"
>
>
>	ADD OBJECT text11 AS textbox WITH ;
>		Height = 23, ;
>		Left = 36, ;
>		Top = 304, ;
>		Width = 100, ;
>		Name = "Text11"
>
>
>	ADD OBJECT text12 AS textbox WITH ;
>		Height = 23, ;
>		Left = 36, ;
>		Top = 332, ;
>		Width = 100, ;
>		Name = "Text12"
>
>
>ENDDEFINE
>*
>*-- EndDefine: form1
>**************************************************
Vlad Grynchyshyn, Project Manager, MCP
vgryn@yahoo.com
ICQ #10709245
The professional level of programmer could be determined by level of stupidity of his/her bugs

It is not appropriate to say that question is "foolish". There could be only foolish answers. Everybody passed period of time when knows nothing about something.
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform