Текущий архив: 2006.12.17;
Скачать: CL | DM;

Вниз

из 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]

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

---

← →
clickmaker ©   (2006-12-01 09:50) [7]

попробуй через 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];

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

---

Страницы: 1 вся ветка

Текущий архив: 2006.12.17;
Скачать: CL | DM;

Наверх

Память: 0.45 MB
Время: 0.063 c