Hallo alle Profile,
wo oder wie kann ich alle Eigenschaften bzw. Funktion der Variable
Document bestimmen (z.B. Document.GetPrinter ...).
für jede Antworte badanke mich ganz herzlich.
Grüßen
Lamgiang
Delphi-Quellcode:
function TOOViaOLE.CreateDocument(cFilename:
string = '
'): boolean;
var
StarDesktop: Variant;
Document: Variant;
begin
try
StarDesktop := StarOffice.createInstance('
com.sun.star.frame.Desktop');
if Length(cFilename) > 0
then begin
if Pos('
file:///', cFilename) < 1
then
cFilename := Path_Win2OO(cFilename);
Document := StarDesktop.LoadComponentFromURL(cFilename, '
_blank', 0, VarArrayCreate([0, -1], varVariant));
end
else
Document := StarDesktop.LoadComponentFromURL('
private:factory/swriter', '
_blank', 0, VarArrayCreate([0, -1], varVariant));
CreateDocument :=
not (VarIsEmpty(Document)
or VarIsNull(Document));
Result:=TRUE;
except
Result:=FALSE;
end;
end;