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

Вниз

Открытие шаблона Microsoft Excel   Найти похожие ветки 

 
kingsoft ©   (2007-01-16 04:33) [0]

Доброго времени суток уважаемые мастера. Помогите пожалуйста с небольшой проблемой: Как сделать так, чтобы по нажатию на кнопку (Button), открывался уже готовый шаблон Microsoft Excel, из того или иного каталога жёсткого диска.


 
КиТаЯц ©   (2007-01-16 08:11) [1]

ShellExecute ?


 
pavel_guzhanov ©   (2007-01-16 09:41) [2]

XLApp:=CreateOleObject("Excel.Application");
 XLApp.WorkBooks.Open("c:\Blank.xls");


 
kingsoft ©   (2007-01-16 14:35) [3]


> pavel_guzhanov ©   (16.01.07 09:41) [2]
> XLApp:=CreateOleObject("Excel.Application");  XLApp.WorkBooks.
> Open("c:\Blank.xls");

Что то я не понял. Если можно то напишите пожалуйста полный код, и какие кампоненты нужно додавить на форму для работы, этого кода?


 
pavel_guzhanov ©   (2007-01-16 14:54) [4]

компонентов, кроме твоей кнопки, никаких.

uses comObj, Excel_TLB;

procedure TForm1.BInExcelClick(Sender: TObject);
var XLApp:Variant;
begin
  XLApp:=CreateOleObject("Excel.Application");
  XLApp.WorkBooks.Open("c:\Blank.xls");
  XLApp.Visible:=true;
end;



Если у тебя нет файла Excel_TLB.pas, то его нужно импортировать. Делается это так: Projects->Import Type Library, выбираешь в списке "Microsoft Excel 11.0 Object Library (Version 1.5)" и нажимаешь кнопку Create Unit. 11.0 и 1.5 - соответствуют MSExcel 2003, у других версий будут отличаться. Ну и, конечно, в корне диска С должен быть файл Blank.xls, это в том случае, если ты не хочешь ничего менять в приведенном примере.



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

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

Наверх





Память: 0.45 MB
Время: 0.052 c
6-1156919339
AlexaSP
2006-08-30 10:28
2007.02.04
Работа с ARP. Посылка запроса средствами WinXP :)


8-1150035064
Whitevova
2006-06-11 18:11
2007.02.04
Микрофон. И всё с ним связанное.


15-1168580679
0x07BBh
2007-01-12 08:44
2007.02.04
2006 год: Год, когда Россия учила Запад уму-разуму


8-1147023946
zxcv
2006-05-07 21:45
2007.02.04
jpeg to Tbitmap


2-1169110754
wander
2007-01-18 11:59
2007.02.04
Библиотеки, как их использовать





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