Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Time Calculation
Message
De
12/02/2010 00:20:53
Lutz Scheffler
Lutz Scheffler Software Ingenieurbüro
Dresden, Allemagne
 
 
À
11/02/2010 09:29:24
Information générale
Forum:
Visual FoxPro
Catégorie:
Base de données, Tables, Vues, Index et syntaxe SQL
Versions des environnements
Visual FoxPro:
VFP 9 SP2
OS:
Windows XP SP2
Network:
Windows XP
Database:
Visual FoxPro
Application:
Desktop
Divers
Thread ID:
01448762
Message ID:
01448882
Vues:
41
>sir i used your codes as
>
>lnSec = int(ABS(CTOT(thisform.text1.Value)-CTOT(thisform.text1.Value)))
>?TRANSFORM(100*INT(lnsec/3600)+INT((lnsec%3600)/60),'99:99')
>lnSec =lnSec *5
>thisform.text2.value=TRANSFORM(100*INT(lnsec/3600)+INT((lnsec%3600)/60),'99:99')
>
>but replies as
> : 0
lnSec = int(ABS(CTOT('11:25')-CTOT('13:30')))
?TRANSFORM(100*INT(lnsec/3600)+INT((lnsec%3600)/60),'99:99')
lnSec =lnSec *5
?TRANSFORM(100*INT(lnsec/3600)+INT((lnsec%3600)/60),'99:99')
_screen.addOBJECT('lof','textbox')
_screen.lof.Visible = .t.
_screen.lof.Value = TRANSFORM(100*INT(lnsec/3600)+INT((lnsec%3600)/60),'99:99')
Shows a textbox with '10:25' as value.

I have no idea about the property settings of your textbox.
Consider the read help file about formating a textbox display.

Agnes
Words are given to man to enable him to conceal his true feelings.
Charles Maurice de Talleyrand-Périgord

Weeks of programming can save you hours of planning.

Off

There is no place like [::1]
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform