![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Delphi+excel [D5, D7, Paradox]
RaWen © (2007-03-16 20:58:00)Как подключить книгу Excel к delphi для осуществления поиска(пробовал АDO не получилось). Если можно подкиньте пример.
sniknik (2007-03-17 15:58:00) [1]locate-ом в dataset-е или запросом в базе/книге.
> перебором значений ячеек
???
ну это только если хочется написать солидную, задумчивую прогу...
есть же методы поиска в екселе, и без разницы как он открыт, руками или как обьект автоматизации... делаешь макрос, смотришь метод и используешь.
Mike Kouzmine (2007-03-17 13:50:00) [2]перебором значений ячеек
RaWen (2007-03-17 13:17:00) [3]Как сделать поиск в присоединенном екселе?
fd979 (2007-03-17 08:16:00) [4]http://www.filefactory.com/file/2e27bb/
Плохиш (2007-03-17 01:49:00) [5]
> пробовал АDO не получилось
Анекдот напомнило про украинца, сало и афроамериканца...
S@shka (2007-03-16 23:51:00) [6]
> К Дельфи нельзя, пробуй опять с АДО, оно в состоянии работать
> с этим.
Как это нельзя???
А вот так....
const
Excel = 'Excel.Applicaion'
function IsOLEObjectInstalled(Name: String): boolean;
var
ClassID: TCLSID;
Rez : HRESULT;
begin
Rez := CLSIDFromProgID(PWideChar(WideString(Name)), ClassID);
Result := (Rez = S_OK);
end;
function IsExcelInstalled : Boolean;
begin
Result := IsOLEObjectInstalled(Excell);
end;
procedure OpenXLSDocument (const FileName : String);
var
V : Variant;
begin
try
V := GetActiveOleObject (Excell);
except
V := CreateOleObject(Excell);
end;
V.WorkBooks.Open(FileName);
V.Visible := True;
end;
Ну и так далее.... воообщем "Автоматизация Excel в Delphi" в yandex
Anatoly Podgoretsky (2007-03-16 21:01:00) [7]> RaWen (16.03.2007 20:58:00) [0]
К Дельфи нельзя, пробуй опять с АДО, оно в состоянии работать с этим.