Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Using Procedural Code Within a Grid
Message
De
27/08/2002 13:37:44
Irv Adams
MSC Managed Care, Inc.
Floride, États-Unis
 
 
À
27/08/2002 13:18:33
Carmen Gassi
Perseus Software Systems
Oakville, Ontario, Canada
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire d'écran & Écrans
Divers
Thread ID:
00694070
Message ID:
00694137
Vues:
12
Just build your Case stmt within a Method of the form, as in:
THISFORM.Makedescritption()
DO CASE
  Case Tablename.Type = "1"
    cLongdesc = "Invoice"
  Case Tablename.Type = "2"
    cLongdesc = "Adjustment"
  Otherwise
    cLongdesc = "Etc."
Endcase

Return cLongdesc
...and then call this Method in AfterRowColChange:
Grid.AfterRowColChange()

Local cNewTip
cNewTip = THISFORM.ChangeTips()
THIS.Column5.Text1.ToolTiptext = (cNewTip)
Trouble is, looks like you have to Click (focus) on a specific control within Grid for ir to appear, not sure why...

-Irv.


>Hi Irv
> Would you put the case structure in the Afterrowcolchange event? I had thought of using that method, but I understood that it only fired when the user changed row or column?
>
>Carmen
>>
>You can also assign a variable as TooltipText for Text1 (or whatever control you have within a column). This wouldn't take up as much space on-screen.
>>
>>
>>Grid.Afterrowcolchange()
>>THIS.Columnx.text1.ToolTiptext = (DescriptionTable.Longdescription)
>>
>>
>>or in same manner use a Case statement, etc...
>>
>>HTH,
>>
>>-Irv.
>>
>>>Hello All
>>> Is there a way to display a value in the column of a grid based on a case or an if..endif structure? For example, in my application, I am displaying the aged transaction history for customers. In the table, there is a field called "type" that describes the type of transaction in the A/R transaction file, "1" = Invoice, "2" = Adjustment, "8" = Cash Receipt, etc.. The data type is numeric. In the grid that displays the table, I would like to display "IN" if the type = 1, "CA" if the type = 8 etc. I do not know why the original designers of the application made this field numeric, I am converting this application from Clipper and would reduce my headaches a lot if I didn't have to mess too much with the tables. So is there a way to parse the value of the given field in the table and display the appropriate 2 character message. All suggestions appreciated.
>>>
>>>
>>>Regards,
>>>Carmen
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform