Форум программистов, компьютерный форум, киберфорум
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск  
 
 
Рейтинг 4.98/56: Рейтинг темы: голосов - 56, средняя оценка - 4.98
 Аватар для Треш
1 / 1 / 0
Регистрация: 18.10.2013
Сообщений: 80

Ввод текста в Edit

08.11.2013, 23:39. Показов 12145. Ответов 24
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Помогите с вводом текста в компонент Edit, с числами получилось а вот с текстом никак. Короче говоря нужно что бы когда уже в edit написан текст нажималась кнопка и текст присваивался переменной
0
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
08.11.2013, 23:39
Ответы с готовыми решениями:

Ввод текста в Edit через микрофон
Как сделать ввод текста в Edit через микрофон?

Ввод текста в edit, с дополнительными параметрами
Ребят, вот есть функция if AnsiCompareText(Edit1.text, 'date') = 0 then при вводе текста записанного в кавычках, выполняется команда. ...

Ввод текста в Edit при переходе курсора из раб. стола на форму
Есть форма, на ней Edit. Нужно, что бы при перемещении курсора на форму в эдит сразу можно было вводить текст. Не просто помещать на нее...

24
 Аватар для Игорь[Igor]
726 / 478 / 130
Регистрация: 24.12.2008
Сообщений: 3,924
09.11.2013, 15:52
Студворк — интернет-сервис помощи студентам
Да проще простым присваиванием
0
844 / 739 / 342
Регистрация: 22.09.2012
Сообщений: 5,034
09.11.2013, 16:00
Че- то больно много кода сверху вышло можно все в одну строчку:

Кидаем на форму эдит и кнопку.

Delphi
1
SendMessage(FindWindowEx(FindWindow('TForm1', nil), 0, 'TEdit', nil), WM_SETTEXT, 0, Integer(PChar('Я текст в Эдите!')));
1
0 / 0 / 1
Регистрация: 11.05.2013
Сообщений: 29
09.11.2013, 16:58
Цитата Сообщение от Треш Посмотреть сообщение
не получилось то что программа не может присвоить строку перемменной
Сначала объявляешь строковую переменную, а потом присваиваешь ей значение
0
 Аватар для Треш
1 / 1 / 0
Регистрация: 18.10.2013
Сообщений: 80
09.11.2013, 17:16  [ТС]
Цитата Сообщение от Victor031 Посмотреть сообщение
Сначала объявляешь строковую переменную, а потом присваиваешь ей значение
я конечно сейчас опять попробую но я же уговорил что когда так делаешь дельфи почему то ругается

Добавлено через 2 минуты
[Error] Unit1.pas(30): Incompatible types: 'String' and 'Integer' вот что пишет а писал код вот так
a := StrToInt(Edit1.Text);
0
844 / 739 / 342
Регистрация: 22.09.2012
Сообщений: 5,034
09.11.2013, 20:03
Вот так код пиши ошибок небудет:

Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
procedure TForm1.Button1Click(Sender: TObject);
var
  str: string;
begin
  str := Edit1.Text; //засунули в переменную что в эдите
  ShowMessage(str);  //показали
end;
 
procedure TForm1.Button2Click(Sender: TObject);
begin
  ShowMessage(Edit1.Text);  //просто показали без засовывания в переменную
end;
 
end.
1
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
09.11.2013, 20:03

Запрет на ввод чисел в EDIT, пока не будет заполнено другое поле edit
Здравствуйте! Дело в том, что мне нужно сделать так, чтобы одно поле edit нельзя было заполнять до тех пор, пока не заполнено другое поле...

Edit Label (линейный) Panel, Edit Label (строки), Memo (одномер-ный),ComboBox ListBox , RadioButton (RadioGroup) CheckBox ,StringGrid (ввод пароля)
1)Edit Label (линейный) Panel Проверить истинность высказывания: "Цифры данного трехзначного числа образуют возрастающую...

Ввод в edit
мне нужно вводить в edit только буквы if not (key in ) then key:=#0; но первая должна быть заглавная, т.е. не смотря на то, что...

Ввод чисел в edit
как сделать так, чтобы в edit можно было вводить только действительные числа? те с несколькими знаками после запятой

Ограничение на ввод в Edit
Мне надо чтоб в Edit не вводилось число больше 36 , вот так делаю procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char); ...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
25
Ответ Создать тему
Новые блоги и статьи
FPS контроллер с анимированными Y-Bot и 3D-звуком miniaudio (Box3D, Recast, BehaviorTree.CPP, ozz-animation, ImGui, OpenGL и SDL3)
8Observer8 18.10.2026
Содержание блога | English Version Полное мультиплатформенное руководство по стартовому проекту с FPS-контроллером игрока, анимированными роботами Y-Bot с 4-слойным блендингом, 3D-физикой Box3D,. . .
Локальный http сервер
Argus19 17.10.2026
Локальный http сервер На работе, на двух локальных компьютерах круглосуточно работают программы опроса приборов с записью в книги Excel,которые раз в сутки записываются на сервер компании. Т. к. . . .
Копировать Windows на новый диск на UEFI
damix 17.10.2026
https:/ / uriesk. wordpress. com/ 2016/ 11/ 01/ move-window-10-to-ssd-on-a-uefi-dualboot-system-with-basic-linux-tools/ TL DR Вставляем диск, а старый подключаем через переходник, грузимся с лайва. . .
ИИ не может найти нужный язык в списке
Supersumestria 05.10.2026
Я ему даю вот такое изображение и прошу найти и подчеркнуть немецкий язык. Возвращает он вот это: https:/ / i. **********/ vqBWLe2. png Нужную строчку в 3й колонке просто выдумал. . Это. . .
Новая последняя моя музыка в SUNO
zorxor 05.10.2026
Здравствуйте, дорогие мои друзья! С большой радостью я хотел бы представить вам свою новую последнею музыку, которую сгенерировала мне по моей просьбе нейросеть SUNO. С уважением, zorxor. Это. . .
Программный домашний кинотеатр
russiannick 27.09.2026
Сподобился на программный домашний кинотеатр. В качестве ЯВУ по традиции выбрал js. В помощники взял Яндекс-Алису. Было создано три зала на разные интересы. исторические и ретро сериал Хичкок. . .
Беседа с ИИ о программистах, недопускающих к созданию и правке кода генеративные ИИ и причины этого
zorxor 21.09.2026
Раньше я радовался или получал некоторые эмоции, пусть небольшие, но всё же, от самого процесса написания кода, рекомпиляции и запуска, видя постепенное развитие программы и прочее. А теперь лень. . .
Мобильное приложение ColorStep
pavlinmavlin 17.09.2026
Реализовал приложение Красный, Зеленый, Синий в Unity3d + c#. Название изменил на ColorStep. Приложение прошло модерацию и теперь доступно для скачивания. Делал его сам, шаг за шагом — и вот,. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru