Subject | IB_Combox and IB_Grid again |
---|---|
Author | kamen_lai@yahoo.com |
Post date | 2001-10-08T07:41:54Z |
In IBC_ComboBox.IMP , line 421,
Sometimes the aVal parameter pass items value or itemvalues, cause
the display text in grid empty, so i correct the source code for
proper display text .
function TIB_CustomComboBox.IBG_TranslateText(AVal: string): string;
begin
// Result := Items.Strings[ ItemValues.IndexOf( AVal ) ];
Result := aVal;
if Items.IndexOf( aVal ) = -1 then
Result := Items.Strings[ ItemValues.IndexOf( AVal ) ];
end;
Is this correct?
Sometimes the aVal parameter pass items value or itemvalues, cause
the display text in grid empty, so i correct the source code for
proper display text .
function TIB_CustomComboBox.IBG_TranslateText(AVal: string): string;
begin
// Result := Items.Strings[ ItemValues.IndexOf( AVal ) ];
Result := aVal;
if Items.IndexOf( aVal ) = -1 then
Result := Items.Strings[ ItemValues.IndexOf( AVal ) ];
end;
Is this correct?