CreateDocumentEx (TdbfDocument)

De Wiki1000
class function CreateDocumentEx(function CreateDocumentEx(const iName,iOidObject:string; iDocumentNature : integer; iCreationDateTimeStart : TDateTime):TabsCustomDocument;

Cette fonction crée un document et le rattache à un objet.

iName Nom du document créé (avec l'extension)
iOidObject Identifiant de l'objet auquel rattaché le document
iDocumentNature Nature du document
iCreationDateTimeStart Date de création


Exemple :

var
 doc : TdbfDocument;
 b : TBanque;
begin
 b := TBanque.Find('code=%1','',true,['13807FR']);
 Classmanager.Begintran;
 try
  doc := TdbfDocument.CreateDocumentEx('doc1.txt',b.instanceoid,DOCUMENTNATURE_ARCHIVE_ITEM,now);
  doc.LoadFromFile(s);
 except
  classmanager.RollBack;
  raise;
 end;
end;

Voir aussi:


TdbfDocumentDéveloppement DSM

Outils personnels