This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
[Setup] | |
AppId=XMLParseExample | |
AppName=XMLParseExample | |
AppVersion=1.0.0 | |
VersionInfoVersion=1.0.0 | |
VersionInfoDescription={#SetupSetting("AppName")} Installer | |
OutputBaseFilename={#SetupSetting("AppName")}_{#SetupSetting("AppVersion")} |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
[Code] | |
type | |
Tproc = procedure(const msg: String); | |
Tfunc = function(const value: Integer): String; | |
procedure sample_proc(const msg: String); | |
begin | |
Log(msg); | |
end; |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
function Count(What, Where: String): Integer; | |
begin | |
Result := 0; | |
if Length(What) = 0 then | |
exit; | |
while Pos(What,Where)>0 do | |
begin | |
Where := Copy(Where,Pos(What,Where)+Length(What),Length(Where)); | |
Result := Result + 1; | |
end; |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
[Code] | |
// function IsModuleLoaded to call at install time | |
// added also setuponly flag | |
function IsModuleLoaded(modulename: String ): Boolean; | |
external 'IsModuleLoaded@files:psvince.dll stdcall setuponly'; | |
// function IsModuleLoadedU to call at uninstall time | |
// added also uninstallonly flag | |
function IsModuleLoadedU(modulename: String ): Boolean; | |
external 'IsModuleLoaded@{app}\psvince.dll stdcall uninstallonly' ; |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
procedure ConvertConfig(xmlFileName: String); | |
var | |
xmlFile: String; | |
xmlInhalt: TArrayOfString; | |
strName: String; | |
strTest: String; | |
tmpConfigFile: String; | |
k: Integer; | |
begin | |
xmlFile := ExpandConstant('{app}') + '\' + xmlFileName; |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
; Starting point of creating an Inno Setup Script | |
; See the Inno Setup documentation at http://www.jrsoftware.org/ | |
#define SourceFileDir "" | |
#define IncludeFramework true | |
#define IsExternal "external" | |
[setup] | |
;name of your application | |
AppName= |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
function MakeBackup(indir, outfile: String): Boolean; | |
var | |
res: Boolean; | |
fso: Variant; | |
winShell: Variant; | |
f: Variant; | |
inObj: Variant; | |
outObj: Variant; | |
begin | |
res := FALSE; |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
# Add type to handle the API certificate | |
add-type @" | |
using System.Net; | |
using System.Security.Cryptography.X509Certificates; | |
public class ITrustACertificatePolicy : ICertificatePolicy { | |
public ITrustACertificatePolicy() {} | |
public bool CheckValidationResult( | |
ServicePoint sPoint, X509Certificate cert, | |
WebRequest wRequest, int certProb) { |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
// ==UserScript== | |
// @name Google Image Direct Link | |
// @namespace http://userscripts.org/users/192333 | |
// @include http*://*.google.co.in/search* | |
// @version 1 | |
// @grant GM_deleteValue | |
// @grant GM_getValue | |
// @grant GM_setValue | |
// @grant GM_info | |
// ==/UserScript== |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
using OpenQA.Selenium; | |
using OpenQA.Selenium.Edge; | |
using System; | |
namespace EdgeDriverTests | |
{ | |
public class Program | |
{ | |
/* | |
* This assumes you have added MicrosoftWebDriver.exe to your System Path. |