delphi 文字列変換

ＤＥＬＰＨＩの覚え書きです。


～～　文字列型の数値で、小数点以下を削除する方法　～～

procedure TForm1.Button1Click(Sender: TObject);
var
iwork: Integer;
vwork: Variant;

begin
// Variant経由による文字列の実数から整数への変換
vwork := '1.5';
iwork := vwork;
ShowMessage( IntToStr( iwork ) ); // 結果は'2'
end;

髪がぁ・・・

しばらく　美容院に行ってないなぁ・・・

ボサボサの頭してます。

「おばさん」になってしまいました。

しばらくカラーをしてないから

頭のてっぺんが、黒いし

今度の週末には、美容院行ってきます

それじゃ　

おひさしぶりです♪

久々の更新です。

保育園のバザーやら、子ども会の行事やらで

疲れております・・


なんせ、両方とも

会長なんだもん・・・

子ども会は、じゃんけんに負けて　会長になり・・・

保育園は、断り続けたけどぉ

仲良しママ友達に強引に、役員にいれたれたあげく

会長に、めでたく就任してしまったのです。



なんかなぁ

人を動かすって

たいへんだなぁ・・・

そうじゃないんだよぉぉって

怒りたい気持ちを、押さえるのって大変。

動かない人とやる気にさせるのも大変。

クレーム対応も会長の仕事です。

器の小さい私のは、荷が重すぎたわ。


でもね、人間的に成長できたかな？

友達も増えたし、

あと、少しだから

がんばろう～

それでは