Сообщений в теме: 13

[Лоэрта]

в общем, обычное дело - на моей машине работает, на той, "где нет дельфи" не работает

в компоненте F1Book создаётся отчёт, после чего его нужно сохранить в файл.
делаю:
SomeFileName := 'Some File Name.xls';
F1Book1.Write('C:\Directory\' + SomeFileName, F1FileExcel5);

не ругается, полное впечатление, что всё работает... а файла на месте нет

PS: на моей машине стоит wХР, на той, где не работает - w98

[chainyk]

Я что за компонент та такой F1Book???

[Jus]

может, какой-нить DLL или OCX не хватает?
Может, к этому компоненту надо еще за собой какое-нибудь файло за собой тащить?

[Лоэрта]

не, все OCX и DLL я перетащила, класс зарегистрировала - это всё работает.
в результате экспериментов выяснила, в чём проблема: F1Book создает OLE object, который пользует WideString, а в w98 всё, что остаётся от строки такого типа - только один первый символ,
т.е. имя файла получается 'С'. такой файл у меня и получается в текущей директории...
кто-нибудь может посоветовать, что с этим можно сделать?
преобразование имени файла к string не помогает - параметр pPathName всё равно WideString.
может, в более новых версиях F1Book это исправлено как-то? у меня версия 3.0.4

[Jus]

Тяжелый случай.....
попробуй отчеты сохранять в текстовом формате

[Лоэрта]

В том-то и фишка, что задание как раз "облегчить труд" тех кто до сих пор делал эти отчёты в тхт, вставлял в excel и т.д.
Попробовала через CreateOLEObject - тоже какая-то ерунда. Свойство NumberFormat для Range не поддерживается (не на моей машине, конечно). может, это как-то решается?

[Diesel_x34]

не, все OCX и DLL я перетащила, класс зарегистрировала - это всё работает.
в результате экспериментов выяснила, в чём проблема: F1Book создает OLE object, который пользует WideString, а в w98 всё, что остаётся от строки такого типа - только один первый символ,
т.е. имя файла получается 'С'. такой файл у меня и получается в текущей директории...
кто-нибудь может посоветовать, что с этим можно сделать?
преобразование имени файла к string не помогает - параметр pPathName всё равно WideString.
может, в более новых версиях F1Book это исправлено как-то? у меня версия 3.0.4

Что то я не совсем понимаю... Как 98 винда может вот так вот отрезать строку до одного символа? Ну и что что WideString, разница? String в вашем случае ничем не лучше. Помоему дело не в типе строки. Можно поподробней описать как это вообще происходит?! Тоесть создается OLE object и уже при создании все нафиг режется? Так чтоль?

Сообщение отредактировал Diesel_x34: 07.01.2005, 12:00:42

[Лоэрта]

может, не винда, скорее всего это компонент так работает...
не могу сказать в какой момент строка обрезается, потому как всё, что я смогла придумать - проставить Showmessage(pPathName) до и после процедуры DefaultInterface.Write внутри TF1Book.Write из VCF1, оба раза появилось сообщение 'C:\Directory\Some File Name.xls'. ...и создался файл с именем 'С'.
опять же всё, что могу предположить на этот счёт - Showmessage требует параметр string и спокойно преобразует к нему pPathName: Widestring.
а почему так не делает этот ActiveX, даже предположить не могу.

[Diesel_x34]

может, не винда, скорее всего это компонент так работает...
не могу сказать в какой момент строка обрезается, потому как всё, что я смогла придумать - проставить Showmessage(pPathName) до и после  процедуры DefaultInterface.Write внутри TF1Book.Write из VCF1, оба раза появилось сообщение 'C:\Directory\Some File Name.xls'. ...и создался файл с именем 'С'.
опять же всё, что могу предположить на этот счёт - Showmessage требует параметр string и спокойно преобразует к нему pPathName: Widestring.
а почему так не делает этот ActiveX, даже предположить не могу.

Да уж, задачка конечно интересная. Но без непосредственного просмотра кода скорее всего не разобраться. Может LowerCase попробовать. Ну так, на всякий случай. Или пойти вообще хитрым путем... Просто напросто копировать этот файл 'C' в 'C:\Directory\Some File Name.xls', как только вы будете уверены что он уже создался. Эко конечно не есть правильно, но пока можно обойтись и этим. А как разберетесь, код не долго закомментарить!

[Лоэрта]

забыла раньше сказать, попробовала переименовать - но все текстовые данные внутри отчёта тоже обрезаны до 1 символа
пока сделала всё-таки через CreateOLEObject, просто убрала форматирование ячеек (NumberFormat). немного некрасиво, конечно когда суммы выводятся с разным количеством цифр поле запятой, зато пока работает благо, офис на той машине такой же, что и у меня.

Но без непосредственного просмотра кода скорее всего не разобраться.

procedure TForm1.Button1Click(Sender: TObject);
begin
F1Book1.Write('C:\Directory\Some File Name.xls', F1FileExcel5);
end;

собственно, весь код тестовой проги. на форме - кнопка и F1Book.
скомпилить в хр, запусить в 98.
спасибо всем за ответы если узнаете, как решить проблему с F1book - пожалуйста, напишите, мне это всё ещё нужно...

Сообщение отредактировал Лоэрта: 08.01.2005, 13:20:14

[Коляныч]

просто в линейке Win95/98/ME нету unicode, отсюда и все проблемы
или компоненту перекомпилируй в ansi, или ставь нормальную винду

[EagleEye]

Насколько я понял суть проблемы, то она заключается в следующем: несовпадение типов данных в Delphi и параметров процедур ActiveX компонента. Говоря обобщенно: технология ActiveX не является родной для среды разработки Delphi. Отсюда и вытекают все неприятности, связанные с использованием ActiveX компонентов. Родной же для Delphi является технология VCL. Отсюда вытекает такое решение проблеммы: найти VCL аналог данного ActiveX компонента. Коих, насколько я знаю, огромное количество. К примеру, я знаю с десяток VCL компонентов, которые выгружают данные в формате MS Excel. И не надо будет таскать никакие DLL и OCX! Насколько я знаю, Delphi есть даже стандартные VCL компоненты для работы с Excel.

[Crush_k12]

в общем, обычное дело - на моей машине работает, на той, "где нет дельфи" не работает

в компоненте F1Book создаётся отчёт, после чего его нужно сохранить в файл.
делаю:
  SomeFileName := 'Some File Name.xls';
  F1Book1.Write('C:\Directory\' + SomeFileName, F1FileExcel5);

не ругается, полное впечатление, что всё работает... а файла на месте нет

PS: на моей машине стоит wХР, на той, где не работает - w98

Мне кажется дело не в наличии делфи потомучто конечный файл скомпилирован и не важно где его запускать.
А дело может быть в разных структурах файловой системы ведь у WinXP & Win98
они разные.

[Лоэрта]

Мне кажется дело не в наличии делфи  потомучто конечный файл скомпилирован и не важно где его запускать.
А дело может быть в разных  структурах файловой системы ведь у WinXP & Win98 они разные.

сейчас я уже понимаю, что дело не в наличии дельфи на машине

Насколько я понял суть проблемы, то она заключается в следующем: несовпадение типов данных в Delphi и параметров процедур ActiveX компонента. Говоря обобщенно: технология ActiveX не является родной для среды разработки Delphi. Отсюда и вытекают все неприятности, связанные с использованием ActiveX компонентов. Родной же для Delphi является технология VCL. Отсюда вытекает такое решение проблеммы: найти VCL аналог данного ActiveX компонента. Коих, насколько я знаю, огромное количество. К примеру, я знаю с десяток VCL компонентов, которые выгружают данные в формате MS Excel. И не надо будет таскать никакие DLL и OCX! Насколько я знаю, Delphi есть даже стандартные VCL компоненты для работы с Excel.

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

просто в линейке Win95/98/ME нету unicode, отсюда и все проблемы или компоненту перекомпилируй в ansi, или ставь нормальную винду

спасибо , всё никак руки не дойдут попробовать - вот если взять VCF1.dcu из w98 и скомпилировать с ней, то будет работать?