duvida na passagem de parametro

Delphi

28/07/2006

Pessoal,
tenho o seguinte

.....
ldapEntry = class(TObject)
private
fdn:string;
P:array of PLDAPMod;
fParent:ldapEntry;
fAttributes: TStringlist;
fChildren: ldapEntrylist;
function GetAttribute(Name: string): ldapAttribute;
function GetAttributeValue(Name: string; Idx:Integer): string;
function GetNiceName:string;
procedure MakeLDAPArray;
procedure MakeModLDAPArray(le: ldapEntry);
procedure ApplyChangesInMemory;
procedure DisposeLDAPArray;
function GetExists(Name, Value: string): boolean;
function GetLDIF:string;
procedure SetLDIF(S:string);
function Equal(Name:string;le:ldapEntry;var SL:Tstringlist):boolean;
function AddsOnly(Name: string; le: ldapEntry; var SL:Tstringlist): boolean;
function DeletesOnly(Name: string; le: ldapEntry; var SL: Tstringlist): boolean;
procedure ClearAll;
public
property DN:string read fDN write fDN;
property AttributeValue[Name:string;Idx:integer]:string read GetAttributeValue; default;
property Attribute[Name:string]:ldapAttribute read GetAttribute;
property Children:ldapEntryList read fChildren;
property Parent:ldapEntry read fParent;
property Exists[Name,Value:string]:boolean read GetExists;
property NameList:TStringList read fAttributes;
property NiceName:string read GetNiceName;
property AsLDIF:string read GetLDIF write SetLDIF;
constructor Create; overload;
constructor Create(le:ldapEntry); overload;
procedure Assign(le: ldapEntry);
destructor Destroy;
function FreeChild(ee: ldapEntry): boolean;
procedure Add(Name,Value:string); overload;
procedure Add(Name: string; Value: array of string); overload;
procedure Modify(Name:string;Value:array of string); overload;
procedure Modify(Name,Value:string); overload;
procedure Delete(Name:string); overload;
procedure Delete(Name,Value:string); overload;
end;


Dúvida:

na chmada da procedure...

procedure Assign(le: ldapEntry); quando faço a chamada qual o parametro que devo passar no lugar do ´le:ldapentry´

Exemplo:

Assign(?????);

Obrigado.


Iff

Iff

Curtidas 0
POSTAR