Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
No PARAMETER statement is found.
Message
 
 
Information générale
Forum:
Visual FoxPro
Catégorie:
Autre
Divers
Thread ID:
00553578
Message ID:
00553614
Vues:
15
Hi!

You cannot pass array by reference into the form, and array by value passes only value of first element of array. I would suggest create simple object with array property and pass object to the form instead of array. You can include other parameters into properties of object so you will have only one parameter for the form. For example:
objParams = createobject("Custom")
objParams.AddProperty("aBehavior(2,4)")
objParams.AddProperty("aCaseSensitivevior(2,1)")
with objParams
  .aBehavior[1, 1] = "ID"
  .aBehavior[1, 2] = "ID"
  ....
endwith
....
*-- Show PickList Form
LOCAL loForm
loForm = CREATEOBJECT('PickList', objParams)
loForm.Show()

....
* form Init event
LPARAMETERS poParams
...
more code
>Hi everybody
>
>I really hope somebody give me a hand with the problem i'm having. I have a command button on a form with the following code into its click method:
>
>LOCAL ARRAY aBehavior[2, 4], aCaseSensitive[2, 1]
>
>*--- id column
>aBehavior[1, 1] = "ID"
>aBehavior[1, 2] = "ID"
>aBehavior[1, 3] = "ID"
>
>*-- Description column
>aBehavior[2, 1] = "Description"
>aBehavior[2, 2] = "Description"
>aBehavior[2, 3] = "LOCATEKEY"
>
>*-- Case Sensitiveness
>aCaseSensitive[1, 1] = .F.
>aCaseSensitive[2, 1] = .F.
>
>*-- Show PickList Form
>LOCAL loForm
>loForm = CREATEOBJECT('PickList', @aBehavior, "Customers", "TestTable", @aCaseSensitive, .F.)
>loForm.Show()
>
>The init method of the 'PickList' class (a Pick List form) contains the following code:
>
>LPARAMETERS taBhavior,m.tcCaption,m.tcTable,taCaseSensitive,m.tlIsChk
>...
>more code
>
>The problem is that when I click on the button I get the following error:
>
>Error # 1238
>No PARAMETER statement is found.
>
>I can't figure it out why this is happening... Could anybody please give me some light on this?
>
>Thanks.
>
>Gustavo Schweitzer
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.
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform