Caption = "dollar"
Download 0.51 Mb.
|
konverter
//--------------------------------------------------------------------------- #include #pragma hdrstop #include "Unit1.h" //--------------------------------------------------------------------------- #pragma package(smart_init) #pragma resource "*.dfm" TForm1 *Form1; //--------------------------------------------------------------------------- __fastcall TForm1::TForm1(TComponent* Owner) : TForm(Owner) { } //--------------------------------------------------------------------------- void __fastcall TForm1::RadioButton1Click(TObject *Sender) { if (RadioButton1->Checked == true) { Label1->Caption = Edit1->Text.ToDouble() * 11450; Label2->Caption = "som"; } } //--------------------------------------------------------------------------- void __fastcall TForm1::RadioButton2Click(TObject *Sender) { if (RadioButton2->Checked == true) { Label1->Caption = Edit1->Text.ToInt() / 11450; Label2->Caption = "dollar"; }} //--------------------------------------------------------------------------- Download 0.51 Mb. Do'stlaringiz bilan baham: |
Ma'lumotlar bazasi mualliflik huquqi bilan himoyalangan ©fayllar.org 2024
ma'muriyatiga murojaat qiling
ma'muriyatiga murojaat qiling