Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате
Форум программистов > Delphi: Для новичков > Как внести значение поля TDBText в TEdit


Автор: vslabchenko 27.7.2007, 19:25
здравствуйте!

Автор: ALeXandrK 27.7.2007, 19:31
А TDBEdit не подойдет?
Если нет, то можно просто в нужный момент присваивать 
Код

Edit.Text := DBText.Caption

Автор: vslabchenko 27.7.2007, 19:35
Здравствуйте!
Обращаюсь к Вам за помощью.
Ситуация: в поле TDBText вносится запись из БД.
Как внести эту же запись одновременно в поле
компанента TEdit?
При похождении по записям таблицы значения
записи показывались бы в обоих компанентах.
(скриншот см.)
  Заранее всем благодарен.Спасибо 

Автор: ALeXandrK 27.7.2007, 19:36
Используй TDBEdit smile 

Автор: vslabchenko 27.7.2007, 19:44
Дело вот в чем.
Необходимо открыть файл,указанный в DBEdit в сторонней
программе, в моем случае это IE.
Подскажите,пожалуйста,может есть способ попроще,чем
тот,что пытаюсь сделать я: перенести значение из
DBText в DEdit, а потом открыть в IE?
                                                             Спасибо

Автор: ALeXandrK 27.7.2007, 20:18
Ну если ты на тему сторонних программ, то тебе лучше к WinApiшникам обращаться.
И почему тебе так необходимо для этого перенести данные в Edit?
Вообщем задача понятна, но очень размыта smile 

Автор: vslabchenko 27.7.2007, 20:45
Понимаете,как открыть в дальнейшем стороннюю программу я знаю,
а вот есть в цепочке пробел - как перенести значение из DBText в 
DEdit?
Вот посмотрите на скриншот. При перемещении с помощью DBNavigator
значения в DBText меняются, а в Dedit - нет...
Вот досада,застрял на этой прблеме и сижу....
Помогите,пожалуйста,чем можете. Может идея есть какая,

                                                     спасибо

Автор: ALeXandrK 27.7.2007, 21:38
Так я не понимаю... идеально для этой ситуации будет поставить вместо TEdit TDBEdit.
Его значения меняются так же, как и TDBText, при перемещении по базе.

Если уж так приперло, то можно в твоем компоненте TADOQuery, TTable или что там у тебя,
поставить на событие AfterScroll обновление значения твоего TEdit.

Автор: vslabchenko 28.7.2007, 10:48
Спасибо,а можно пример?

Автор: ALeXandrK 28.7.2007, 11:07
Пример чего? 
Если пример на AutoScroll, то скажи сначала что ты используешь для связи с базой дынных.

Вообще, попробуй сам найти. Потыкай по компонентам. У всех у них есть события или Events, на английский манер.
Все события, как и свойства компонента, можно увидеть в окне Object Inspector.
В этом Object Inspector есть две вкладки Proporties и Events.

Выбираешь вкладку Events твоего компонента и ищешь там нужное тебе событие. В данный момент нужно найти
событие AutoScroll. Нажмешь на него дважды мышкой и поподешь в  тело процедуры, которая обрабатывает данное событие.
Напишешь там что-то вроде 
Код

Edit.Text := Table.FieldByName('Имя поля').AsString;


И теперь, после каждого твоего перемещения по базе (Вперед, Назад, Первый, Последний), будет выполняться твой
оброботчик события AutoScroll.

Powered by Invision Power Board (http://www.invisionboard.com)
© Invision Power Services (http://www.invisionpower.com)