HSPポータル
サイトマップ お問い合わせ


HSPTV!掲示板


未解決 解決 停止 削除要請

2008
0322
begriffタブの配置3解決


begriff

リンク

2008/3/22(Sat) 04:15:05|NO.14495

タブが常に最背面で表示されます。順番通りになりませんかね
教示ねがいます。

x=100:y=100 objsize x,y syscolor 15 : boxf //ボタン タブ ボタンの順番で作る。↓ button "",*s pos x/2, y/2 winobj "systabcontrol32", "", , $52000000//コントロール配置 hTab = objinfo(stat, 2) pszText = "ABCDEF" : tcitem = 1, 0, 0, varptr(pszText)//項目追加のための構造体関係 sendmsg hTab, $1307, 0, varptr(tcitem)//タブに項目を追加 pos x,y button "",*s //ボタンのみで↓ pos x*2,0 button "",*s pos x*2+x/2,y/2 button "",*s pos x*2+x,y button "",*s *s



この記事に返信する


As

リンク

2008/3/22(Sat) 05:43:25|NO.14496

タブコントロールなんですから、、、それはあたりまえだとおもいますよ^^;

タブコントロールが手前にきたら、ボタンもなにも見えなくなりますよ^^;



hiro

リンク

2008/3/22(Sat) 21:30:23|NO.14501

USER32.DLLのSetWindowPosを使用してみてはどうでしょうか。
http://msdn.microsoft.com/library/ja/default.asp?url=/library/ja/jpwinui/html/_win32_setwindowpos.asp

また、スタイルにWS_CLIPSIBLINGSをつけるのもいいかもしれません。
以下は、オブジェクトを作成した順番に重ねています。
#include "user32.as"
#define WS_CLIPSIBLINGS $04000000 #define HWND_TOP 0 x=100:y=100 objsize x,y syscolor 15 : boxf //ボタン タブ ボタンの順番で作る。↓ button "",*s SetWindowLong objinfo(stat,2), -16, $50000000 | WS_CLIPSIBLINGS pos x/2, y/2 winobj "systabcontrol32", "", , $52000000 | WS_CLIPSIBLINGS hTab = objinfo(stat, 2) pszText = "ABCDEF" : tcitem = 1, 0, 0, varptr(pszText)//項目追加のための構造体関係 sendmsg hTab, $1307, 0, varptr(tcitem)//タブに項目を追加 pos x,y button "",*s SetWindowLong objinfo(stat,2), -16, $50000000 | WS_CLIPSIBLINGS // タブを最前面に SetWindowPos hTab, HWND_TOP, 0, 0, 0, 0, 3 // ID2のボタンを最前面に SetWindowPos objinfo(2,2), HWND_TOP, 0, 0, 0, 0, 3 *s



begriff

リンク

2008/3/22(Sat) 21:46:18|NO.14502

ありがとうございます。
参考になります。



ONION software Copyright 1997-2018(c) All rights reserved.