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

Вниз

События   Найти похожие ветки 

 
Алексей Петухов   (2004-03-31 18:47) [0]

Здравствуйте уважаемые мастера.

Сразу извиняюсь за "воприс чайника", но без вашей помощи что-то разобраться не могу.

работаю с MSExcel через OLE automation
переменная
WorkSheet:Excel8TLB._Worksheet

имеет свойство
OnDoubleClick:[lcid:integer]:WideString;

Вопрос: как мне связать его с какой-либо процедурой?
Т.е. при двойном клике на листе Excel вызвать процедуру в Delphi?

Подскажите пожалуйста, как решить эту проблему?

Заренее благодарен.
Алексей Петухов.


 
Алексей Петухов   (2004-04-01 10:50) [1]

Может поможет, кто - нибудь?


 
Anatoly Podgoretsky ©   (2004-04-01 10:53) [2]

С процедурой нельзя, можно только с методом класса, а связь делается простым присвоением, оператор :=


 
Алексей Петухов   (2004-04-01 10:58) [3]

В описании интерфейса следующее:

_Worksheet = interface(IDispatch)
...
property OnDoubleClick[lcid: Integer]: WideString read Get_OnDoubleClick write Set_OnDoubleClick;
...


Я понимаю это как раз для таких целей.
Но как вызвать мою процедуру в этом случае?


 
Алексей Петухов   (2004-04-01 11:16) [4]

Как мне связать это свойство с методом класса?


 
Digitman ©   (2004-04-01 12:18) [5]

ты, судя по всему, полез не в те дебри

у тебя есть закладка Servers в палитре компонентов Делфи ?

брось на форму компонент ExcelWorksheet, в Инспекторе Объектов ты увидишь событие OnBeforeDoubleClick, обработчик которого, будучи назначенным, должен иметь след.прототип :

type

TBeforeDoubleClick = procedure(Sender: TObject; var Target, Cancel: OleVariant) of object;


 
Алексей Петухов   (2004-04-02 08:21) [6]

Спасибо за совет конечно,
но "не те дебри" уже не позволяют так "изящьно" решить проблему


 
Digitman ©   (2004-04-02 08:50) [7]


> Алексей Петухов


это почему же ? поясни ...



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

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

Наверх




Память: 0.45 MB
Время: 0.055 c
1-1081012325
DADUD
2004-04-03 21:12
2004.04.18
Открыть HTML страничку в определённом окне


1-1080333572
alienserg
2004-03-26 23:39
2004.04.18
отладка сервиса. Как?


1-1080364316
User_OKA
2004-03-27 08:11
2004.04.18
Гиперссылка


3-1079586591
ГАГН
2004-03-18 08:09
2004.04.18
Опять Fast Report...


3-1079447958
race1
2004-03-16 17:39
2004.04.18
adodataset.close





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский