ｿｽgｿｽbｿｽv > Delphi Q & Aｿｽfｿｽｿｽｿｽｿｽ > 201001 >

ｿｽeｿｽｿｽｿｽｿｽﾌ過具ｿｽｿｽｿｽｿｽO

ｿｽEC/C++
ｿｽEDelphi
ｿｽEVisual BasicｿｽｿｽｿｽSｿｽｿｽ
ｿｽ@(VB2-VB6ｿｽｿｽ.NETｿｽｿｽｿｽp)
ｿｽEVisual Basic(VB2-VB6)
ｿｽEVisual Basic .NET
ｿｽEVisual C++

ｿｽﾖ連ｿｽTｿｽCｿｽg

ｿｽEｿｽeｿｽ言ｿｽｿｽfｿｽｿｽｿｽｿｽ

risa 2010/01/10(ｿｽｿｽ) 18:34:42

ｿｽ@ｿｽｿｽｿｽﾂゑｿｽｿｽｿｽｿｽｿｽbｿｽﾉなゑｿｽﾜゑｿｽｿｽBｿｽﾈ会ｿｽｿｽﾌ趣ｿｽｿｽｿｽｿｽﾉつゑｿｽｿｽﾄ趣ｿｽｿｽ竄ｳｿｽｿｽｿｽﾄゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽB

