Post (TdbmQueueMessage)

<source lang='delphi'>procedure Post;</source>

Cette méthode envoi le message sur la file d'attente

Tip : En cas d'erreur une exception est générée

Exemple :

<source lang="delphi"> procedure doPostSomeMessage; var msg:TdbmQueueMessage; idx:Integer; begin

 for idx:=1 to 1 do
  begin
    msg := TdbmQueueMessage.Create;
    msg.QueueName := 'WSMQ';
    msg.AddParameter('uneChaine','some text');
    msg.AddParameter('unEntier',1999);
    msg.BinaryContent.LoadFromFile('c:\image.jpg');
    msg.Post;
  end;

end; </source>

{{#if:TdbmQueueMessage|

{{#if:TdbmQueueMessage|— TdbmQueueMessage |}} — Développement DSM —

|

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

}}