For i:=0 to DBComboBox1.Items.Count do
if DBComboBox1.Text=DBComboBox1.Items[i] then
DBComboBox1.Items.Delete(i);
Как в combobox удалить пустые строки
примерный код, но не работет.
Код:
Код:
for I := DBComboBox1.Items.Count - 1 downto 0 do
if DBComboBox1.Items[I] = '' then DBComboBox1.Items.Delete(I);
if DBComboBox1.Items[I] = '' then DBComboBox1.Items.Delete(I);