- 293 名前：デフォルトの名無しさん mailto:sage [2007/08/20(月) 09:50:34 ]
- function have09af(s: string): boolean;
var i: integer;
begin
for i := 1 to length(s) do if s[i] in ['0'..'9', 'a'..'f', 'A'..'F'] then begin result := true; exit; end;
result := false;
end;
↑キャッシュ検索、類似スレ動作を修正しました、ご迷惑をお掛けしました |
くだすれDelphi(超初心者用)その43
| |
read.cgi ver5.27 [feat.BBS2 +1.6] / e.0.2 (02/09/03) / eucaly.net products.
担当:undef