Passagem de parâmetros

• Parâmetros Numéricos
• Parâmetros Cadeia
• Parâmetros Registros
• Parâmetros Listas de Nomes
• Lista de itens

...

...

...

Parâmetros Numéricos

Parâmetros Cadeia

<func>(...,char cad,...) char cad[nnn];

strcpy(cad,"EXEMPLO");

<func>(...,cad,...);

<func>(...,byval cad as string,...) 

dim cad as string * nnn

cad="EXEMPLO"

<func>(...,cad,...)

<func>(...;cad:PChar;...) cad:array[0..nnn] of Char;

cad:= ‘EXEMPLO’;

<func>(...,@cad,...); 

Parâmetros Registros

<func>(...,char *<nome>,...) struct<nome>{

char<item>[nnn];

};

struct<nome>reg; 

strcpy(reg<item>,"DADO";

<func>(...,reg,...);

<func>(...,<nome> as Any,...)

Type<nome>

  <item> as string * nnn

end Type

Dim reg as <nome>

reg<item>="DADO" 

<func>(...,reg,...)

<func>(...;<nome>:Pointer;...)

  <nome>=Packed Record

  <item>:array[0..nnn] of Char;

End;

reg:<nome>;

reg.item:="DADO";

Parâmetros Listas de Nomes

<func>(...,struct Itens *lis,...)struct Itens{

char item [12][xx];

};

struct Itens lis;

strcpy(lis.item[0],"NOME");

strcpy(lis.item[1],"IDADE);

strcpy(lis.item[2],"");

<func>(...,lis,...);

<func>(...,lis as any,...)

Type Itens

  item0 as string * 12

  item1 as string * 12

  ...

  itemxx as string * 12

End Type

Dim lis as Itens

lis.item0="Nome"

lis.item1="IDADE"

lis.item2=""

<func>(...,lis:Pointer,...);

  lis=packed record

  item array[0..12,0..xx]of Charr

end;

Lista de itens

Algumas rotinas de leitura, inclusão e alteração de registros possuem as palavras Registro ou Todo como opção, no nome da própria rotina. Estas duas palavras no nome da rotina, ao ser executada, não obriga a mesma a ter que passar a Lista dos Itens que se deseja ler ou gravar.

Porém, se a rotina for executada sem essas opções, por exemplo, LeProximoSequencial ou IncluiRegistro, a lista deverá ser passada como parâmetro.

Se for especificada uma dessas opções (ou seja, Registro ou Todo), por exemplo, LeProximoRegistroSequencial ou IncluiTodoRegistro, fica subentendido que se deseja tratar todo o registro, exatamente como foi definido pelo esquema.

A seguir é mostrada a maneira correta de se preparar a lista dos itens, caso se prefira utilizar a rotina com a lista, ou seja, swem especificar as opções Registro ou Todo, conforme cada caso.

<var.Lista> = "%%<item1>,<item2>,…,<itemN>"

Declare Lista as String

Lista = "%%IDADE,NOMEP"

Var

  Lista: Array[1..20] of Char;

Begin

  Lista = "%%IDADE,NOMEP";

End;