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

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

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

как скопировать выделенную строчку из DBgrid в листбокс!!! help!!

Voit © (2006-08-18 14:34:00)
Собственно задача стоит следующая-есть dbgrid в которую засасывается некая таблица (точнее всего одно поле из этой таблицы с названием организаций ),нужно что бы пользователь из тсписка организаций ,который высвечивается в DBgrid е набрал список тех,которые ему нужны( на форму бросил сам dbgrid и listbox, где собственно и планирую создавать список).Нужно что бы по двойному щелчку на строчку в DBgrid запись перемещалась в лисбокс.

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

Voit (2006-08-18 15:55:00) [1]
ПАСИБ!!!!!!!!!!!!!!
супер=))))

unknown (2006-08-18 15:50:00) [2]

> Voit © (18.08.06 15:40) [10]

Если ListBox.Items.IndexOf('тут_строка')>=0 тогда в Listbox уже введено это значение.

Voit (2006-08-18 15:40:00) [3]
=) а как сделать что бы 2 раза одно и доже выбрать незя было=))) громко не ругаться ,говорю же еновенький=)

clickmaker (2006-08-18 15:35:00) [4]

> МУЖИКИ,СПАСИБААААААААААА!!!!!!!!

иде пиво?

Voit (2006-08-18 15:32:00) [5]
МУЖИКИ,СПАСИБААААААААААА!!!!!!!! ступил,заработалоооооооооооо!!!!!!!!!1 всем ОГРОМНОЕ СПАСИБО!!!! ВЫРУЧИЛИ!!!

PSPF2003 (2006-08-18 15:29:00) [6]

> Voit ©

Мряк...
Ето точно буратино...

Voit (2006-08-18 15:27:00) [7]
А вот и нет...так я уже пробовал а делфя мне выдает ошибку-
[Error] org_u.pas(73): Undeclared identifier: 'fielbyname'
и что это могло бы значить???

Loginov Dmitry (2006-08-18 15:23:00) [8]
procedure TForm1.DBGrid1DblClick(Sender: TObject);
begin
ListBox1.Items.Add(DBGrid1.DataSource.DataSet.FieldByName('имя поля').AsString);
end;

DiamondShark (2006-08-18 15:22:00) [9]

> сорри за тупой вопрос,но пока я еще как буратинно=)

"А вот и врёте!" (ц) Буратино.
Правильно так: "сорри, но лень читать код, букав много"

Voit (2006-08-18 15:14:00) [10]
Супер!!!" заработало!!!! пасиба!!! но...есть один маааленький вопрос....в дбгриде я оставил отображаться только один столбец-название оргшанизации,а в листбокс копируется вся строка из набора данных.а мона сделать так что бы копировалось в лист бокс только название....сорри за тупой вопрос,но пока я еще как буратинно=)

Voit (2006-08-18 14:58:00) [11]
Конечно не содержит!! очепятка=))
В дбгриде у меня только один столбецнет,
нужно что бы по двойному щелчку в листбокс занасилась одна запись,именно та которая сейчас выделенна.

работаю с оракл через Адо

unknown (2006-08-18 14:48:00) [12]
Всю запись? Пжалста :)
procedure TForm1.DBGrid1DblClick(Sender: TObject); var i:integer; s:string; begin {DBGrid не содержит данных. Он их только отображает. Данные содержатся в DataSet} with DBGrid1.DataSource.DataSet do begin for i:=0 to Pred(Fields.Count) do // Хотим значения всех полей, да? {Чтобы вытащить значения поля - у него есть соответствующие методы. В данном случае AsString. Можно и AsInteger, AsDateTime и т.п. As...} s:=s+Fields[i].AsString+' '; {Добавляем в листбокс. Можно еще и проверять на дубли, но это другая история :) } ListBox1.Items.Add(s); end; end;

Наверх

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