Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Передача edita в собственную процеду.

FIL-23 © (2010-11-25 15:46:00)
Народ какнибудь можно передать edit, а то через переменные не хочу заморачиваться. А конкретно что я хочу сделать , мне надо найти в editзапятую и заменить ее на точку. хочу это реализовать в процедуру с именим search_point. И чтобы это выглядило в виде search_point(edit1.text)

DVM (2010-11-25 18:09:00) [1]

> FIL-23

или сделай не процедуру, а функцию edit1.text := search_point(edit1.text)

DVM (2010-11-25 18:06:00) [2]

> FIL-23

Ну и передавай в процедуру указатель на экземпляр TEdit, кто мешает то?

И. Павел (2010-11-25 17:59:00) [3]

> FIL-23 (25.11.10 15:46)

Возможно и ошибаюсь, но если нужно заменить та точку не запятую а разделитель целой и дробной части, то он находится в переменной DecimalSeparator и может меняться в соответствии с региональными настройками и не всегда быть запятой. Пишу, потому что доставалась в наследство программа, где автор на это чихать хотел...

FIL-23 (2010-11-25 16:45:00) [4]
Удалено модератором

clickmaker (2010-11-25 16:42:00) [5]
> найти в edit запятую и заменить ее на точку. хочу это реализовать
> в процедуру с именим search_point

название неверно выбрано. А то ведь "как вы лодку назовете...".
Надо search_comma_and_replace_with_point

Плохиш (2010-11-25 16:22:00) [6]
Основы используемого языка программирования читать не пробовал?

12 (2010-11-25 16:21:00) [7]
edt1.text := StringReplace(edt1.text,'.',',',[rfReplaceAll])

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »