Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.08.22;
Скачать: CL | DM;

Вниз

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;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.022 c
3-1091096115
otistarda
2004-07-29 14:15
2004.08.22
Создание ADOConnection


14-1091733356
Anonim
2004-08-05 23:15
2004.08.22
Программистам на Delphi посвящается


4-1089304211
_x_o_r_
2004-07-08 20:30
2004.08.22
USB порт


14-1091615468
Rept
2004-08-04 14:31
2004.08.22
Кто знает оф. сайт?


1-1091666566
rosl
2004-08-05 04:42
2004.08.22
showmessage