wupdate.hpp

TMS component pack v4.2 for delphi

// CodeGear C++ Builder
// Copyright (c) 1995, 2007 by CodeGear
// All rights reserved

// (DO NOT EDIT: machine generated header) 'Wupdate.pas' rev: 11.00

#ifndef WupdateHPP
#define WupdateHPP

#pragma delphiheader begin
#pragma option push
#pragma option -w-      // All warnings off
#pragma option -Vx      // Zero-length empty class member functions
#pragma pack(push,8)
#include <System.hpp>	// Pascal unit
#include <Sysinit.hpp>	// Pascal unit
#include <Stdctrls.hpp>	// Pascal unit
#include <Messages.hpp>	// Pascal unit
#include <Classes.hpp>	// Pascal unit
#include <Sysutils.hpp>	// Pascal unit
#include <Wininet.hpp>	// Pascal unit
#include <Windows.hpp>	// Pascal unit
#include <Forms.hpp>	// Pascal unit
#include <Registry.hpp>	// Pascal unit
#include <Inifiles.hpp>	// Pascal unit
#include <Dialogs.hpp>	// Pascal unit
#include <Shellapi.hpp>	// Pascal unit
#include <Controls.hpp>	// Pascal unit
#include <Lzexpand.hpp>	// Pascal unit
#include <Cabfdi.hpp>	// Pascal unit
#include <Wucrc32.hpp>	// Pascal unit
#include <Wubase64.hpp>	// Pascal unit
#include <Comctrls.hpp>	// Pascal unit
#include <Variants.hpp>	// Pascal unit
#include <Wulogin.hpp>	// Pascal unit

//-- user supplied -----------------------------------------------------------

