コラム/トリップでるぅ/6

2023-06-12

2021-02-15

2013-06-19

2012-07-14

2012-02-04

2012-01-06

2011-03-31

2010-08-26

2010-03-15

2009-10-21

2009-02-12

2008-11-18

Editの名前を変えておきましょう。

キーを入れるほうを、　k_edit
トリップが出るほうを、 t_edit
にしました。

そしたら、変換処理を作ります。
ボタンをダブルクリックして、
ボタンのonClickイベントを作ります。

procedure TForm1.Button1Click(Sender: TObject);
begin 

end;

そしたら以下のコードを書きます。

procedure TForm1.Button1Click(Sender: TObject);
begin
   t_edit.Text:=Trip(k_edit.Text);
end;

完成！！！！

コラム / トリップでるぅ / 6