板 1- 前 次 新 ﾚｽ
どんなくだらねぇ質問にもマジレスするスレPart14
[922]名無しさん(ザコ)：2007/10/17(水) 17:47:34 ID:AQPT+Xf+0
>>920
試してないケド適当にこんな感じ？
その手の処理はヘルプのInfo関数のと所とにらめっこしてれば、それなりのモノになるよ！
For i = 1 To CountItem(対象ユニットＩＤ)
If Not Info(Item(対象ユニットＩＤ,i), 装備個所) = 非表示 Then
RemoveItem 対象ユニットＩＤ Item(対象ユニットＩＤ,i), 装備個所)
Endif
Next
前 次
0ch BBS 2005-06-05