Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

Obsluga Worda z Delphi

61 views
Skip to first unread message

Andrzej Niemiec

unread,
Jan 31, 2001, 6:11:38 AM1/31/01
to
PLs gdzie mozna znalezc jakas sensowna dokumentacje obslugi Worda / Excela z
Delphi?

W helpach Delphi jest tylko "szczegolowe informacje znajduja sie w
dokumentacji Microsoftu"

Chodzi mi w zasadzie o drobiazgi: otwarcie pliku z szablonu, zamknienicie
itp... ale tez o sposob dorwania sie do ustalonego paragrafu.

--
Best Regards

Andrzej Niemiec ---------------:-)


Sławomir Adamski

unread,
Jan 31, 2001, 6:50:02 AM1/31/01
to
Witam
Użytkownik "Andrzej Niemiec" <pr...@prim.com.pl> napisał w wiadomości
news:958rpr$9qu$1...@news.tpi.pl...

> PLs gdzie mozna znalezc jakas sensowna dokumentacje obslugi Worda / Excela
z
> Delphi?
>
> W helpach Delphi jest tylko "szczegolowe informacje znajduja sie w
> dokumentacji Microsoftu"
>
> Chodzi mi w zasadzie o drobiazgi: otwarcie pliku z szablonu, zamknienicie
> itp... ale tez o sposob dorwania sie do ustalonego paragrafu.

Najlepszym źródłem jest help Wordowo Excelowego VB.
--
Sławek

Radosław Grabiec

unread,
Jan 31, 2001, 7:21:18 AM1/31/01
to
> W helpach Delphi jest tylko "szczegolowe informacje znajduja sie w
> dokumentacji Microsoftu"
I maja racje. Ja duzo pisalem procedur wykorzystujacych ole w wordzie i
excelu - wspomagalem sie jedynie helpem VB dla worda i excela ( dostepne w
pelnej instalacji Office'a )

> Chodzi mi w zasadzie o drobiazgi: otwarcie pliku z szablonu, zamknienicie
> itp... ale tez o sposob dorwania sie do ustalonego paragrafu.

Jesli nie mozesz sobie dac z tym rady - napisz.
w dystrybucji D5 jest taki unit word97.pas i word2000.pas - tam sa
interfejsy i metody dostepne w Wordzie i definicje stalych ( wdReplaceAll,
... )
Ponizej prosty przyklad:

<CODE>
var ole:TOleContainer;
ranga:OleVariant;

try
ole.CreateObject('Word.Document', false);
except
messageDlg('Nie można otworzyć aplikacji Microsoft Word', mtError,
[mbOK], 0);
Exit;
end;
{ .... }
{ ole.OleObject - dokument worda }
ranga := ole.OleObject.Content;

ranga.Font.Bold := True;
ranga.Font.Name := 'Verdana';
ranga.Font.Size := 24;

ranga.InsertAfter( 'Imię: #IMIE' );
ranga.find.Execute( '#IMIE', False, True, False, False, True, True,
wdFindContinue, wdTOCClassic, 'Radek', wdReplaceAll );
</CODE>
pzdrw
Radek Grabiec ( Polak )


--
Zapraszam na nową stronę o programowaniu w Delphi
Przykłady ze źródłami: http://interneat.republika.pl
Nowy dział: HUMOR
rad...@interneat.pl

Piotr "Lodek" Hosowicz

unread,
Jan 31, 2001, 7:19:55 PM1/31/01
to
Andrzej Niemiec <pr...@prim.com.pl> wrote in message
news:958rpr$9qu$1...@news.tpi.pl...

> PLs gdzie mozna znalezc jakas sensowna dokumentacje obslugi Worda / Excela
z
> Delphi?
>
> W helpach Delphi jest tylko "szczegolowe informacje znajduja sie w
> dokumentacji Microsoftu"
>
> Chodzi mi w zasadzie o drobiazgi: otwarcie pliku z szablonu, zamknienicie
> itp... ale tez o sposob dorwania sie do ustalonego paragrafu.

Ma Pan na ten temat materiał zlotowy 1999. Adres to
http://www.delphi.pl/zlot/. Dalej Pan trafi (na stronę pozlotową 1999,
autorem jest Pan Krzysztof Świątkowski). Do tego musi się Pan posiłkować
helpem do wordowego Visual Basica, znajduje się gdzieś w katalogu z officem,
nazwa to zdaje się vbawrd8.hlp. Najwygodniej jest zaimportować sobie
odpowiedni plik TLB, w przypadku Worda to jest AFAIR msword80.olb czy coś
takiego - robi się to w Project > Import Type Library (w Delphi 3- to było
AFAIR w menu Component).

Oprócz tego znalazłem takigo linka u siebie:

http://www.borland.com/delphi/papers/microexcel/

Tam jest zdaje się o Excelu, ale idea jest taka sama. Co do samego Worda to
Document ma kontener Paragraphs czy jakoś tak, więc napewno się da zrobić to
o co Panu chodzi.

--
Pozdrawiam,
Piotr "Lodek" Hosowicz
Strony Pozlotowe 2000: http://www.delphi.pl/zlot2000/po/

0 new messages