Delphi Tips
In cazul in care va pasioneaza programarea in Delphi si va simtiti un novice asa cum ma simt si eu, probabil
cautati pe net diferite exemple si explicatii. M-am gandit sa "share" cate ceva din ce reusesc si eu sa iau de
pe net si sa experimentez...
In cele ce urmeaza voi incerca sa pun in practica ceea ce am spus mai sus:
Controlul aplicatziilor
prin intermediul OLE!
-Unit folosit ComObj.dcu
-Se creeaza folosind functia CreateOleObject(Class_string);
MsWord
In cazul Ms Word Class_string este Word.Basic sau Word.Application, primul fiind utilizabil si pe sisteme mai vechi.Preferabil Word.Application.
exemplu:
var msword:Variant;
...
msword:=CreateOleObject('Word.Application');
Proprietati si metode:
msword.Visible:=boolean;
msword.Application.Quit; - fara parametru utilizatorul va fi intrebat daca salveaza.Se poate folosi parametru logic.
msword.Application.Windowstate; -pt valoarea 0 dimensiunile stabilite de utilizator.
-pt val 1 = fereastra va fi maximizata
-pt val 2 = fereastra va fi minimizata
Daca setam msword.Application.Windowstate:=0 atunci putem folosi
msword.Application.Top:=integer;
msword.Application.Left:=integer;
msword.Application.Width:=integer;
msword.Application.Height:=integer;
msword.Application.DisplayScrollBars:=boolean;
msword.Application.ShowWindowsInTaskbar:=boolean;(office 2000 si xp- se refera la butoanele atribuite docum.)
msword.Application.Statusbar:=string;(afiseaza textul in statusbar)
msword.Application.Caption:=;(textul barii de titlu)
E-mail: d-utzu@post.ro
sau d_utzu@k.ro
|