Open (TbpConnection)

De Wiki1000
Révision datée du 17 janvier 2017 à 17:13 par Syfre (discussion | contributions) (Page créée avec « <source lang='delphi'>function Open:Integer;</source> Cette méthode ouvre la session sur le serveur de processus métiers. {|class="wikitable" |- !Paramètre !Usage |- ... »)
(diff) ← Version précédente | Voir la version actuelle (diff) | Version suivante → (diff)

<source lang='delphi'>function Open:Integer;</source>

Cette méthode ouvre la session sur le serveur de processus métiers.

Paramètre Usage
Result Valeur de retour de la fonction

Valeur de retour :

  • 0
La connexion à réussi
  • <>0
La connexion à échouée


Exemple : <source lang='delphi'> //Procedure EngineInfo; var bpc:TbpConnection; rslt:integer; doc:TxmlDocument; S:string; begin

 bpc := TbpConnection.Create;
 bpc.HostName := 'pc100xxx';
 bpc.HostServiceName := 'syfre';
 bpc.UserName := 'syfre';
 bpc.Password := 'syfre';
 rslt := bpc.Open;
 if rslt<>0 then
  begin
    showMessage(Format('Connect Failed :%d',[rslt]));
    exit;
  end;
 rslt := bpc.EngineInfo('syfre1',doc);
 if rslt=0 then
    begin
      if Assigned(doc)
         then S := doc.SaveToString
         else S := 'doc not set';
      showMessage(Format('OK: %s',[S]));
    end
    else showMessage(Format('Failed :%d',[rslt]));
 Result := FALSE;

end; </source>

{{#if:TbpConnection (class)|

{{#if:TbpConnection (class)|— TbpConnection (class) |}} — Développement DSM

|

{{#if:|— [[{{{1}}}]] |}} — Développement DSM

}}