[Support]

TsComboBoxEx is inherited from standard control.

What version of Delphi do you uses? Do you uses TNTUNICODE key?

[souch]

'Support' wrote:

TsComboBoxEx is inherited from standard control.

What version of Delphi do you uses? Do you uses TNTUNICODE key?

Delphi 7 with the TNTUNICODE key set of course.

No problem with the other components, for exemple under TsCombobox the item list is in TntStrings.

---

By the way, could you proceed the following fix in sCombobox.pas for the futur release ?

The IndexOf is not existing in WideString, so i made this simple fix.

sCombobox.pas line 55

(…)

function IndexOf(const s : string) : integer; overload;

function IndexOf(const s: WideString): integer; overload; // NEW

(…)

sCombobox.pas line 275

(…)

function TsCustomComboBox.IndexOf(const s: WideString): integer; // JEAN

var

i : integer;

begin

Result := -1;

for i := 0 to Items.Count – 1 do if Items = s then begin

Result := i;

Exit;

end;

end;

thanks 🙂

[Support]

Yes, this control is not unicode in the Delphi 7.

Thank you for code. Maybe will be better just change “string” to “acString” in the original declaration?

acString is WideString when TNTUNICODE is enabled.

[souch]

'Support' wrote:

Yes, this control is not unicode in the Delphi 7.

Thank you for code. Maybe will be better just change “string” to “acString” in the original declaration?

acString is WideString when TNTUNICODE is enabled.

Ok thanks, i didn't notice the acString ^_^”

[Author]

Posts