afficher un (long) double dans un Tlabel
bonjour j'ai un programme ou il faut que j' affiche des chiffres vertigineux (logiciel de simulation) et je n'arrive pas a les afficher meme avec les cast, sinon les currency sont beaucoupmieux mais je n'arrive pas a les utiliser, je n'ai pas de code direct sinon un qui s'ent approche
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
|
long double res=0,amb,cmb;//ou Currency
//Gestion du systeme de l'entrée de caracteres non numériques (sans le copier/coller)
long StylesEdit = GetWindowLong(Edit1->Handle, GWL_STYLE);
SetWindowLong(Edit1->Handle, GWL_STYLE, StylesEdit | ES_NUMBER);
long StylesEdit = GetWindowLong(Edit2->Handle, GWL_STYLE);
SetWindowLong(Edit2->Handle, GWL_STYLE, StylesEdit | ES_NUMBER);
if(Edit1->Text=="")
{
amb=0;
}
else
{
amb=StrToDouble(Edit1->Text);
}
if(Edit2->Text=="")
{
cmb=0;
}
else
{
cmb=StrToDouble(Edit2->Text);
}
res=amb*cmb
AnsiString Resultat
/*partie manquante pour long double res->AnsiString Resultat*/
Label1->Caption=Resultat |
