Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2004.11.07;
Скачать: [xml.tar.bz2];

Вниз

Работа с двумерным вариантным массивом   Найти похожие ветки 

 
}|{yk ©   (2004-10-25 16:29) [0]

with self.DataSource.DataSet do
             begin
               XLSArray := VarArrayCreate([0, RecordCount], varVariant);
               First;
               while not Eof do
               begin
                 XLSArray[RecNo - 1] := VarArrayCreate([0, ColCount - 1], varVariant);
                 for IDX := 0 to ColCount - 1 do
                   XLSArray[RecNo - 1][IDX] := FieldByNumber(IDX).Value;
                 Next;
               end;
             end;

получаю ошибку Left side cannot be assigned to
А как правильно?


 
jack128 ©   (2004-10-25 16:32) [1]

XLSArray[RecNo - 1, IDX] := FieldByNumber(IDX).Value ???


 
Pentium133 ©   (2004-10-25 16:36) [2]

может так прокатит? FieldByNumber(IDX).Value.AsVariant


 
}|{yk ©   (2004-10-25 16:52) [3]

Получаю Variant Array index out of bound, хотя обращаюсь вроде бы к XLSArray[0,0]


 
clickmaker ©   (2004-10-25 17:03) [4]

XLSArray := VarArrayCreate([0, RecordCount-1], varVariant);
...
V := VarArrayCreate([0, ColCount - 1], varVariant);
for IDX := 0 to ColCount - 1 do
 V[IDX] := Fields[IDX].Value;
XLSArray[RecNo - 1] := V;


 
}|{yk ©   (2004-10-25 17:36) [5]

Мда... оказывается RecordCount показывает количество отфетченных записей :(


 
clickmaker ©   (2004-10-25 17:56) [6]


> [5] }|{yk ©   (25.10.04 17:36)
> Мда... оказывается RecordCount показывает количество отфетченных
> записей :(

У некоторых потомков DataSet есть метод FetchAll. На крайняк - Last; First; или VarArrayRedim



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

Форум: "Основная";
Текущий архив: 2004.11.07;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.45 MB
Время: 0.036 c
4-1096612950
Мирон
2004-10-01 10:42
2004.11.07
Подскажите, как удалить файл не в корзину?


1-1098431939
Baradatiy
2004-10-22 11:58
2004.11.07
Визуальное линковние объектов


1-1098403458
dolphin
2004-10-22 04:04
2004.11.07
composit(komponovs4ik)


1-1098264904
Kogor
2004-10-20 13:35
2004.11.07
Тормоза с чтением каритнки в VCL вторым потоком


1-1098766873
samumka
2004-10-26 09:01
2004.11.07
И снова MDI (передача переменных)?





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский