Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Browse...
Message
De
10/10/2000 14:15:44
Cetin Basoz
Engineerica Inc.
Izmir, Turquie
 
 
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire d'écran & Écrans
Titre:
Divers
Thread ID:
00427361
Message ID:
00427453
Vues:
22
>>>It solves the resizing problem. Mark for deletion is still there, but I recall, there is no way to remove it.
>>>
>>>Thanks a lot for your help. If I would not so lazy, I find it by myself :)
>>
>>Hi Nadya,
>>It's dangerous to spell 'no way' in VFP :) You could threat it as a grid with name clause and set properties. ie:
>>
>>
*...
>>browse name "myBrowse" when SetSomeProp()
>>*...
>>
>>function SetSomeProp
>>with myBrowse
>>  .recordMark = .f.
>>  .deletemark = .f.
>>  .GridLines = 0
>>  .scrollbars = 2
>>  .AllowRowSizing = .f.
>>  .AllowHeaderSizing = .f.
>>  .Setall("DynamicBackColor","iif(recno()%2=0,255^3,255^2)","column")
>>*...
>>endwith
Of course here I'm aware that when would fire too often. It has workarounds but this sample is fast enough not to apply.
>>Cetin
>
>Hi Cetin,
>
>Since I catch your attention on this simple problem, could you tell me, please, how should I modify this code to allow current record selecting (in blue)?
>Not this parrot like colors? :)

Hey those are my favourite :)
function SetSomeProp
lnRecno = recno()
with myBrowse
*...
*  .Setall("DynamicBackColor","iif(recno()%2=0,255^3,255^2)","column")
  .Setall("DynamicBackColor","iif(recno()="+str(lnRecno)+","+;
  	str(.Columns(1).Text1.SelectedBackColor)+","+str(.Backcolor)+")","column")
  .Setall("DynamicForeColor","iif(recno()="+str(lnRecno)+","+;
  	str(.Columns(1).Text1.SelectedForeColor)+","+str(.Forecolor)+")","column")
Cetin
Çetin Basöz

The way to Go
Flutter - For mobile, web and desktop.
World's most advanced open source relational database.
.Net for foxheads - Blog (main)
FoxSharp - Blog (mirror)
Welcome to FoxyClasses

LinqPad - C#,VB,F#,SQL,eSQL ... scratchpad
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform