Un método artesanal para añadir los txt al combo:
Código Delphi
[-]
var
ComboBoxInfo: TComboBoxInfo;
begin
ComboBoxInfo.cbSize := SizeOf(ComboBoxInfo);
GetComboBoxInfo(ComboBox1.Handle, ComboBoxInfo);
SendMessage(
ComboBoxInfo.hwndList,
LB_DIR,
DDL_ARCHIVE,
Integer(PChar('c:\ruta\a\la\carpeta\*.txt')));
end;
// Saludos