из DBGrid в ListBox

← →
kulkse (2006-11-30 14:02) [0]

Всем здрасти!!!
Люди помогите))) Пытаюсь перенести выделенные записи из DBGrid в StringGrid....
пишу вот такой код:
if DBGrid1.SelectedRows.Count>0 then with DBGrid1.DataSource.DataSet do for i:=0 to DBGrid1.SelectedRows.Count-1 do begin GotoBookmark(pointer(DBGrid1.SelectedRows.Items[i]));<----здесь ошибка s:=Fields[1].AsString; Listbox1.Items.Add(s); s:=""

В Delphi WIN32 все работает замечательно...пишу тот же код в Delphi NET (VCL Form)...и он при компиляции выдает ошибку на строчке
GotoBookmark(pointer(DBGrid1.SelectedRows.Items[i]));
пишет Invalid typecast и всё..(((
как это обойти? исправить...поможите)))

← →
Sergey13 © (2006-11-30 14:08) [1]

> Пытаюсь перенести выделенные записи из DBGrid в StringGrid....

Зачем?

← →
kulkse (2006-11-30 14:11) [2]

пардон...в ListBox...

Sergey13, )))надо...я потом с записями, которые пользователь выберет буду кое-что ;-) делать...

← →
kulkse (2006-11-30 14:12) [3]

это нужно, так сказать, для справки пользователю...

← →
Desdechado © (2006-11-30 15:39) [4]

зачем явно Pointer(...

← →
kulkse (2006-11-30 16:11) [5]

а как иначе?
если я пишу
GotoBookmark(DBGrid1.SelectedRows.Items[i]);

он ругается: Incompatible types: "IntPtr" and "string"

← →
kulkse (2006-12-01 09:22) [6]

(((неужели никто не знает??

попробуй через IntPtr.op_Explicit()

← →
kulkse (2006-12-01 10:26) [8]

((((не получается..

← →
kulkse (2006-12-01 11:09) [9]

)))нашла!!!!
надо за место

GotoBookmark(pointer(DBGrid1.SelectedRows.Items[i]));

написать вот это:
Bookmark:=DBGrid1.SelectedRows.Items[i];

и тогда все получится ;-)

из DBGrid в ListBox Найти похожие ветки