/
n-dimens
/
pascalabcnet
Обзор
Документация
Войти
/
n-dimens
/
pascalabcnet
Код
Запросы
0
Задачи
Вики
Пакеты
0
Релизы
0
Аналитика
Безопасность
master
InstallerSamples/NETLibraries/System.Windows.Forms/WinFormWithButton.pas
29 строк
621 B
Artem Pelenitsyn
change encoding for all *.pas and *.cs files: cp1251 -> utf-8
28 дек 2015, 14:25
28 дек 2015, 14:25
49378a6
Код
Авторство
О чём код?
// Создание оконного приложения {$apptype windows} {$reference 'System.Windows.Forms.dll'} uses System, System.Windows.Forms; var myForm: Form; myButton: Button; procedure MyButtonClick(sender: Object; e: EventArgs); begin myForm.Close; end; begin myForm := new Form; myForm.Text := 'Оконное приложение'; myButton := new Button; myButton.Text := ' Закрыть окно '; myButton.AutoSize := True; myButton.Left := 90; myButton.Top := 110; myForm.Controls.Add(myButton); myButton.Click += MyButtonClick; Application.Run(myForm); end.