Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Передача в программу координат выделенной области ячеек на листе [Delphi, Windows]


SMT ©   (2005-04-04 19:09:00) 

Уважаемые мастера,

Подскажите, пожалуйста, каким образом можно передать в мою программу координаты выделенной области ячеек на листе Excel. Я открываю из программы Excel, открываю нужную рабочую книгу, затем выделяю мышью на нужном листе диапазон ячеек с числовой информацией и хочу, чтобы данные из этого диапазона автоматически были считаны в вариантный массив.

С уважением, Игорь Степанов


YurikGL   (2005-04-05 08:33:00) [1]


> GanibalLector ©   (04.04.05 23:05) [4]

Не факт, что Excel зажигается програмно а то, что многократное подцепление-отцепление это - не правильно, это я с тобой согласен.


GuAV   (2005-04-04 23:41:00) [2]


> выделяю мышью на нужном листе диапазон ячеек с
> числовой информацией и хочу, чтобы данные из этого
> диапазона автоматическибыли считаны

Т.е. нужно событие Worksheet_SelectionChange ?


GanibalLector   (2005-04-04 23:05:00) [3]

>Тебе ли объяснять, что у пользователя там могло что-нибудь лежать?
Ну,не знаю.Я работаю через буфер и мне пофиг,что думают о этом другие.

Кстати,YurikGL сам подумай.Это что же получается???Ты отработал программно с Excel-ем,далее его "зажег",далее его нужно освобождать(дабы утечек поменьше было).Потом выделяешь кусок и нажимаешь какой-то Button,который продолжает отрабатывать и опять освобождать.Как-то это все муторно.От Лукавого.
З.Ы.Мое ИМХО.И попробуйте меня убедить,что я не прав.


YurikGL   (2005-04-04 22:40:00) [4]


> А чем буфер не устроил?

Тебе ли объяснять, что у пользователя там могло что-нибудь лежать? :)


GuAV   (2005-04-04 20:56:00) [5]

св-во Value у Range.

procedure TForm1.Button1Click(Sender: TObject);
var I, J: Integer;
begin
 M := XL.Selection.Value;
 for I := VarArrayLowBound(M, 1) to VarArrayHighBound(M, 1) do
   for J := VarArrayLowBound(M, 2) to VarArrayHighBound(M, 2) do
      StringGrid1.Cells[I, J] := M[I, J];
end;


GanibalLector   (2005-04-04 19:35:00) [6]

А чем буфер не устроил?


Наверх

Титульная страница Поиск, карта сайта Написать письмо