1 Topic by sibprogsistem (edited by sibprogsistem 2019-08-03 12:01:16)

  • From: Нефтеюганск
  • Registered: 2018-04-11
  • Posts: 1,775

Topic: создание и выбор items combobox

список создается, но вот при выборе из списка все исчезает

procedure frmreports_OnShow (Sender: TObject; Action,s: string);
var
reporfile:TStringList;
i,t:integer;
begin
 reporfile := TStringList.Create;
 reporfile.Text := GetFilesList('report','*.fr3',False);
   t := reporfile.Count-1;
    for i:=0  to t  do
     begin
      frmreports.cbAdressReport.items.add(reporfile[i]);
     end;
end;
Post's attachments

Attachment icon test.7z 3.23 kb, 216 downloads since 2019-08-03 

  • Registered: 2014-02-14
  • Posts: 10,294

Re: создание и выбор items combobox

Установите для ComboBox свойство Searchable = False

Dmitry.