Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Программная инженерия > Безопасность, Шифрование
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 29.05.2007, 17:42   #1
Тимониссимо
 
Регистрация: 10.04.2007
Сообщений: 4
По умолчанию как определить координаты ячейки с найденным текстом

Смысл следюущий: из Делфи нужно отыскать текст в открытой книге excel и определить координаты ячейки. Нашел только метод find, вроде как должен был сработать, но что-то не получилось:


Код HTML:
 TForm1 = class(TForm)
   Edit1: TEdit;
   Edit2: TEdit;
   Button1: TButton;
   e: TExcelApplication;
   procedure Button1Click(Sender: TObject);
   end;

var
 Form1: TForm1;
 Findt, sheet:variant;

implementation
{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
e.Workbooks.Open(getcurrentdir+'\1.xls',emptyparam,emptyparam,emptyparam,emptyparam,emptyparam,emptyparam,empty param,emptyparam,emptyparam,emptyparam,emptyparam,emptyparam,emptyparam,emptypar am,0);
sheet:=e.workbooks[1].worksheets['лист1'];
Findt:=sheet.cells.find(what:='5');
edit2.Text:=findt.text;
end;
Возвращает в edit2.Text значение '5', а мне нужны координаты ячейки. Может быть надо не свойство .text использовать?

Подскажите, плз!!!
Тимониссимо вне форума Ответить с цитированием
Старый 30.05.2007, 10:45   #2
Тимониссимо
 
Регистрация: 10.04.2007
Сообщений: 4
По умолчанию

Неужели никто не знает?
:-(
Тимониссимо вне форума Ответить с цитированием
Старый 30.05.2007, 15:23   #3
Тимониссимо
 
Регистрация: 10.04.2007
Сообщений: 4
По умолчанию

Ну вот, разобрался - .column и .row
Тимониссимо вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Координаты ячейки в StringGrid??? aslanbek Общие вопросы Delphi 13 01.08.2014 16:53
Как определить координаты иконки приложения в system tray? SkAndrew Общие вопросы Delphi 5 18.08.2008 16:52
как определить координаты курсора snaem Общие вопросы .NET 0 23.04.2008 22:27
ячейки с красным текстом перенести на др лист Alexander_Gr Microsoft Office Excel 5 31.01.2008 22:00
Как определить координаты видимой части PaintBox? Vladimir K. Общие вопросы Delphi 3 28.12.2006 10:02