Четверг, 28.11.2024, 06:36 | Приветствую Вас Гость

...

Код

Главная » Статьи » Autoit

Текст в кавычки

#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

Local $hGUI = GUICreate("Текст в кавычки", 400, 400)
GUICtrlCreateLabel("Исходный текст", 10,10,200,25)
Local $idText1= GUICtrlCreateEdit("", 10,30,200,100)
GUICtrlCreateLabel("Результирующий текст", 10,140,200,25)
Local $idText2= GUICtrlCreateEdit("", 10,160,200,100)

Local $idbutton = GUICtrlCreateButton("Заключить текст в кавычки", 100, 300, 185, 50)
GUISetState(@SW_SHOW, $hGUI)

While 1
Switch GUIGetMsg()
Case   $idbutton 
Local $text = '"' & GUICtrlRead($idText1) & '"'
GUICtrlSetData($idText2,$text)
Case $GUI_EVENT_CLOSE
ExitLoop

EndSwitch
WEnd

Категория: Autoit | Добавил: moskov (05.10.2023)
Просмотров: 66 | Рейтинг: 0.0/0
Добавлять комментарии могут только зарегистрированные пользователи.
[ Регистрация | Вход ]

Меню сайта

Категории раздела

PHP [41]
C++ [71]
Autoit [108]
Processing [105]
Basic4GL [7]
Fasm [2]
PABC [7]
Js [236]
Gentee [1]
Python [204]
Java android [3]
Small Basic [9]

Мини-чат

Статистика


Онлайн всего: 5
Гостей: 5
Пользователей: 0

Форма входа

Друзья сайта

  • ЗОВ КОСМОСА

  • Хулиган Вселенной

  • Тюремная поэзия

  • Религиозная поэзия

  • Сайт клана ЛеГиоН
  • Поиск