ComboBoxｿｽﾌ搾ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽ謔､ｿｽﾆ、3ｿｽﾓ擾ｿｽｿｽｿｽ1ｿｽsｿｽｿｽｿｽﾂコｿｽ[ｿｽhｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽｿｽｿｽB
ｿｽTｿｽﾋ意図ｿｽｿｽｿｽｿｽｿｽﾆゑｿｽｿｽｿｽﾉ難ｿｽｿｽｿｽｿｽﾌでゑｿｽｿｽｿｽｿｽAｿｽRｿｽｿｽｿｽ{ｿｽ{ｿｽbｿｽNｿｽXｿｽﾌ隣にゑｿｽｿｽ驩ｺｿｽｿｽｿｽｿｽｿｽｿｽ
ｿｽOｿｽpｿｽﾌ包ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾆ、ｿｽｿｽｿｽﾌ三ｿｽpｿｽﾌ包ｿｽｿｽｿｽｿｽﾌ描ｿｽ謔ｪｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾈゑｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽﾜゑｿｽｿｽB
ｿｽｿｽｿｽｿｽｿｽｿｽYｿｽｿｽﾉ描ｿｽ謔ｷｿｽｿｽﾉはどゑｿｽｿｽｿｽｿｽｿｽﾎよいｿｽﾅゑｿｽｿｽ蛯､ｿｽｿｽｿｽH
ｿｽｿｽしｿｽｿｽｿｽｿｽｿｽ閧｢ｿｽｿｽｿｽﾜゑｿｽｿｽBｿｽiDelphi6ｿｽｿｽgｿｽpｿｽｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽBｿｽj

procedureTForm1.ComboBox1DrawItem(Control:TWinControl;Index:Integer;
Rect:TRect;State:TOwnerDrawState);
begin
SendMessage(ComboBox1.Handle,CB_SETITEMHEIGHT,-1,16);
end;

procedureTForm1.ComboBox1CloseUp(Sender:TObject);
begin
SendMessage(ComboBox1.Handle,CB_SETITEMHEIGHT,-1,16);
end;

procedureTForm1.ComboBox1Click(Sender:TObject);
begin
SendMessage(ComboBox1.Handle,CB_SETITEMHEIGHT,-1,16);
end;

risa 2010/01/10(ｿｽｿｽ) 18:37:42

ｿｽOｿｽﾌゑｿｽｿｽﾟゑｿｽｿｽｿｽﾐとつ。
ｿｽSｿｽｿｽｿｽﾚの搾ｿｽｿｽｿｽｿｽｿｽｿｽｿｽ黷ｵｿｽﾄ変更ｿｽｿｽｿｽｿｽﾎ、ｿｽﾓ図ｿｽｿｽｿｽｿｽｿｽﾆゑｿｽｿｽｿｽﾉ難ｿｽｿｽｿｽｿｽﾌでは？ｿｽﾆ考ｿｽｿｽｿｽA
ｿｽｿｽｿｽﾌコｿｽ[ｿｽhｿｽｿｽｿｽｿｽｿｽｿｽﾄみまゑｿｽｿｽｿｽｿｽｿｽｿｽAｿｽｿｽﾍりうｿｽﾜゑｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽｿｽﾅゑｿｽｿｽｿｽｿｽB

procedureTForm1.Button1Click(Sender:TObject);
var
i:Integer;
begin
//ｿｽRｿｽｿｽｿｽ{ｿｽ{ｿｽbｿｽNｿｽXｿｽﾌ全ｿｽｿｽｿｽﾚの搾ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽB
fori:=-1toComboBox1.Items.Count-1do
SendMessage(ComboBox1.Handle,CB_SETITEMHEIGHT,i,16)
end;

KHE00221 2010/01/10(ｿｽｿｽ) 18:43:30

FontｿｽTｿｽCｿｽYｿｽﾏゑｿｽｿｽｿｽﾎ趣ｿｽｿｽｿｽｿｽIｿｽﾉ搾ｿｽｿｽｿｽｿｽｿｽﾏゑｿｽｿｽﾆ思ｿｽｿｽｿｽｿｽｿｽﾇ？

tor 2010/01/10(ｿｽｿｽ) 18:58:31

ｿｽRｿｽｿｽｿｽ{ｿｽ{ｿｽbｿｽNｿｽXｿｽﾍスｿｽ^ｿｽCｿｽｿｽｿｽﾉゑｿｽｿｽｿｽﾄ具ｿｽｿｽｿｽｿｽｿｽｿｽ痰｢ｿｽﾜゑｿｽｿｽｿｽｿｽAｿｽgｿｽｿｽｿｽﾄゑｿｽｿｽｿｽStyleｿｽﾍ会ｿｽｿｽﾅゑｿｽｿｽ蛯､ｿｽH
StyleｿｽｿｽcsOwnerDrawFixedｿｽﾉゑｿｽｿｽﾄ、ItemHeightｿｽｿｽgｿｽｿｽｿｽﾌでは駄目なゑｿｽﾅゑｿｽｿｽ蛯､ｿｽｿｽｿｽH
ｿｽiOnDrawItemｿｽﾅ趣ｿｽｿｽｿｽｿｽﾅ描ｿｽ謔ｵｿｽﾈゑｿｽｿｽｿｽｿｽ痰｢ｿｽｿｽｿｽﾈゑｿｽｿｽﾈゑｿｽﾜゑｿｽｿｽｿｽｿｽﾇ）

ｿｽｿｽｿｽﾈみに、CB_SETITEMHEIGHTｿｽｿｽAｿｽIｿｽ[ｿｽiｿｽ[ｿｽhｿｽｿｽｿｽ[ｿｽﾅなゑｿｽｿｽ鼾ｿｽｿｽ
wParamｿｽｿｽ-1ｿｽｿｽ0ｿｽﾈ外ｿｽﾌ値ｿｽﾍ指ｿｽｿｽﾅゑｿｽｿｽﾈゑｿｽｿｽﾆゑｿｽｿｽｿｽﾜゑｿｽｿｽB

risa 2010/01/10(ｿｽｿｽ) 19:20:02

ｿｽｿｽｿｽ答、ｿｽﾇゑｿｽｿｽｿｽｿｽｿｽ閧ｪｿｽﾆゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽB

ｿｽｿｽｿｽｿｽﾅ、FontｿｽﾌサｿｽCｿｽYｿｽﾌ鯉ｿｽｿｽﾉつゑｿｽｿｽﾄなのでゑｿｽｿｽｿｽｿｽAｿｽｿｽｿｽｿｽｿｽｿｽｿｽwｿｽEｿｽｿｽｿｽ黷ｽｿｽTｿｽCｿｽY
ｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽﾌで、ｿｽｿｽｿｽｿｽｿｽｿｽｿｽ轤ｵｿｽﾈゑｿｽｿｽﾄはなゑｿｽﾜゑｿｽｿｽｿｽBｿｽｿｽｿｽｿｽｿｽｿｽﾌ変更ｿｽｿｽｿｽｿｽｿｽｿｽ
ｿｽﾆ難しｿｽｿｽｿｽﾅゑｿｽｿｽB

ｿｽｿｽｿｽｿｽﾆ、ｿｽXｿｽ^ｿｽCｿｽｿｽｿｽｿｽcsDropDownｿｽiｿｽｿｽｿｽｿｽｿｽlｿｽjｿｽｿｽgｿｽpｿｽｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽBｿｽｿｽｿｽRｿｽﾉ難ｿｽｿｽｿｽ
ｿｽﾅゑｿｽｿｽｿｽKｿｽvｿｽｿｽｿｽｿｽｿｽ骰ｿｽﾚなので、ｿｽｿｽｿｽｿｽｿｽgｿｽpｿｽｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽB

wParamｿｽｿｽ-1ｿｽｿｽ0ｿｽﾈ外ｿｽｿｽwｿｽｿｽﾅゑｿｽｿｽﾈゑｿｽｿｽｿｽｿｽﾆは勉具ｿｽｿｽﾉなゑｿｽﾜゑｿｽｿｽｿｽｿｽB
ｿｽ鼬ｩｿｽｿｽｿｽｿｽｿｽﾄゑｿｽｿｽｿｽｿｽ謔､ｿｽﾉ鯉ｿｽｿｽｿｽｿｽｿｽｿｽﾌでゑｿｽｿｽｿｽｿｽAｿｽｿｽｿｽｿｽｿｽﾈ擾ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾌでゑｿｽｿｽﾋ。
ｿｽｿｽｿｽqｿｽｿｽｿｽｿｽﾌプｿｽｿｽｿｽOｿｽｿｽｿｽｿｽｿｽﾉみゑｿｽｿｽﾆゑｿｽﾈゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾍゑｿｽｿｽﾞとゑｿｽｿｽｿｽﾅゑｿｽｿｽｿｽｿｽBｿｽｿｽｿｽwｿｽEｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾄ、ｿｽ{ｿｽｿｽｿｽﾉ擾ｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽｿｽｿｽBm(__)m

risa 2010/01/17(ｿｽｿｽ) 21:41:11

ｿｽｿｽﾍり高ｿｽｿｽｿｽｿｽﾏゑｿｽｿｽ驍ｱｿｽﾆは難しｿｽｿｽｿｽﾅゑｿｽｿｽ蛯､ｿｽｿｽｿｽH
ｿｽｿｽｿｽいｿｽ調ｿｽﾗゑｿｽｿｽ閧ｵｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽｿｽｿｽAｿｽﾜゑｿｽｿｽﾅゑｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽｿｽB
ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾎ、ｿｽｿｽｿｽﾐゑｿｽｿｽ閧｢ｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽB

Mr.XRAY 2010/01/18(ｿｽｿｽ) 00:30:14

ｿｽｿｽｿｽｿｽﾉゑｿｽｿｽﾍ．Mr.XRAYｿｽﾅゑｿｽｿｽD

ｿｽｿｽｿｽｿｽｿｽﾔ難ｿｽｿｽﾉゑｿｽｿｽｿｽｿｽoｿｽﾟゑｿｽｿｽﾄゑｿｽｿｽｿｽﾌで，ｿｽlｿｽbｿｽgｿｽｿｽｿｽﾅ抵ｿｽｿｽｿｽｿｽﾏみゑｿｽｿｽﾆは思ｿｽｿｽｿｽﾜゑｿｽｿｽｿｽｿｽC
(ｿｽｿｽｿｽｿｽﾍゑｿｽｿｽｿｽﾄみまゑｿｽｿｽｿｽｿｽｿｽ...ｿｽﾆゑｿｽｿｽｿｽｿｽｿｽｿｽﾆになゑｿｽﾌゑｿｽｿｽｿｽmｿｽｿｽﾜゑｿｽｿｽｿｽ..)

OwnerDrawｿｽﾅはどゑｿｽｿｽﾅゑｿｽｿｽｿｽｿｽD
ｿｽｿｽｿｽｿｽｿｽｿｽｿｽCｿｽｿｽｿｽｿｽmｿｽFｿｽｿｽDelphi6(UP2)+WindowXP(SP3)ｿｽｿｽXPｿｽeｿｽ[ｿｽ}ｿｽｿｽｿｽgｿｽpｿｽﾅゑｿｽｿｽD
XPｿｽeｿｽ[ｿｽ}ｿｽｿｽLｿｽｿｽｿｽﾉゑｿｽｿｽｿｽﾆどゑｿｽｿｽﾈるかｿｽﾍ不ｿｽｿｽｿｽﾅゑｿｽｿｽD

ｿｽﾜゑｿｽｿｽCｿｽﾇゑｿｽｿｽｿｽｿｽﾄゑｿｽcsDropDownｿｽﾆゑｿｽｿｽｿｽｿｽ鼾ｿｽﾍでゑｿｽｿｽﾈゑｿｽｿｽﾆ思ｿｽｿｽｿｽﾜゑｿｽｿｽｿｽD
ｿｽｿｽｿｽｿｽｿｽﾄ，Draw(ｿｽ`ｿｽｿｽ)ｿｽｿｽﾏ更ｿｽｿｽｿｽﾈゑｿｽｿｽｿｽﾅゑｿｽｿｽｿｽｿｽｿｽD
(Itemｿｽｿｽ)ｿｽﾌ搾ｿｽｿｽｿｽｿｽｿｽﾏゑｿｽｿｽｿｽﾆ鯉ｿｽｿｽｿｽｿｽｿｽｿｽﾆは，ｿｽ`ｿｽｿｽｿｽﾏゑｿｽｿｽｿｽﾆゑｿｽｿｽｿｽｿｽｿｽｿｽﾆでゑｿｽｿｽｿｽｿｽｿｽD

//=============================================================================
//ComboBoxｿｽﾅオｿｽ[ｿｽiｿｽ[ｿｽhｿｽｿｽｿｽEｿｽｿｽｿｽｿｽ
//StyleｿｽvｿｽｿｽｿｽpｿｽeｿｽBｿｽｿｽcsOwnerDrawFixedｿｽｿｽcsOwnerDrawVariableｿｽﾉゑｿｽｿｽﾈゑｿｽｿｽﾆ厄ｿｽｿｽｿｽ
//ComboBoxｿｽﾌ搾ｿｽｿｽｿｽｿｽｿｽItemHeightｿｽﾅ変更ｿｽｿｽｿｽｿｽ
//=============================================================================
procedureTForm1.ComboBox1DrawItem(Control:TWinControl;Index:Integer;
Rect:TRect;State:TOwnerDrawState);
begin
TComboBox(Control).Canvas.FillRect(Rect);

ifodFocusedinStatethen
begin
TComboBox(Control).Canvas.Font.Color:=clWhite;
endelse
begin
TComboBox(Control).Canvas.Font.Color:=clWindowText;
end;
//2ｿｽｿｽ5ｿｽﾌ値ｿｽｿｽItemHeightｿｽｿｽｿｽｿｽｿｽﾄゑｿｽﾌ裁ゑｿｽｿｽﾏゑｿｽｿｽﾌで適ｿｽｿｽｿｽﾏ更ｿｽｿｽｿｽｿｽ
//ｿｽｿｽｿｽ驍｢ｿｽﾍ趣ｿｽｿｽｿｽｿｽvｿｽZｿｽﾌコｿｽ[ｿｽhｿｽｿｽｿｽｿｽｿｽ
TComboBox(Control).Canvas.TextOut(Rect.Left+2,
Rect.Top+5,
TComboBox(Control).Items[Index]);

end;

tor 2010/01/18(ｿｽｿｽ) 00:31:07

ｿｽｿｽｿｽｿｽｿｽﾈ趣ｿｽiｿｽﾍオｿｽ[ｿｽiｿｽ[ｿｽhｿｽｿｽｿｽ[ｿｽﾉゑｿｽｿｽｿｽItemHeightｿｽｿｽwｿｽ閧ｷｿｽｿｽﾈゑｿｽ
OnMeasureItemｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽ驍ｱｿｽﾆなゑｿｽﾅゑｿｽｿｽｿｽｿｽﾇ、
ｿｽｿｽｿｽ黷ｾｿｽﾆ難ｿｽｿｽｿｽﾆゑｿｽｿｽﾄゑｿｽcsDropDownListｿｽｿｽｿｽｿｽｿｽﾉなるかｿｽｿｽﾊ目とゑｿｽｿｽｿｽｿｽｿｽｿｽﾆでゑｿｽｿｽﾋ。

TComboBoxExｿｽｿｽgｿｽｿｽｿｽﾄ、Heightｿｽｿｽﾚ的ｿｽﾌ搾ｿｽｿｽｿｽｿｽﾉ設定しｿｽｿｽImageListｿｽｿｽﾖ連ｿｽﾃゑｿｽｿｽｿｽﾆゑｿｽｿｽｿｽｿｽｿｽﾛゑｿｽｿｽﾈゑｿｽﾜゑｿｽｿｽBｿｽｿｽｿｽｿｽﾅはどゑｿｽｿｽﾅゑｿｽｿｽ蛯､ｿｽｿｽｿｽH
ｿｽiDropDownCountｿｽﾆの関係ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾆ会ｿｽｿｽｿｽｿｽｿｽｿｽﾈゑｿｽﾌで抵ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽ閧ｻｿｽｿｽｿｽﾅゑｿｽｿｽｿｽｿｽj

Mr.XRAY 2010/01/18(ｿｽｿｽ) 00:33:55

ｿｽｿｽｿｽ轤ｵｿｽﾜゑｿｽｿｽｿｽｿｽD
ｿｽｿｽｿｽﾌ包ｿｽｿｽ@ｿｽﾍ奇ｿｽｿｽｿｽtorｿｽｿｽｿｽがｿｽｿｽXｿｽｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽｿｽｿｽﾋ．
Styleｿｽｿｽﾏ更ｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾈゑｿｽｿｽﾆのゑｿｽｿｽﾆでゑｿｽｿｽﾌで，ｿｽｿｽｿｽﾌｿｽｿｽXｿｽﾍ忘ｿｽｿｽﾄゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽD

Mr.XRAY 2010/01/18(ｿｽｿｽ) 00:49:47

>Styleｿｽｿｽﾏ更ｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾈゑｿｽｿｽﾆのゑｿｽｿｽﾆでゑｿｽｿｽﾌで，ｿｽｿｽｿｽﾌｿｽｿｽXｿｽﾍ忘ｿｽｿｽﾄゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽD

ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾆ一言ｿｽD
ｿｽﾚ的ｿｽﾅ達ｿｽｿｽｿｽﾅゑｿｽｿｽｿｽﾌでゑｿｽｿｽｿｽｿｽ,ｿｽﾏ更ｿｽｿｽｿｽﾄゑｿｽｿｽｿｽｿｽｿｽﾆ思ｿｽｿｽｿｽｿｽﾅゑｿｽｿｽｿｽｿｽD

deldel 2010/01/18(ｿｽｿｽ) 09:32:48

ｿｽwｿｽiｿｽﾌ色ｿｽｿｽｿｽｿｽｿｽｿｽｿｽpｿｽlｿｽｿｽｿｽｿｽpｿｽﾓゑｿｽｿｽﾄ、
ｿｽｿｽｿｽﾌ抵ｿｽｿｽﾉコｿｽｿｽｿｽ{ｿｽ{ｿｽbｿｽNｿｽXｿｽｿｽuｿｽｿｽｿｽﾄ、
FormCreateｿｽﾈどでコｿｽｿｽｿｽ{ｿｽ{ｿｽbｿｽNｿｽXｿｽﾌ枠ｿｽｿｽ
ｿｽｿｽｿｽｿｽｿｽﾆゑｿｽｿｽｿｽｿｽﾌはどゑｿｽｿｽﾅゑｿｽｿｽ蛯､ｿｽｿｽｿｽH

SetWindowRgn(ComboBox1.Handle,CreateRectRgn(2,2,ComboBox1.Width-2,ComboBox1.Height-2),True);

tor 2010/01/18(ｿｽｿｽ) 16:59:36

ｿｽｿｽｿｽEｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽｿｽｿｽAｿｽRｿｽｿｽｿｽ{ｿｽ{ｿｽbｿｽNｿｽXｿｽﾅは本ｿｽｿｽｿｽAｿｽｿｽｿｽXｿｽgｿｽﾌ難ｿｽｿｽｿｽｿｽwｿｽ閧ｷｿｽｿｽXｿｽ^ｿｽCｿｽｿｽｿｽﾆオｿｽ[ｿｽiｿｽ[ｿｽ`ｿｽｿｽｿｽwｿｽ閧ｷｿｽｿｽXｿｽ^ｿｽCｿｽｿｽｿｽﾍ独暦ｿｽｿｽｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽB
ｿｽEｿｽｿｽｿｽXｿｽgｿｽﾌ難ｿｽｿｽｿｽ:CBS_SIMPLE,CBS_DROPDOWN,CBS_DROPDOWNLIST
ｿｽEｿｽIｿｽ[ｿｽiｿｽ[ｿｽ`ｿｽｿｽ:ｿｽﾈゑｿｽｿｽACBS_OWNERDRAWFIXED,CBS_OWNERDRAWVARIABLE

ｿｽ{ｿｽｿｽｿｽﾈゑｿｽ3ｿｽ‾3=9ｿｽﾊゑｿｽﾌ組ｿｽﾝ搾ｿｽｿｽせｿｽｿｽｿｽｿｽｿｽｿｽﾍゑｿｽｿｽﾈのでゑｿｽｿｽｿｽｿｽAVCLｿｽﾅはゑｿｽｿｽｿｽｿｽｿｽﾂゑｿｽStyleｿｽﾉ会ｿｽｿｽｿｽｿｽｿｽｿｽﾟゑｿｽ5ｿｽﾊゑｿｽﾉ撰ｿｽｿｽｿｽｿｽｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽB
ｿｽﾈので、ｿｽｿｽｿｽXｿｽgｿｽﾌ難ｿｽｿｽｿｽｿｽcsSimpleｿｽﾜゑｿｽｿｽｿｽcsDropDownｿｽﾆ難ｿｽｿｽｿｽｿｽﾅ、ｿｽｿｽｿｽﾂオｿｽ[ｿｽiｿｽ[ｿｽhｿｽｿｽｿｽ[ｿｽｿｽLｿｽｿｽｿｽﾉゑｿｽｿｽｿｽﾆゑｿｽｿｽｿｽｿｽｿｽｿｽﾆゑｿｽｿｽﾅゑｿｽｿｽﾈゑｿｽｿｽｿｽﾅゑｿｽｿｽﾋ。

ｿｽｿｽｿｽｿｽｿｽﾅ、ｿｽEｿｽBｿｽｿｽｿｽhｿｽEｿｽXｿｽ^ｿｽCｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾉゑｿｽｿｽｿｽｿｽｿｽｿｽﾄ、csDropDownｿｽﾌ難ｿｽｿｽｿｽﾆオｿｽ[ｿｽiｿｽ[ｿｽ`ｿｽｿｽ両暦ｿｽｿｽﾅゑｿｽｿｽﾈゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾄみまゑｿｽｿｽｿｽｿｽB
ｿｽJｿｽXｿｽ^ｿｽｿｽｿｽRｿｽｿｽｿｽ|ｿｽ[ｿｽlｿｽｿｽｿｽgｿｽｿｽｿｽ驍ｱｿｽﾆになゑｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽﾜゑｿｽｿｽｿｽｿｽｿｽﾇ、ｿｽﾜゑｿｽｿｽQｿｽlｿｽﾜでに…

type
TMyComboBox=class(TComboBox)
public
procedureCreateParams(varParams:TCreateParams);override;
end;

procedureTMyComboBox.CreateParams(varParams:TCreateParams);
begin
inherited;
//ｿｽfｿｽtｿｽHｿｽｿｽｿｽgｿｽﾅゑｿｽCBS_DROPDOWNｿｽｿｽｿｽﾝ定さｿｽｿｽﾄゑｿｽｿｽｿｽﾍゑｿｽｿｽﾈのゑｿｽ
//ｿｽｿｽｿｽｿｽﾉオｿｽ[ｿｽiｿｽ[ｿｽ`ｿｽｿｽXｿｽ^ｿｽCｿｽｿｽｿｽｿｽﾇ会ｿｽｿｽｿｽｿｽｿｽ
Params.Style:=Params.StyleorCBS_OWNERDRAWFIXED;
end;

procedureTForm1.FormCreate(Sender:TObject);
begin
ComboBox1:=TMyComboBox.Create(Self);
ComboBox1.Parent:=Self;
end;

ｿｽｿｽｿｽｿｽｿｽｿｽﾏゑｿｽｿｽ驍ｾｿｽｿｽｿｽﾈゑｿｽAｿｽｿｽｿｽｿｽOnMeasureItemｿｽｿｽOnDrawItemｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾈゑｿｽｿｽﾄゑｿｽｿｽｿｽ黷ｾｿｽｿｽｿｽﾅ難ｿｽｿｽｿｽｿｽﾄゑｿｽｿｽｿｽｿｽ謔､ｿｽﾅゑｿｽｿｽB
ｿｽｿｽｿｽﾈみに、ｿｽｿｽｿｽｿｽｿｽｿｽﾌ包ｿｽｿｽ@ｿｽｿｽｿｽﾆ包ｿｽｿｽｿｽｿｽがボｿｽbｿｽNｿｽXｿｽﾌ擾ｿｽﾉ抵ｿｽｿｽｿｽtｿｽｿｽｿｽｿｽｿｽCｿｽｿｽｿｽ[ｿｽWｿｽﾉなゑｿｽﾜゑｿｽｿｽｿｽｿｽA
ｿｽｿｽﾙど抵ｿｽﾄゑｿｽｿｽｿｽTComboBoxExｿｽｿｽｿｽﾆ逆ｿｽﾉ会ｿｽｿｽﾉ抵ｿｽｿｽｿｽtｿｽｿｽｿｽｿｽｿｽ謔､ｿｽﾉなゑｿｽﾜゑｿｽｿｽﾋ。

risa 2010/01/18(ｿｽｿｽ) 19:16:11

ｿｽｿｽﾓ暦ｿｽｿｽｿｽｿｽｿｽｿｽ轤ｱｿｽｿｽﾈにｿｽｿｽXｿｽｿｽｿｽc
ｿｽﾝなゑｿｽｿｽｿｽAｿｽ{ｿｽｿｽｿｽﾉゑｿｽｿｽ閧ｪｿｽﾆゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽBｿｽﾂまゑｿｽﾈゑｿｽｿｽｿｽｿｽｿｽﾉ、ｿｽｿｽｿｽｿｽﾈにゑｿｽ
ｿｽｿｽｿｽいｿｽｿｽﾆ考ｿｽｿｽｿｽﾄゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾄ、ｿｽ{ｿｽｿｽｿｽﾉ難ｿｽｿｽﾌ会ｿｽｿｽｿｽｿｽｿｽvｿｽｿｽｿｽﾅゑｿｽｿｽB

ｿｽｿｽｿｽﾍ出ｿｽｿｽﾈので、ｿｽﾜゑｿｽｿｽmｿｽFｿｽﾅゑｿｽｿｽﾜゑｿｽｿｽが、ｿｽAｿｽｿｽｿｽｿｽｿｽ轤ｲｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽ@
ｿｽｿｽｿｽｿｽ黷ｼｿｽｿｽmｿｽFｿｽｿｽｿｽｿｽｿｽﾄゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾆ思ｿｽｿｽｿｽﾜゑｿｽｿｽBｿｽｿｽｿｽﾊ報告ゑｿｽKｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽ
ｿｽﾌで、ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾔゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽB

risa 2010/01/20(ｿｽｿｽ) 21:34:46

ｿｽ@ｿｽｿｽｿｽAｿｽｿｽｿｽｿｽmｿｽFｿｽｿｽsｿｽｿｽｿｽﾜゑｿｽｿｽｿｽｿｽBｿｽｿｽｿｽ_ｿｽｿｽｿｽｿｽ¥ｿｽｿｽｿｽ繧ｰｿｽﾜゑｿｽｿｽﾆ、ｿｽﾅ終ｿｽIｿｽﾉゑｿｽ
torｿｽlｿｽﾌ最鯉ｿｽﾌゑｿｽｿｽｿｽﾄ包ｿｽｿｽｿｽｿｽ利用ｿｽｿｽｿｽｿｽｿｽﾄゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽAｿｽｿｽｿｽｿｽｿｽﾅゑｿｽｿｽﾜゑｿｽｿｽｿｽｿｽB
ｿｽﾙゑｿｽﾌ搾ｿｽｿｽﾗな変更ｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾌでゑｿｽｿｽｿｽｿｽAｿｽｿｽﾊ擾ｿｽﾅコｿｽｿｽｿｽgｿｽｿｽｿｽ[ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽ
ｿｽzｿｽuｿｽﾅゑｿｽｿｽｿｽ謔､ｿｽﾉなゑｿｽAｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾉ奇ｿｽﾎゑｿｽﾜゑｿｽｿｽｿｽｿｽBｿｽ{ｿｽｿｽｿｽﾉゑｿｽｿｽｿｽ
ｿｽｿｽｿｽﾆゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽBｿｽOｿｽｿｽｿｽﾌサｿｽCｿｽgｿｽﾜで鯉ｿｽｿｽｿｽｿｽｿｽｿｽﾄゑｿｽｿｽｿｽﾂゑｿｽｿｽ轤ｸｿｽAｿｽｿｽｿｽｿｽ1ｿｽｿｽ
ｿｽｿｽｿｽﾈ擾ｿｽYｿｽｿｽﾅゑｿｽｿｽｿｽｿｽﾄ鯉ｿｽｿｽﾅゑｿｽｿｽｿｽｿｽﾌで、ｿｽ{ｿｽｿｽｿｽﾉゑｿｽｿｽ黷ｵｿｽｿｽｿｽﾅゑｿｽｿｽB

>deldelｿｽl
ｿｽｿｽｿｽﾌサｿｽｿｽｿｽvｿｽｿｽｿｽｿｽｿｽﾌは難ｿｽｿｽ閧ｵｿｽﾄゑｿｽｿｽｿｽｿｽﾌでゑｿｽｿｽｿｽｿｽAｿｽｿｽｿｽﾉパｿｽlｿｽｿｽｿｽｿｽuｿｽｿｽｿｽAｿｽﾈゑｿｽ
ｿｽﾌ対案までは思ｿｽｿｽｿｽﾂゑｿｽｿｽﾈゑｿｽｿｽｿｽｿｽｿｽｿｽﾌで、ｿｽｿｽｿｽﾇ鯉ｿｽｿｽｿｽｿｽｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽｿｽｿｽBｿｽﾅゑｿｽAｿｽｿｽ
ｿｽｿｽｿｽｿｽﾄみゑｿｽｿｽｿｽAｿｽｿｽｿｽﾌ要ｿｽｿｽｿｽ満ゑｿｽｿｽｿｽｿｽｿｽｿｽhｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾅゑｿｽｿｽｿｽｿｽｿｽｿｽﾈ包ｿｽｿｽ@ｿｽﾅゑｿｽｿｽﾋ。
ｿｽｿｽｿｽｿｽAｿｽｿｽｿｽﾌ難ｿｽｿｽlｿｽﾌ擾ｿｽﾊで搾ｿｽｿｽｿｽｿｽｿｽｿｽﾆゑｿｽｿｽﾈど、ｿｽｿｽｿｽﾌアｿｽCｿｽfｿｽAｿｽ流用ｿｽｿｽｿｽｿｽｿｽｿｽ
ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾆ思ｿｽｿｽｿｽﾜゑｿｽｿｽB

>Mr.XRAYｿｽl
ｿｽｿｽｿｽﾈゑｿｽｿｽﾌサｿｽｿｽｿｽvｿｽｿｽｿｽﾍゑｿｽｿｽﾂゑｿｽQｿｽlｿｽﾉゑｿｽｿｽｿｽｿｽﾄゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾄゑｿｽｿｽｿｽﾜゑｿｽｿｽBｿｽｿｽｿｽｿｽｿｽ
ｿｽｿｽｿｽﾉ托ｿｽｿｽｿｽｿｽﾌ擾ｿｽｿｽｿｽｿｽｿｽ示ゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽﾄ、ｿｽ{ｿｽｿｽｿｽﾉゑｿｽｿｽ閧ｪｿｽﾆゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽB
ｿｽｿｽｿｽﾌ擾ｿｽｿｽｿｽｿｽﾘりしｿｽﾄ、ｿｽｿｽｿｽｿｽｿｽｿｽﾌ奇ｿｽｿｽﾓゑｿｽｿｽｿｽﾟてゑｿｽｿｽｿｽｿｽ¥ｿｽｿｽｿｽ繧ｰｿｽﾜゑｿｽｿｽB

Created by board of various Programming Library.