Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Bug ?
Message
Information générale
Forum:
Visual FoxPro
Catégorie:
Autre
Titre:
Re: Bug ?
Divers
Thread ID:
00751012
Message ID:
00751014
Vues:
22
After a little more testing:
This.Label1.Caption = " =" && No error
This.Label1.Caption = "= " && Error
This.Label1.Caption = Chr(61) && Error
>This works fine in VFP7 (Except for the try-catch) The line This.Label1.Caption = "=" causes a Syntax error and is not catched by the try-catch. Looks like a compile time error.
>
>Can anyone confirm it's bug? Any workaround ?
>
>
>ox = CREATEOBJECT("TestForm")
>ox.Show()
>
>DEFINE CLASS Testform  As Form
>
>	ADD OBJECT label1 AS label WITH ;
>		Left = 70, ;
>		Top = 76, ;
>		Name = "label1"
>	
>	FUNCTION Init()
>		
>		try
>			This.Label1.Caption = "test" && Works fine
>			This.Label1.Caption = "=" && Works but cause a Syntax error
>		catch to oerr
>			? oerr.Message
>		endtry
>
>	ENDFUNC
>
>
>ENDDEFINE
>
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform