[~TB~]

...выбросить из списка ComboBox ( . и ..), которые при поиске записываются в Items ComboBox'a?

Примерно так. Ну а по дате, нужно копить еще и дату, в отдельный массив. А комбосписок отсортировать уже после заполнения, по массиву с датами.

Код:

var
  SR: TSearchRec;
  FindRes: Integer;
begin
  ComboBox1.Clear;
  FindRes := FindFirst('C:\1\*.*', faAnyFile, SR);
  while FindRes = 0 do
  begin
if (SR.Name <> '.') and (SR.Name <> '..') then
    ComboBox1.Items.Add(SR.Name);
    FindRes := FindNext(SR);
  end;
  FindClose(SR);
end;

Далее хочу при выборе файла из списка загружать его в StringGrid, если ручками прописать конкретный файл, то код работает. Не получается реализовать с изменяющимся файлом S.

Может нужно было сделать как-то так?

Код:

S:=ComboBox1.Items[ComboBox1.ItemIndex]

Ну или проблема в том, что путь неполон и его нужно дособрать.