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

← →
Voit © (2006-08-18 14:34) [0]

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

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

← →
unknown © (2006-08-18 14:48) [1]

Всю запись? Пжалста :)
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;

← →
Voit © (2006-08-18 14:58) [2]

Конечно не содержит!! очепятка=))
В дбгриде у меня только один столбецнет,
нужно что бы по двойному щелчку в листбокс занасилась одна запись,именно та которая сейчас выделенна.

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

← →
Voit © (2006-08-18 15:14) [3]

Супер!!!" заработало!!!! пасиба!!! но...есть один маааленький вопрос....в дбгриде я оставил отображаться только один столбец-название оргшанизации,а в листбокс копируется вся строка из набора данных.а мона сделать так что бы копировалось в лист бокс только название....сорри за тупой вопрос,но пока я еще как буратинно=)

← →
DiamondShark © (2006-08-18 15:22) [4]

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

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

← →
Loginov Dmitry © (2006-08-18 15:23) [5]

procedure TForm1.DBGrid1DblClick(Sender: TObject);
begin
ListBox1.Items.Add(DBGrid1.DataSource.DataSet.FieldByName("имя поля").AsString);
end;

← →
Voit © (2006-08-18 15:27) [6]

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

← →
PSPF2003 © (2006-08-18 15:29) [7]

> Voit ©

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

← →
Voit © (2006-08-18 15:32) [8]

МУЖИКИ,СПАСИБААААААААААА!!!!!!!! ступил,заработалоооооооооооо!!!!!!!!!1 всем ОГРОМНОЕ СПАСИБО!!!! ВЫРУЧИЛИ!!!

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

иде пиво?

=) а как сделать что бы 2 раза одно и доже выбрать незя было=))) громко не ругаться ,говорю же еновенький=)

ПАСИБ!!!!!!!!!!!!!!
супер=))))

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