перейти к полному списку дипломных проектов

Ссылка на скачивания файла в формате .doc находится в конце странички

Open; try wa

iMD:= 0;

frmGetFileName.ShowModal;

if (frmGetFileName.iMD = 0) or (frmGetFileName.cbFiles.Text = '')

then exit;

dmIAS.aqExe.Close;

dmIAS.aqExe.SQL.Text:= 'Select * from qObrPubl where file = :file';

dmIAS.aqExe.Parameters.ParamByName('file').Value:= frmGetFileName.cbFiles.Text;

dmIAS.aqExe.Open;

try

wa.Connect;

wa.Visible := True;

except

MessageDlg('А у Вас Word не установлен :(', mtError, [mbOk], 0);

Abort;

end;

ItemIndex:= 1;

Template:= EmptyParam;

NewTemplate := False;

// Создание документа

wa.Documents.Add(Template, NewTemplate, EmptyParam, EmptyParam) ;

wd.ConnectTo(wa.Documents.Item(ItemIndex));

wd.PageSetup.Set_Orientation(wdOrientLandscape);

wa.Options.CheckSpellingAsYouType := False;

wa.Options.CheckGrammarAsYouType := False;

ARange:= wd.Range(EmptyParam, EmptyParam);

pars:= wd.Paragraphs;

tmpl:= ARange;

par:= pars.Add(tmpl);

wf.ConnectTo(wd.Sentences.Get_Last.Font);

wd.Range.Paragraphs.Set_Alignment(wdAlignParagraphLeft);

wa.Selection.Font.Bold:= 1;

wa.Selection.Font.Size:= 16;

st:= 'Отчет по обработанным статьям файла ' + frmGetFileName.cbFiles.Text;

wa.Selection.InsertAfter(st+13);

wa.Selection.InsertAfter(' '+13);

vcol := wdCollapseEnd;

wa.

скачать бесплатно АВТОМАТИЗИРОВАННАЯ ИНТЕЛЛЕКТУАЛЬНАЯ СИСТЕМА КЛАССИФИКАЦИИ ИНФОРМАЦИОННЫХ СООБЩЕНИЙ СРЕДСТВ МАССОВОЙ ИНФОРМАЦИИ

Содержание дипломной работы

3 Описание автоматизируемых функций и схемы функциональной структуры АИС «Классификатор» Используя методологию IDEF0 при проектировании АИС «Классификатор» была получена ее функциональная модель
Под населенным пунктом подразумевается город, село, но не район области, не район города
Если в конце текста статьи имеется ссылка на источник, из которого напечатан текст, то она заносится на первой строке перед текстом
Отчет по обработанным сообщениям СМИ содержит результаты классификации по каждому файлу и включает: дату, название статьи, ключевые слова статьи, автора, текст статьи и сопоставленные рубрики
Метод ранжирования заключается в следующем:
где
границы интервалов по тексту i-ой статьи;
границы интервалов по строке ключевых слов i-ой статьи;
границы интервалов по названию i-ой статьи
"+Trim(Str(IIf(IsNull([Индекс_4]),0,[Индекс_4])))+"
[Наименование_3]ASНаименованиерубрики,[Классификация]
Наименование_4 AS Наименование рубрики, Классификация
Код рубрики; Запрос «Обработанные сообщения 3-го уровня» необходим для вывода информации по обработанным сообщениям СМИ, отнесенным к 3-му уровню рубрикатора
Уровень рубрики)=3)); Запрос «Обработанные сообщения 4-го уровня» необходим для вывода информации по обработанным сообщениям СМИ, отнесенным к 4-му уровню рубрикатора
На этапе классификации в первую очередь выполняется поиск записей по различным ключам словаря с помощью алгоритма нечеткого поиска
К работе с ЭВМ допускаются лица, прошедшие инструктаж по технике безопасности при работе с электроустановками напряжением до 1000 В
102-77
Delphi 7
zip 26
Open; try wa
Selection
AsString; wa
lngCountLike; gret
aqDict
AsString); // Классификация по наименованию im:= IndistinctMatching(length(stWord), stWord, AnsiUpperCase(FieldByName('name_publ')
Count = 0 then begin ShowMessage('Не выбрано ни одной записи!'); exit; end; // Удалить все записи из Publ_Rubr для данной статьи dmIAS
atCountObrPublikatsii
atCountObrPublikatsii
AsString = '30
RecordCount+1, // число строк 6, // число столбцов EmptyParam, EmptyParam); tbl1
Text:= dmIAS