Комментарии: Изменяем внешний вид System.Windows.Forms.Form

Автор: vladimir

vladimir — Mon, 01 Feb 2021 07:53:53 +0000

спасибо!

Автор: Ts.Saltan

Ts.Saltan — Sun, 07 Oct 2018 09:54:41 +0000

Спасибо огромное, с вашей помощью удалось быстро набросать GUI к своим скриптам.

Автор: Anton

Anton — Sun, 06 Nov 2016 03:12:33 +0000

Рад, что это кому то надо. 🙂

Автор: Николай

Николай — Sat, 05 Nov 2016 18:31:03 +0000

Огромное спасибо! Очень помогло при работе с формами в PascalABC.Net.

Автор: Anton

Anton — Tue, 18 Oct 2016 07:49:47 +0000

В ответ на Pavel. Обращайтесь ещё. :)

Автор: Pavel

Pavel — Tue, 18 Oct 2016 07:45:23 +0000

О! Спасибо огромное! 😉 Когда сравнил с тем, что у меня, тогда дошло в чём подковырка. У меня на всех кнопках .DialogResult стоит. А без него действительно форма не закрывается.

Автор: Anton

Anton — Tue, 18 Oct 2016 04:43:59 +0000

Вот получился не большой скриптик…

Add-Type -assembly System.Windows.Forms
 
$main_form = New-Object System.Windows.Forms.Form
$main_form.Text ='Main'
$main_form.Width = 100
$main_form.Height = 100
$main_form.AutoSize = $true


$TextBox = New-Object System.Windows.Forms.TextBox
$TextBox.Location  = New-Object System.Drawing.Point(0,70)
$TextBox.Text = '2+2'
$main_form.Controls.Add($TextBox)

$button = New-Object System.Windows.Forms.Button
$button.Text = 'button'
$button.Location = New-Object System.Drawing.Point(160,10)
$button.add_Click({Click_Button});
$main_form.Controls.Add($button)

function Click_Button
{ 
   Write-Host $TextBox.Text   
}

$main_form.ShowDialog()

Add-Type -assembly System.Windows.Forms

$main_form = New-Object System.Windows.Forms.Form

$main_form.Text ='Main'

$main_form.Width = 100

$main_form.Height = 100

$main_form.AutoSize = $true

$TextBox = New-Object System.Windows.Forms.TextBox

$TextBox.Location = New-Object System.Drawing.Point(0,70)

$TextBox.Text = '2+2'

$main_form.Controls.Add($TextBox)

$button = New-Object System.Windows.Forms.Button

$button.Text = 'button'

$button.Location = New-Object System.Drawing.Point(160,10)

$button.add_Click({Click_Button});

$main_form.Controls.Add($button)

function Click_Button

{

Write-Host $TextBox.Text

}

$main_form.ShowDialog()

Текстовое поле и кнопка.
нажимаем на кнопку в консоль пишеться то, что в текстовом поле.
форма не закрывается. изменяем значение в тектовом поле. Нажимаем кнопку.. опять выводиться. форма не закрывается…

Автор: Pavel

Pavel — Mon, 17 Oct 2016 16:03:54 +0000

Спасибо большое. Возможно я просто не так его «готовлю». 🙂

Автор: Anton

Anton — Mon, 17 Oct 2016 16:01:33 +0000

Немного удивила проблема. А разве всё работает не так, как вы описали? 🙂
Как добирусь до винды с powershell попытаюсь состряпать какойнить пример… предположительно это будет завтра.

Автор: Pavel

Pavel — Mon, 17 Oct 2016 15:24:58 +0000

Действительно подробно, практически на пальцах. Сохранил в избранном.;)
Но можно задать вопрос? 😉 Во всех «мануалах» рассказывается как сделать окно, как сделать кнопки, поля и т.д. Но я нигде не нашёл информации (тем более в доходчивой, простой форме как у Вас) — как сделать так, что бы окно не закрывалось при нажатии кнопок. Что бы окно было полноценным, т.с.
Например — есть поле ввода ФИО сотрудника, рядом кнопка «Выбор» или «Поиск» — ввел в поле часть фамилии, нажал на кнопку, запустилась часть скрипта которая делает выборку пользователей, открывается окно ISE со списком найденных пользователей, выбрал необходимого пользователя, нажал Ок, окно ISE закрылось, и в поле ввода уже появилось полное ФИО сотрудника, плюс в этом же окне сразу отобразилась необходимая информация (домен, срок действия пароля и т.д…. не суть), потом, если надо можно было бы воспользоваться еще какими нибудь кнопками, а вот когда нажмешь кнопку «Ок» или «Запустить», тогда уже запустится основная часть скрипта, сделает своё дело, и в этом же окне напишет результат. После этого можно либо закрыть окно кнопкой «Закрыть», «Отмена», кнопкой закрытия окна, либо воспользоваться скриптом (этим окном) еще раз.
Всё, что я не пробовал — ведёт к одному — как только нажму любую кнопку — окно закрывается. 🙁