5 replies to this topic

[DiGi]

Hi,

in some of your last updates you changed:

NxEdit.pas, line 2544 from:

CODE

Result := Copy(Items[Index], Length(Items.Names[Index]) + 2, MaxInt) else

to

CODE

Result := Copy(Items[Index], Length(Items.Names[Index]) + 1, MaxInt) else

It is big trouble, because function result is now with separator.

[Boki (Berg)]

Hello Digi,

Turn it back to + 2 then. One user have reported that one character is eaten.

I am sorry for any trouble.

Best regards

[miab]

function TNxComboBox.GetValueFromIndex(const Index: Integer): string;
begin
if Index >= 0
then
if (DisplayMode = dmDefault)
then
Result := Copy(Items[Index], Length(Items.Names[Index]) + 1, MaxInt)
else
Result := Copy(Items[Index], Length(Items.Names[Index]) + 2, MaxInt)
else
Result := '';
end;

[Boki (Berg)]

Hello Miab,

I am not sure about your code. Can you please formate it with begin/end I am not sure where new statements begins.

Best regards

[miab]

CODE

function TNxComboBox.GetValueFromIndex(const Index: Integer): string;
begin
if Index >= 0 then
if (DisplayMode = dmDefault) then
Result := Copy(Items[Index], Length(Items.Names[Index]) + 1, MaxInt)
else
Result := Copy(Items[Index], Length(Items.Names[Index]) + 2, MaxInt)
else
Result := '';
end;

[Boki (Berg)]

Hello Miab,

I will check it and add it if needed.

regards