Par2: Running HTML file from Clarion 2009-04-10 -- Bernard Grosperrin In your window:
OLE,AT(172,2,279,286),USE(?OLE1),CREATE('Shell.Explorer'),#ORDINAL(7)
END
In your WindowManager Init:
?OLE1{prop:ReportException} = TRUE
In code, on a button, or an event like takenewselection, if it's to
display from a browse
LOC:TempFileName = Self.Q.ORI:FileName ! Self.Q is the browse
queue
?OLE1{'Navigate("file:///' & CLIP(LOCTempFileName))
That's it!
Salt to taste, but that works just fine for me, for any HTML file I
want to display. You can create a procedure/window just for that, and
pass it the file name as parameter, or like I did here, use that on
the side of a browse to display files matching records in the browse.
Printed December 3, 2024, 11:46 am This article has been viewed/printed 35331 times. |