[Lazarus-es] funcion

[Lissy Amador]

Gracias por tu ejemplo, en mi caso no uso librerias
porque me da error> Fatal: Compilación de abortadas
este 

program Proyecto1;                                                           
                                                       var                                                                        
 a: Integer;                                                                 begin                                                                     
 writeln('Programa: ',ParamStr(0));                                       
 for a:=1 to ParamCount do                                                
 writeln('Parametro  ',a,': ',ParamStr(a));                                
end.