Calculo de Percentual
Ola pessoal sou totalmento novato em delphi ou programação gostaria de saber como posso fazer o seguinte calculo ex:
edit1.text:=edit2.text * 1.10
quando eu faço isso não da certo o variavel que estou usando é integer
favor me passar a formula certa
muito ogrigrado :lol:
edit1.text:=edit2.text * 1.10
quando eu faço isso não da certo o variavel que estou usando é integer
favor me passar a formula certa
muito ogrigrado :lol:
Pacelly
Curtidas 0
Respostas
Castilho
24/12/2003
faz assim:
var valor :integer;
begin
valor := inttostr(edit2.text);
edit1.text := valor * 1.10
ou alíquota /100;
end;
var valor :integer;
begin
valor := inttostr(edit2.text);
edit1.text := valor * 1.10
ou alíquota /100;
end;
GOSTEI 0
Maicongabriel
24/12/2003
Assim...
StrToInt() :arrow: Converte String para Inteiro;
FloatToStr() :arrow: Converte Extended ou Double para String.
Edit1.Text := FloatToStr( StrToInt(Edit2.Text) * 1.10 );
StrToInt() :arrow: Converte String para Inteiro;
FloatToStr() :arrow: Converte Extended ou Double para String.
GOSTEI 0
Martins
24/12/2003
Vejamos:
||Ola pessoal sou totalmento novato em delphi ou programação gostaria ||de saber como posso fazer o seguinte calculo ex:
||edit1.text:=edit2.text * 1.10
Vc não pode fazer isso assim...
||quando eu faço isso não da certo o variavel que estou usando é integer
||favor me passar a formula certa
vai dá erro sempre, pois vc não pode usar string para calculo.
Faça assim:
Edit2.Text:=FloatToStr(StrToFloat(Edit1.Text)*0.0765);
(*Saber o valor do desconto do salario minimo com base na aliquota do inss. *)
Espero q esse exemplo o ajude.
Boa Sorte e Um Feliz Natal e Prospero Ano Novo, para vc e toda a sua familia.
||Ola pessoal sou totalmento novato em delphi ou programação gostaria ||de saber como posso fazer o seguinte calculo ex:
||edit1.text:=edit2.text * 1.10
Vc não pode fazer isso assim...
||quando eu faço isso não da certo o variavel que estou usando é integer
||favor me passar a formula certa
vai dá erro sempre, pois vc não pode usar string para calculo.
Faça assim:
Edit2.Text:=FloatToStr(StrToFloat(Edit1.Text)*0.0765);
(*Saber o valor do desconto do salario minimo com base na aliquota do inss. *)
Espero q esse exemplo o ajude.
Boa Sorte e Um Feliz Natal e Prospero Ano Novo, para vc e toda a sua familia.
GOSTEI 0
Guialberto
24/12/2003
//Tente assim ...
edit1.text:=FloatToStr(StrToFloat(edit2.text) * 1.10 );
edit1.text:=FloatToStr(StrToFloat(edit2.text) * 1.10 );
GOSTEI 0
Wolverine
24/12/2003
Amigo, o codigo do maicongabriel ta certinho, entra neste site (meu) este codigo é de um programa de contabilidade, tem varios calculos, é legal para quem esta iniciando
Márcio Vinicius Dias
:lol:
Márcio Vinicius Dias
:lol:
GOSTEI 0
Wolverine
24/12/2003
Amigo, o codigo do maicongabriel ta certinho, entra neste site (meu) este codigo é de um programa de contabilidade, tem varios calculos, é legal para quem esta iniciando
o site: http://dilmarsgm.sites.uol.com.br/delphi/contabilidade.zip
:oops:
Márcio Vinicius Dias
:lol:
GOSTEI 0