Форум: "Потрепаться";
Текущий архив: 2004.08.22;
Скачать: [xml.tar.bz2];
ВнизExcel Найти похожие ветки
← →
Igor_thief © (2004-07-30 19:36) [0]Почему если сделать так то работает:
[code]var Irange: ExcelXp.ExcelRange;
..
IDispatch(IRange) := OleVariant(pSheet.UsedRange);
..[/code]
а когда делаешь так, то Left side cannot be assigned
[code]TSomeData = class(TObject)
private
FpSheet: OleVariant;
FIRange: ExcelXp.ExcelRange;
FRezRange: ExcelXp.ExcelRange;
public
property pSheet: OleVariant read FpSheet write FpSheet;
property IRange: ExcelXP.ExcelRange read FIRange write FIRange;
property RezRange: ExcelXP.ExcelRange read FRezRange write FRezRange;
end; // type
...
IDispatch(TempPr.IRange) := OleVariant(pSheet.UsedRange);
...[/code]
Я уже просто замучался искать ответ!!! Хелп ми!
← →
olookin © (2004-07-30 21:09) [1]А что такое TempPr?
← →
Igor_thief © (2004-07-31 12:16) [2]TempPr это экземпляр класса TSOmeData
← →
Piter © (2004-07-31 13:34) [3]потому что TempPr.IRange это свойство (property). А свойство нельзя приводить к чему-нибудь. Имхо, так.
Я вообще слабо понимаю, что здесь написано, но почему бы не писать просто:TempPr.IRange := OleVariant(pSheet.UsedRange);
или если у тебя все равно никаких методов чтения и записи не используется, то удалитьproperty IRange: ExcelXP.ExcelRange read FIRange write FIRange;
и перенести объявление FIRange из private в public под именем IRange
← →
Igor_thief © (2004-08-03 10:05) [4]Piter © (31.07.04 13:34) [3]
>>Я вообще слабо понимаю, что здесь написано, но почему бы не писать просто:
TempPr.IRange := OleVariant(pSheet.UsedRange);
А ты попробуй;о)
Все равно спасибо! Я нашол другой способ решения своей задачи.
Страницы: 1 вся ветка
Форум: "Потрепаться";
Текущий архив: 2004.08.22;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.057 c