GetDefaultPrinter
Revision as of 08:09, 20 July 2019 by Admin (talk | contribs) (Created page with "{{infobox function |name=GetDefaultPrinter |object=Функции общего назначения |caption=Функции среды |type=1 |status=2 |db=0 |visual=0}}...")
GetDefaultPrinter (Функции среды) | |||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|
|
Функция получает наименование принтера, заданного в системе по умолчанию, либо пустую строку, если такого принтера не существует.
Синтаксис
GetDefaultPrinter():<Имя принтера по умолчанию (STRING)>
Возвращаемое значение
Функция возвращает строковое значение.
Примеры
//ОснПринтер -- визуальное поле со списком для выбора принтера ОснПринтер:=Form.ОснПринтер.Value; ОснПринтер.Clear(); ОснПринтер.Add("Не выбран"); ПринтерПоУмолчанию:=Trim(GetDefaultPrinter()); //По умолчанию выбирать первый элемент ("не выбран") Тек:=1; aList:=GetInstalledPrinters(); For i:=1 To aList.Size() Do ОснПринтер.Add(aList.Get(i)); If Trim(aList.Get(i))=ПринтерПоУмолчанию Then Тек:=ОснПринтер.Size(); EndIf; EndDo; ОснПринтер.SelectedLine:=Тек;