Любой язык - [решено] Вывод изображения на весь экран в заданное время

greg zakharov · Отправлено: **09:10, 21-06-2015** | #2

А PowerShell в сетке есть? Если да - создаете окно без рамок и обработчиком событий OnClick, а на само окно натягиваете нужную картинку; ели нет - можно воспользоваться каким-нибудь скринсейвером (вроде того же BlueScreen) который вызывается по расписанию.

Nic0p0L · Конфигурация компьютера

скринсейвер не вариант, т.к. его устанавливать нужно, а потом еще и отключить\удалить, а акция разовая.
про powershell можно подробнее - как именно это сделать? я с ним просто еще не знаком, все руки не доходят сесть поизучать =(

NickM · Конфигурация компьютера

Цитата Nic0p0L:

скринсейвер не вариант, т.к. его устанавливать нужно, а потом еще и отключить\удалить, а акция разовая »

BlueScreen Screen Saver, устанавливать ничего и не нужно. Можно через планировщик запустить, а можно с помощью того же PsExec из состава PsTools утилит.

Nic0p0L · Конфигурация компьютера

Цитата NickM:

BlueScreen Screen Saver, устанавливать ничего и не нужно. Можно через планировщик запустить, а можно с помощью того же PsExec из состава PsTools утилит. »

Так мне нужно свое изображение поставить. BSOD я как пример привел - что бы на весь экран, без рамок, пуска и панели задач.
А BlueScreen Screen Saver, никаких настрое нет, кроме включения имитации работы харда.

Nic0p0L · Конфигурация компьютера

Вот нашел на просторах сети скрипт. Вроде то что нужно, только есть пара моментов
1 он закрывается автоматически, через 5 сек. Как изменить закрытие по нажатию любой кнопки?
2 открывается в фиксированном разрешении. Возможно сделать так, что бы автоматически подгонял под разрешение экрана?
3 если мое изображение меньше чем разрешение экрана, то вокруг него белое поле. Возможно растягивать изображение? Или изменить цвет поля?

Код:

<html>
	<hta:application id="oHTA"
		border="none"
		caption="no"
		contextmenu="no"
		innerborder="no"
		scroll="no"
		showintaskbar="no"
	/>
	<script language="VBScript">
		Sub Window_OnLoad
			' Resize and position the window
			width = 1280 : height = 800
			window.resizeTo width, height
			window.moveTo screen.availWidth\2 - width\2, screen.availHeight\2 - height\2

			' Automatically close the windows after 5 seconds
			idTimer = window.setTimeout("vbscript:window.close", 5000)
		End Sub
	</script>
<body>
	<table border=0 width="100%" height="100%">
		<tr>
			<td align="center" valign="middle">
				<img src="c:\111.jpg"/>
			</td>
		</tr>
	</table>
</body>
</html>

Iska · Отправлено: **00:22, 30-06-2015** | #7

Цитата Nic0p0L:

1 он закрывается автоматически, через 5 сек. »

Цитата:

Код:

' Automatically close the windows after 5 seconds
idTimer = window.setTimeout("vbscript:window.close", 5000)

Цитата Nic0p0L:

Как изменить закрытие по нажатию любой кнопки?
2 открывается в фиксированном разрешении. Возможно сделать так, что бы автоматически подгонял под разрешение экрана?
3 если мое изображение меньше чем разрешение экрана, то вокруг него белое поле. Возможно растягивать изображение? Или изменить цвет поля?
»

Например, так:

Скрытый текст

Код:

<html id="Info">
    <head>
        <meta charset="windows-1251">
        <meta http-equiv="Content-Type" content="text/html; charset=windows-1251">
        <meta http-equiv="Content-Language" content="ru">
        <title>Info title</title>
        <hta:Application
            Icon="MyIconFile.ico"
            Id="Info"
            ApplicationName="Info"
            Border="dialog"
            BorderStyle="static"
            Caption="yes"
            ContextMenu="no"
            InnerBorder="yes"
            MaximizeButton="no"
            MinimizeButton="yes"
            Navigable="no"
            Scroll="no"
            ScrollFlat="no"
            Selection="no"
            ShowInTaskbar="yes"
            SingleInstance="yes"
            SysMenu="yes"
            Version="1.0"
            WindowState="normal"
        />
        
        <style type="text/css">
            BODY {
                font: x-small Verdana, Arial, sans-serif;
                color: WindowText;
                background-color: ButtonFace;
                margin: 0px;
                padding: 0px;
            }
        </style>
        
        <script language="VBScript">
		</script>
	</head>
	
	<body id="tagBody" scroll="no" onkeydown="Quit()" onmousedown="Quit()">
		<table style="width: 100%; height: 100%;">
			<tr>
				<td align="center">
					<img src="C:\Windows\Web\Wallpaper\Windows\img0.jpg" width="100%" height="100%" />
				</td>
			</tr>
		</table>
	</body>
	
	<script language="VBScript">
		Option Explicit
		
		With window
			.resizeTo .screen.availWidth, .screen.availHeight
			.moveTo 0, 0
		End With
		'=====================================================================
		
		'=====================================================================
		Sub Quit()
			window.close
		End Sub
	</script>
</html>

greg zakharov · Отправлено: **18:04, 30-06-2015** | #8

Код:

Add-Type -AssemblyName System.Windows.Forms

$frmMain = New-Object Windows.Forms.Form
$frmMain.BackgroundImage = [Drawing.Image]::FromFile((cvpa 'картинка'))
$frmMain.BackgroundImageLayout = 'Stretch'
$frmMain.FormBorderStyle = 'None'
$frmMain.TopMost = $true
$frmMain.WindowState = 'Maximized'
$frmMain.Add_Load({
  Start-Sleep -Seconds 5
  $this.Close()
})

[void]$frmMain.ShowDialog()

Nic0p0L · Конфигурация компьютера

Цитата Iska:

Например, так: »

Вот прям совсем то что нужно! Только полностью убрал верхнюю рамку с кнопками.
Огромное человеческое СПАСИБО.
З.Ы. Не сочти за наглость - а возможно сделать так, что бы еще и панель задач пряталась? Чтоб было максимально похоже на критическую ошибку

Iska · Отправлено: **19:47, 30-06-2015** | #10

Цитата Nic0p0L:

Только полностью убрал верхнюю рамку с кнопками. »

Цитата Nic0p0L:

а возможно сделать так, что бы еще и панель задач пряталась? Чтоб было максимально похоже на критическую ошибку »

Nic0p0L, не делайте ни того, ни другого. Для уведомления пользователей ничего из перечисленного не нужно. Желаемое Вами поведение похоже на вирус-вымогатель, не вводите пользователей в ступор.