掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
パスワードの米印を見れるようにするには (ID：12138)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
ちょっとだけよん。 HandleStore : TStringList; // create,freeは自分でしてね procedure ... var i,Now : integer; begin HandleStore.Clear; HandleStore.Duplicates := dupIgnore; HandleStore.Sorted := True; Now := ひみつ(^_-); if (ひみつ(^_-)) then HandleStore.Add(IntToStr( Now )); .. ..ひみつ(^_-) .. if (HandleStore.Count>0)then if ( MessageDlg(Format('お星さま%d個発見♪。望遠鏡で観察しますか♪' +#13#10+'%s',[HandleStore.Count, HandleStore.Text]), mtConfirmation ,[mbYes,mbNo],0) =mrYes) then for i := 0 to HandleStore.Count-1 do MitemiteOhosisama(StrToInt(HandleStore.Strings[i]));
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.