Syfre le 11 août 2009 à 14:03

2009-08-11T14:03:10Z

← Version précédente		Version du 11 août 2009 à 14:03
Ligne 1 :		Ligne 1 :

	<source lang='delphi'>Procedure ExecuteUrl(const iURL:string);</source>		<source lang='delphi'>Procedure ExecuteUrl(const iURL:string);</source>

	~~description~~		Cette procédure exécute une [[URL ligne 1000\|URL ligne 1000]].

	{\|class="wikitable"		{\|class="wikitable"
	\|-		\|-
	\|iURL		\|iURL
	\|		\|URL à exécuter.
	\|}		\|}

			{{info\|Les URLs ligne 1000 permettent d'invoquer des fonctions de l'application.}}

	Exemple		Exemple

	<source lang='delphi'>		<source lang='delphi'>
			//Procedure InterfaceDuplicate;
			var
			c_ProfilName : String;
			vDetailDest : TDetailEngagement;
			vDatabaseInfo : TDataBaseInfo;
			vURL : String;
	begin		begin
			if ClassManager.TranCount = 0 then
			ClassManager.BeginTran;

			c_ProfilName := 'dup_detailengagement.xml';
			vDataBaseInfo := ClassManager.DataBaseByURL(ClassManager.DefDataBaseURL);
			vDetailDest := ClassManager.CreateInstance('TDetailEngagement');
			ClassManager.ReplicateObject(c_ProfilName,self,vDetailDest,vDatabaseInfo);

			vURL := 'frm://eengagement_detailengagementfiche.dfm/';
			vURL := vURL + vDetailDest.instanceOid + '/';
			vURL := vURL + '?seoModal=Yes&seoKeepContext=Yes&seoNoNavigate=Yes&seoOKCancel=Yes';
			ExecuteURL(vURL);
	end;		end;
	</source>		</source>

	Voir aussi:		Voir aussi:

			*[[ExecuteForm (rtl)\|ExecuteForm]]

	{{Footer\|Développement DSM}}		{{Footer\|Développement DSM}}
	[[category:RTL Application]]		[[category:RTL Application]]

Syfre le 11 août 2009 à 12:11

2009-08-11T12:11:21Z

Nouvelle page

<source lang='delphi'>Procedure ExecuteUrl(const iURL:string);</source>

description

{|class="wikitable"
|-
|iURL
|
|}

Exemple

<source lang='delphi'>
begin
end;
</source>

Voir aussi:

{{Footer|Développement DSM}}
[[category:RTL Application]]

ExecuteUrl (rtl) - Historique des versions

Syfre le 11 août 2009 à 14:03

Syfre le 11 août 2009 à 12:11