昨日のプログラムDelphi版
unit sampeUnit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ExtCtrls; type TForm1 = class(TForm) LabeledEdit1: TLabeledEdit; LabeledEdit2: TLabeledEdit; Button1: TButton; LabeledEdit3: TLabeledEdit; LabeledEdit4: TLabeledEdit; LabeledEdit5: TLabeledEdit; LabeledEdit6: TLabeledEdit; procedure Button1Click(Sender: TObject); private { Private 宣言 } public { Public 宣言 } end; var Form1: TForm1; implementation {$R *.dfm} procedure TForm1.Button1Click(Sender: TObject); var exA,exB:Extended; begin exA:=StrToFloat(Form1.LabeledEdit1.Text); exB:=StrToFloat(Form1.LabeledEdit2.Text); Form1.LabeledEdit3.Text:=FloatToStr(exA + exB); Form1.LabeledEdit4.Text:=FloatToStr(exA - exB); Form1.LabeledEdit5.Text:=FloatToStr(exA * exB); Form1.LabeledEdit6.Text:=FloatToStr(exA / exB); end; end.
こんな感じだろうか……。
実際に自分でコーディングすべきところはProcedureの中身だけで、わずか6行だ。さて、明日はどんな言語で書くか??
ASPとか……?