mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-08-21 12:59:14 +02:00
MG: fixed TComboBox.ItemIndex on CreateWnd
git-svn-id: trunk@895 -
This commit is contained in:
parent
82e53e439f
commit
ec7ede3f47
@ -2254,7 +2254,8 @@ begin
|
|||||||
|
|
||||||
csComboBox :
|
csComboBox :
|
||||||
begin
|
begin
|
||||||
//writeln('SetLabel: ',PLabel);
|
//writeln('SetLabel: ',TComboBox(Sender).Name,':',TComboBox(Sender).ClassName,
|
||||||
|
// ' ',HexStr(Cardinal(TComboBox(Sender).Handle),8),' "',PLabel,'"');
|
||||||
SetComboBoxText(PGtkCombo(TComboBox(Sender).Handle), PLabel);
|
SetComboBoxText(PGtkCombo(TComboBox(Sender).Handle), PLabel);
|
||||||
end;
|
end;
|
||||||
|
|
||||||
@ -5907,6 +5908,9 @@ end;
|
|||||||
{ =============================================================================
|
{ =============================================================================
|
||||||
|
|
||||||
$Log$
|
$Log$
|
||||||
|
Revision 1.232 2002/10/05 10:37:21 lazarus
|
||||||
|
MG: fixed TComboBox.ItemIndex on CreateWnd
|
||||||
|
|
||||||
Revision 1.231 2002/10/04 20:46:52 lazarus
|
Revision 1.231 2002/10/04 20:46:52 lazarus
|
||||||
MG: improved TComboBox.SetItemIndex
|
MG: improved TComboBox.SetItemIndex
|
||||||
|
|
||||||
|
Loading…
Reference in New Issue
Block a user