namespace Wupdate
{
//-- type declarations -------------------------------------------------------
#pragma option push -b-
enum TWebUpdateAuthentication { waAlways, waAuto, waNever };
#pragma option pop

typedef void __fastcall (__closure *TWebUpdateEvent)(System::TObject* Sender);

typedef void __fastcall (__closure *TWebUpdateFileProgress)(System::TObject* Sender, AnsiString FileName, int Pos, int Size);

typedef void __fastcall (__closure *TWebUpdateProgress)(System::TObject* Sender, AnsiString Action);

typedef void __fastcall (__closure *TWebUpdateProgressCancel)(System::TObject* Sender, bool &Cancel);

typedef void __fastcall (__closure *TWebUpdateFileDownloaded)(System::TObject* Sender, AnsiString FileName);

typedef void __fastcall (__closure *TWebUpdateBeforePost)(System::TObject* Sender, bool &AllowPost);

typedef void __fastcall (__closure *TWebUpdateProcessPostResult)(System::TObject* Sender, bool &AllowPostResult);

typedef void __fastcall (__closure *TWebUpdateStatus)(System::TObject* Sender, AnsiString StatusStr, int StatusCode, int ErrCode);

typedef void __fastcall (__closure *TWebUpdateThreadDone)(System::TObject* Sender);

typedef void __fastcall (__closure *TWebUpdateRestart)(System::TObject* Sender, bool &Allow);

typedef void __fastcall (__closure *TWebUpdateCustomValidate)(System::TObject* Sender, AnsiString Msg, AnsiString Param, bool &Allow);

typedef void __fastcall (__closure *TWebUpdateCustomProcess)(System::TObject* Sender, AnsiString Msg, AnsiString Param);

typedef void __fastcall (__closure *TWebUpdateSetParams)(System::TObject* Sender, AnsiString &AppParams);

typedef void __fastcall (__closure *TWebUpdateFileVersionCheck)(System::TObject* Sender, AnsiString NewVersion, AnsiString LocalVersion, bool &IsNew);

typedef void __fastcall (__closure *TWebUpdateConvertPrefix)(System::TObject* Sender, AnsiString &Path);

typedef void __fastcall (__closure *TWebUpdateFileNameFromURL)(System::TObject* Sender, AnsiString URL, AnsiString &FName);

typedef void __fastcall (__closure *TWebUpdateBeforeDownload)(System::TObject* Sender, int FileIdx, AnsiString FileDescription, AnsiString &URL);

typedef void __fastcall (__closure *TWebUpdateFileList)(System::TObject* Sender, Classes::TStringList* List);

#pragma option push -b-
enum TWebUpdateConnect { wucNoConnect, wucConnectPrompt, wucConnectSilent, wucConnectPromptHangup, wucConnectSilentHangup, wucNone };
#pragma option pop

#pragma option push -b-
enum TWebUpdateUpdate { wuuPromptOnce, wuuPromptAll, wuuSilent };
#pragma option pop

#pragma option push -b-
enum TWebUpdateType { ftpUpdate, httpUpdate, fileUpdate };
#pragma option pop

typedef void __fastcall (__closure *TWebUpdateTextDownloaded)(System::TObject* Sender, Classes::TStrings* Text, int &Res);

#pragma option push -b-
enum TWebUpdateVersionCheck { vcUpdateOnly, vcAlways };
#pragma option pop

#pragma option push -b-
enum TLastURLReg { lurLOCALUSER, lurLOCALMACHINE };
#pragma option pop

class DELPHICLASS TLastURLEntry;
class PASCALIMPLEMENTATION TLastURLEntry : public Classes::TPersistent 
{
	typedef Classes::TPersistent inherited;
	
private:
	bool FSave;
	AnsiString FKey;
	AnsiString FSection;
	TLastURLReg FRegRoot;
	
__published:
	__property bool Save = {read=FSave, write=FSave, nodefault};
	__property AnsiString Key = {read=FKey, write=FKey};
	__property AnsiString Section = {read=FSection, write=FSection};
	__property TLastURLReg RegRoot = {read=FRegRoot, write=FRegRoot, nodefault};
public:
	#pragma option push -w-inl
	/* TPersistent.Destroy */ inline __fastcall virtual ~TLastURLEntry(void) { }
	#pragma option pop
	
public:
	#pragma option push -w-inl
	/* TObject.Create */ inline __fastcall TLastURLEntry(void) : Classes::TPersistent() { }
	#pragma option pop
	
};


class DELPHICLASS TPostUpdateInfo;
class PASCALIMPLEMENTATION TPostUpdateInfo : public Classes::TPersistent 
{
	typedef Classes::TPersistent inherited;
	
private:
	AnsiString FServer;
	AnsiString FAction;
	AnsiString FData;
	bool FEnabled;
	AnsiString FPostResult;
	
public:
	__property AnsiString PostResult = {read=FPostResult, write=FPostResult};
	
__published:
	__property AnsiString Server = {read=FServer, write=FServer};
	__property AnsiString Action = {read=FAction, write=FAction};
	__property AnsiString Data = {read=FData, write=FData};
	__property bool Enabled = {read=FEnabled, write=FEnabled, nodefault};
public:
	#pragma option push -w-inl
	/* TPersistent.Destroy */ inline __fastcall virtual ~TPostUpdateInfo(void) { }
	#pragma option pop
	
public:
	#pragma option push -w-inl
	/* TObject.Create */ inline __fastcall TPostUpdateInfo(void) : Classes::TPersistent() { }
	#pragma option pop
	
};


class DELPHICLASS TInetThread;
class DELPHICLASS TWebUpdate;
class DELPHICLASS TWebUpdateUtility;
class PASCALIMPLEMENTATION TWebUpdateUtility : public Classes::TComponent 
{
	typedef Classes::TComponent inherited;
	
private:
	bool FShowAnimation;
	bool FShowWindow;
	AnsiString FStatusMessage;
	AnsiString FStatusCaption;
	
__published:
	__property bool ShowWindow = {read=FShowWindow, write=FShowWindow, nodefault};
	__property bool ShowAnimation = {read=FShowAnimation, write=FShowAnimation, nodefault};
	__property AnsiString StatusMessage = {read=FStatusMessage, write=FStatusMessage};
	__property AnsiString StatusCaption = {read=FStatusCaption, write=FStatusCaption};
public:
	#pragma option push -w-inl
	/* TComponent.Create */ inline __fastcall virtual TWebUpdateUtility(Classes::TComponent* AOwner) : Classes::TComponent(AOwner) { }
	#pragma option pop
	#pragma option push -w-inl
	/* TComponent.Destroy */ inline __fastcall virtual ~TWebUpdateUtility(void) { }
	#pragma option pop
	
};


class DELPHICLASS TFileList;
class DELPHICLASS TFileDescription;
class PASCALIMPLEMENTATION TFileList : public Classes::TCollection 
{
	typedef Classes::TCollection inherited;
	
public:
	TFileDescription* operator[](int Index) { return Items[Index]; }
	
private:
	int FActiveItem;
	HIDESBASE TFileDescription* __fastcall GetItem(int Index);
	HIDESBASE void __fastcall SetItem(int Index, const TFileDescription* Value);
	
public:
	virtual TMetaClass* __fastcall GetItemClass(void);
	HIDESBASE TFileDescription* __fastcall Add(void);
	HIDESBASE TFileDescription* __fastcall Insert(int index);
	__property TFileDescription* Items[int Index] = {read=GetItem, write=SetItem/*, default*/};
	__property int ActiveItem = {read=FActiveItem, nodefault};
	int __fastcall TotalSize(void);
	int __fastcall CompletedSize(void);
public:
	#pragma option push -w-inl
	/* TCollection.Create */ inline __fastcall TFileList(TMetaClass* ItemClass) : Classes::TCollection(ItemClass) { }
	#pragma option pop
	#pragma option push -w-inl
	/* TCollection.Destroy */ inline __fastcall virtual ~TFileList(void) { }
	#pragma option pop
	
};


struct tfvi;
class PASCALIMPLEMENTATION TWebUpdate : public Classes::TComponent 
{
	typedef Classes::TComponent inherited;
	
private:
	void *FHint;
	void *FHintConnect;
	bool FDialed;
	bool FSaveUpdate;
	AnsiString FControlFileName;
	AnsiString FFTPDirectory;
	bool FFTPPassive;
	AnsiString FHost;
	AnsiString FPassword;
	AnsiString FSignature;
	bool FSignatureCheck;
	bool FExtractCAB;
	bool FApplyPatch;
	int FPort;
	AnsiString FProxy;
	AnsiString FProxyUserID;
	AnsiString FProxyPassword;
	TWebUpdateConnect FUpdateConnect;
	TWebUpdateType FUpdateType;
	TWebUpdateUpdate FUpdateUpdate;
	AnsiString FURL;
	AnsiString FUserID;
	AnsiString FDateFormat;
	AnsiString FTimeFormat;
	char FDateSeparator;
	char FTimeSeparator;
	TPostUpdateInfo* FPostUpdateInfo;
	TLastURLEntry* FLastURLEntry;
	TWebUpdateFileProgress FWebUpdateFileProgress;
	TWebUpdateFileDownloaded FWebUpdateFileDownloaded;
	TWebUpdateFileVersionCheck FWebUpdateFileVersionCheck;
	TWebUpdateProgress FWebUpdateProgress;
	TWebUpdateProgressCancel FWebUpdateProgressCancel;
	TWebUpdateStatus FWebUpdateStatus;
	TWebUpdateThreadDone FThreadUpdateDone;
	TWebUpdateRestart FAppRestart;
	TWebUpdateEvent FAppDoClose;
	TWebUpdateCustomValidate FCustomValidate;
	TWebUpdateCustomProcess FCustomProcess;
	TWebUpdateProcessPostResult FProcessPostResult;
	TWebUpdateBeforePost FBeforePost;
	TWebUpdateFileList FFileNameList;
	bool FThreaded;
	AnsiString FAppName;
	AnsiString FAppComps;
	bool FAppCompsIncluded;
	bool FAppClose;
	bool FSilentRestart;
	TWebUpdateConvertPrefix FConvertPrefix;
	TWebUpdateSetParams FSetAppParams;
	bool FFTPDirSet;
	TWebUpdateTextDownloaded FOnDownloadedWhatsNew;
	TWebUpdateTextDownloaded FOnDownloadedEULA;
	TWebUpdateBeforeDownload FOnBeforeFileDownload;
	bool FUseCRC32;
	TWebUpdateUtility* FUtility;
	TWebUpdateFileNameFromURL FOnFileNameFromURL;