• Üyelik paylaşımı yasaktır! Hesabınızı başkalarına vermeyin! Hesap paylaşımları yasaklama ile sonuçlanacaktır.

Delphi-Sıcaklık Değerini Değiştirme

Durum
Üzgünüz bu konu cevaplar için kapatılmıştır...

ByClxon

Süper Üye
Katılım
7 Ocak 2016
Mesajlar
955
Beğeni Puanı
4
Yaş
22
PHP:
[color=yellowgreen][font=tahoma]procedure TForm1.Button1Click(Sender: TObject);[/FONT][/color][color=YellowGreen]var
a,yenideger:real;
begin
a:=strtofloat(edit1.text);
if radiobutton1.Checked then
yenideger:=((a)*(9/5))+32;
edit2.text:=floattostr(yenideger);
if radiobutton2.checked then
yenideger:=((a)-32)*(5/9);
edit2.text:=floattostr(yenideger);
end;
[/color][color=yellowgreen][font=tahoma]end.[/FONT][/color]


Lütfen, Giriş yap veya Kayıt ol içerikteki bağlantıyı görüntülemek için!
 
Durum
Üzgünüz bu konu cevaplar için kapatılmıştır...


Üst Alt