Newsgroups : Borland : borland.public.delphi.internet.winsock : 2006 Jan : D2006 variants conversion error
| Subject: | D2006 variants conversion error |
| Posted by: | "Roby DP |
| Date: | Thu, 5 Jan 2006 15:10:06 |
please, can somebody can be able run this code piece under D2006?
in delphi5 this code permit to customize the print page footer and header
of iwebbrowser2:
var
vaIn :OleVariant;
vaOut :OleVariant;
begin
Header := '&w';
Footer := '[Pag. &p - &P]';
vaIn := Null;
vaOut :=Null;
try
SafeArrayCopy(PSafeArray(TVarData(VarArrayOf([Header,
Footer])).VArray), psa);
VarData(vaIn).VType := varArray or varByRef;
SafeArrayCopy(Psa, PSafeArray(TVarData(vaIn).VArray));
PrintBrowser.ExecWB(OLECMDID_PRINT, OLECMDEXECOPT_DONTPROMPTUSER, VaIn,
VaOut);
....
in D2006 except: variant conv not supported
Please help me, thank you.
Roby