вопрос с oleobject delphi
Пользователи, просматривающие топик: none
|
Зашли как: Guest
|
Имя |
Сообщение |
<< Старые топики Новые топики >> |
|
|
вопрос с oleobject delphi - 2008-04-28 08:58:07.723333
|
|
|
DEMONirk
Сообщений: 46
Оценки: 0
Присоединился: 2008-02-28 16:24:11.623333
|
Создаю объект oleobject, записываю в него информацию но не могу её считать. ошибка "член группы не найден". myobject.item(i).name посмотрите в чем проблема
|
|
|
RE: вопрос с oleobject delphi - 2008-04-28 13:43:10.926666
|
|
|
dos 999
Сообщений: 331
Оценки: 0
Присоединился: 2007-12-17 10:49:07.556666
|
В оле объектах часто бывают глюки… попробуй сначало какой нить переменной присвоить myobject.item(i) а потом обратиться к имени этой переменной, иногда помогает А и ещё… ты уверен что элемент i есть?
|
|
|
RE: вопрос с oleobject delphi - 2008-04-29 08:12:32.230000
|
|
|
DEMONirk
Сообщений: 46
Оценки: 0
Присоединился: 2008-02-28 16:24:11.623333
|
Вот исходники этой прогаммы на vb: myhead = createobject('eapi.head') myhead.open set myresultset = myhead.getresultset set myresultset = myhead.getcriterion('vocabulary') myresultset.source = 'regions' myresultset.fill for i = 1 to myresultset.itemcnt a(i) = myresultset.item(0).name next i как это перенести в delphi в vb всё работает а вот в delphi какойто косяк
|
|
|
RE: вопрос с oleobject delphi - 2008-04-29 15:06:37.370000
|
|
|
dos 999
Сообщений: 331
Оценки: 0
Присоединился: 2007-12-17 10:49:07.556666
|
var
b: OleVariant;
begin
myhead = createobject('eapi.head') ;
myhead.open ;
set myresultset = myhead.getresultset ;
set myresultset = myhead.getcriterion('vocabulary') ;
myresultset.source = 'regions' ;
myresultset.fill;
for i = 0 to myresultset.itemcnt -1 do
begin
b := myresultset.item(i);
a(i) = b.name;
end;
чё то типа токого, а в какой строке ошибка?
|
|
|
RE: вопрос с oleobject delphi - 2008-05-07 06:20:23.786666
|
|
|
DEMONirk
Сообщений: 46
Оценки: 0
Присоединился: 2008-02-28 16:24:11.623333
|
К сожалению не работает, ошибка здесь b := myresultset.item(i);
|
|
|
RE: вопрос с oleobject delphi - 2008-05-12 05:48:16.906666
|
|
|
DEMONirk
Сообщений: 46
Оценки: 0
Присоединился: 2008-02-28 16:24:11.623333
|
Всё просто, вместо круглых скобок надо ставить квадратные b := myresultset.item;
|
|
|
|
|