Thread: Blackbox Inno Setup Script
View Single Post
  #940  
Old 27-10-2014, 13:12
Dante1995 Dante1995 is offline
Banned
  
Join Date: Feb 2014
Location: Black Hole
Posts: 297
Thanks: 116
Thanked 481 Times in 162 Posts
Dante1995 is on a distinguished road
Code:
procedure TextOnClick(Sender: TObject);
var 
ErrorCode: Integer;
begin
ShellExec('open', ExpandConstant('{src}\text.txt'), '', '', SW_SHOWNORMAL, ewNoWait, ErrorCode);
end;
Last edited by Dante1995; 27-10-2014 at 13:32.
Reply With Quote
The Following 2 Users Say Thank You to Dante1995 For This Useful Post:
minh_k43sj (28-10-2014)