LazReport Tutorial/es: what changed

Revision 1 to 2. Removed lines have a minus sign; added lines have a plus sign.

Old	New		Line
1	1		## Descripción
2	2
3	3		Esta página comenzó como una traducción de un escrito en Portugés [[LazReport Tutorial/pt\|Tutorial de LazReport]] (el cual a su vez parece una traducción de un documento en Francés). Fué actualizado para Lazreport (en vez de para FastReport) para Lazarus (en lugar de para Delphi), utilizando T*Connection en lugar de una tabla de DBase.
4	4
5	5		## Comenzando con LazReport
6	6
7	7		Vamos a utilizar una base de datos de demo que provee Delphi (DBDEMOS). Necesitas crear una nueva aplicación con un formulario principal Form1.
8	8
9	9		Aquí se asume que se tiene la base de datos establecida tal como se especifica en [[SQLdb Tutorial0]]. En caso contrario, por favor realiza dicho paso primero.
10	10
11	11		### Estableciendo tu formulario (form)
12	12
13	13		Sitúa los siguientes componentes en el formulario principal:
14	14
15	15		- Un T*Connection, e.g. TIBConnection:
16	16		- DatabaseName := tu base de datos, e.g. C:\Program Files\Firebird\Firebird_2_5\examples\empbuild\EMPLOYEE.FDB
17	17		- Nombre de usurio(UserName), contraseña (Password), nombre de equipo (HostName): apropiadamente (e.g. SYSDBA,password,\<none\> para Firebird embebido)
18	18		- Transaction: TSQLTransaction1
19	19		- TSQLTransaction
20	20		- TSQLQuery:
21	21		- Database := IBConnection1
22	22		- Active: true
23	23		- SQL: SELECT * FROM employee
24	24		- TDataSource
25	25		- DataSource1.DataSet := SQLQuery1
26	26		- TfrDBDataSet
27	27		- frDbDataSet.DataSource := DataSource1
28	28		- TfrReport
29	29		- TfrDesigner
30	30		- 2 TButton
31	31		- Button1.Caption := 'Edición'
32	32		- Button2.Caption := 'Vista previa'
33	33
34	34		Esto dará el resultado siguiente:
35	35
36	36		<img src="lazreptut01.png" title="lazreptut01.png" width="580" alt="lazreptut01.png" /> Haz Doble-click en el icono TfrReport (or right-click, Design Report) para traer al frente el diseñador de reportes:
37	37
38		-	~~<figure>~~
39	38		<img src="lazreptut01b.png" title="lazreptut01b.png" width="950" />
40		-	~~<figcaption>lazreptut01b.png</figcaption>~~
41		-	~~</figure>~~
42	39
43	40		### Estableciendo variables
44	41
45	42		LazReport permite enlazar nombres de variables a bases de datos o valores del sistema, evitando así a los usuarios finales tener que descifrar nombres de campo crípticos. En nuestro ejemplo vamos a crear unas variables para nuestros campos de la base de datos FIRST_NAME, LAST_NAME etc.
46	43
47	44		En el menú de ficheros, haz click en Variables list. Ahora se obtiene una descripción de las variables definidas:
48	45
49		-	~~<figure>~~
50	46		<img src="lazreptutvariableseditor.png" title="lazreptutvariableseditor.png" width="700" />
51		-	~~<figcaption>lazreptutvariableseditor.png</figcaption>~~
52		-	~~</figure>~~
53	47
54	48		Pulsa en el botón Variables en orden a definir algunas variables. Escribe el contenido de acuerdo a la siguiente imagen. "Demo Variables" representa una categoría y las otras entradas (campos xxx) representan variables. Para diferenciar ambas, las variables comienzan con un espacio.
55	49
56	50		Nota. La distinción entre variables y categorías de variables mediante la anteposición de un espacio, es única y exclusivamente en éste formulario (Variables List). En todo otro lugar (Diseñador de reportes, código fuente y scripts), la variable debe invocada sin espacios.
57	51
58		-	~~<figure>~~
59	52		<img src="lazreptutdefinevariables.png" title="lazreptutdefinevariables.png" width="700" />
60		-	~~<figcaption>lazreptutdefinevariables.png</figcaption>~~
61		-	~~</figure>~~
62	53
63	54		Finalmente haz click en OK para confirmar tus entradas, y entonces verás esto:
64	55
65		-	~~<figure>~~
66		-	~~<img src="lazreptutvariablesdefined.png" title="lazreptutvariablesdefined.png" />~~
67		-	~~<figcaption>lazreptutvariablesdefined.png</figcaption>~~
68		-	~~</figure>~~
	56	+	![](/wiki-images/f/ff/Lazreptutvariablesdefined.png)
69	57
70	58		Como puedes ver, la categoría que hemos definido se muestra en el ComboBox above de las variables. Cada variable debe enlazarse con su campo correspondiente. Para hacer esto, selecciona la variable y a continuación el campo. Realizar esto para todas las variables; el pantallazo muestra el enlace para Hire date:
71	59
72		-	~~<figure>~~
73	60		<img src="lazreptutvarhiredatetofield.png" title="lazreptutvarhiredatetofield.png" width="700" />
74		-	~~<figcaption>lazreptutvarhiredatetofield.png</figcaption>~~
75		-	~~</figure>~~
76	61
77	62		### Objetos y bandas
78	63
79	64		Después de cerrar el editor de variables volvemos a nuestro diseñador de reporters. Habrás notado que aparece un pequeño número de objetos en la barra de la izquierda de la superficie de reporter. Estos son:
80	65
81	66		- El icono del puntero del ratón.
82	67		- El objeto rectángulo.
83	68		- Banda.
84	69		- Objeto picture.
85	70		- Subreport
86	71		- Dibujar líneas.
87	72		- Insertar objeto de código de barras (barcode).
88	73
89		-	~~<figure>~~
90	74		<img src="lazreptut01b.png" title="lazreptut01b.png" width="950" />
91		-	~~<figcaption>lazreptut01b.png</figcaption>~~
92		-	~~</figure>~~
93	75
94	76		Haz Click en el icono de banda, ve a la superficie del report y haz click en el para depositar el objeto banda.
95	77
96		-	~~<figure>~~
97		-	~~<img src="lazreptutinsertnewband.png" title="lazreptutinsertnewband.png" />~~
98		-	~~<figcaption>lazreptutinsertnewband.png</figcaption>~~
99		-	~~</figure>~~
	78	+	![](/wiki-images/2/29/Lazreptutinsertnewband.png)
100	79
101	80		Debes hacer click en el tipo de banda que necesitas crear. Selecciona Report title y haz click en OK.
102	81
103	82		\| Tipo de banda \| Uso \|
104	83		\|----\|----\|
105	84		\| Report title \| Muestra solamente la primera página \|
106	85		\| Report summary \| Mustra solamente la última página \|
107	86		\| Page header \| Muestra al comienzo de cada página \|
108	87		\| Page footer \| Muestra al final de cada página \|
109	88		\| Master header \| Shown at the beginning of the first detail band/level \|
110	89		\| Master data \| First detail level data; repeated for each record in dataset \|
111	90		\| Master footer \| Shown at the end of the first detail band/level \|
112	91		\| Detail header \| Shown at the beginning of the second detail band/level \|
113	92		\| Detail data \| Second detail level data \|
114	93		\| Detail footer \| Shown at the end of the second detail band/level \|
115	94		\| Subdetail header \| Shown at the beginning of the third detail band/level \|
116	95		\| Subdetail data \| Third detail level data \|
117	96		\| Subdetail footer \| Shown at the end of the third detail band/level \|
118	97		\| Overlay \| Shown once on each page lower layer \|
119	98		\| Column header \| Muestra al principio de cada columna \|
120	99		\| Column footer \| Muestra al fondo de cada columna \|
121	100		\| Group header \| Shown at the top of every group \|
122	101		\| Group footer \| Muestra al fondo de cada grupo \|
123	102		\| Cross header \| Shown at the top of cross tables/pivot tables \|
124	103		\| Cross data \| Shows cross tables/pivot table data \|
125	104		\| Cross footer \| Shown at the bottom of cross tables/pivot tables \|
126	105
127	106		### Titulo del reporte
128	107
129	108		En la banda del editor de reportes, añade un rectángulo. Aparecerá el editor de texto. En la primera línea se debe indicar el título del reporte, añade un rectángulo.
130	109
131	110		En la segunda se necesita añadir la fecha y la hora. Ambas se obtienen haciendo click en Variable y a continuación en Category Other, seguido de un doble click en la variable deseada (una vez que te has familiarizado con las variables puedes también teclearlas). Ahora tenemos:
132	111
133		-	~~<figure>~~
134		-	~~<img src="lazreptutreporttitle.png" title="lazreptutreporttitle.png" />~~
135		-	~~<figcaption>lazreptutreporttitle.png</figcaption>~~
136		-	~~</figure>~~
	112	+	![](/wiki-images/a/ad/Lazreptutreporttitle.png)
137	113
138	114		Haz Click en OK para salir del editor y a continuación ajusta el rectángulo del título al tamaño deseado. Escoge un color para el fondo con el pulsadorC Bucket Fill de la barra de utilidades.
139	115
140	116		### El evento principal: mostrando datos en la banda de datos maestra
141	117
142	118		Vamos a insertar una banda de datos maestra. Lazreport pregunta por una fuente de datos; escoge frDBDataSet1, para nuestro ejemplo. La banda maestra se repetirá para cada registro de la fuente de datos. Puedes hacer doble click posteriormente en la banda si se necesita cambiar dicha fuente de datos.
143	119
144		-	~~<figure>~~
145		-	~~<img src="lazreptutbanddatasource.png" title="lazreptutbanddatasource.png" />~~
146		-	~~<figcaption>lazreptutbanddatasource.png</figcaption>~~
147		-	~~</figure>~~
	120	+	![](/wiki-images/b/b7/Lazreptutbanddatasource.png)
148	121
149	122		En la mitad izquierda de la banda insertamos un rectángulo y hacemos un doble click. Aparece el editor de texto que ya nos resulta familiar.
150	123
151	124		Ahora vamos a añadir varios campos en un rectángulo. En caso necesario se puede utilizar un rectángulo por campo para aplicar diferentes formatos etc.
152	125
153	126		La primera línea Name \[Full name field\] se obtiene escribiendo Name y a continuación, con el pulsador Variable, entrar la variable \[Field Name\]. Alternativamente, tal como se indicó antes, se puede escribir directamente el texto resultante.
154	127
155	128		La siguiente línea Salary \[Salary field\] se escribe de manera similar.
156	129
157	130		La tercera línea - Salary divided by job grade \[\[Salary field\]/\[Job grade field\]\] - se realiza de igual modo. Esto muestra que se pueden realizar cálculos con los campos que tenemos en la fuente de datos. Fíjate en el conjunto extra de corchetes alrrededor del cálculo. Como puedes intuir, no solamente se pueden utilizar las variables listadas a través del pulsador Variable , sino también las de los campos de la base de datos a través de DB Field.
158	131
159		-	~~<figure>~~
160		-	~~<img src="lazreptutmasterdata.png" title=" center" />~~
161		-	~~<figcaption> center</figcaption>~~
162		-	~~</figure>~~
	132	+	![](/wiki-images/6/6a/Lazreptutmasterdata.png)
163	133
164	134		Puedes utilizar todo tipo de operadores y funciones en los cálculos; ver [[LazReport Documentation\|LazReport Documentation#Documentation]] para una descripción.
165	135
166	136		#### Formateando la salida
167	137
168	138		Se puede controlar el modo en que se muestra el texto en los rectángulos.
169	139
170	140		Añadamos primero un nuevo rectángulo con la variable Hire date field.
171	141
172	142		En el editor de variables vamos a establecer un formato. Un formato es válido para todas las variables de un rectángulo/objeto. Para mostrar el editor de formato, hacemos doble click en un rectángulo para obtener el editor de texto, a continuación hacemos click en el pulsador de formato Format.
173	143
174	144		Establezcamos el formato fecha (date) que se necesita aquí:
175	145
176		-	~~<figure>~~
177		-	~~<img src="lazreptutformattingdate.png" title=" center" />~~
178		-	~~<figcaption> center</figcaption>~~
179		-	~~</figure>~~
	146	+	![](/wiki-images/1/12/Lazreptutformattingdate.png)
180	147
181	148		El primer ComboBox indica el tipo de dato (texto, numérico, fecha, hora, lógico/booleano). El segundo nos permite seleccionar el formato presenteThe second lets .... con algunas restricciones obvias:
182	149
183	150		- El tipo Texto no permite cualquier tipo de formato de número.
184	151
185	152		- El tipo número requiere un número decimal con una coma (Por favor verifica esto y ajusta el artículo si es necesario. ¿es esto específico del pais?). A excepción de para texto y tipos lógicos, se puede utiliar el mismo tipo de formato de cadenas que se utilizan en Lazarus.
186	153
187	154		Otras opciones de formato se encuentran presentes en el pulsador debajo del menú (e.g (e.g. negrita (bold), italica (italic), resaltada (Highlighting) ).
188	155
189	156		El formato resaltado (Highlighting) resulta muy útil para enfatizar datos. Se puede especificar una condición que determine cuando se aplica dicho resaltado.
190	157
191	158		Para ello, utiliza el valor del keyword para indicar el valor de la variable. Aquí es el resaltado para all hire dates posteriores a 1989. Debido a que Hire date es un campo TDateTime (el cual es internamente un float), I cheated por utilizar el valor tipo flot de January 1st, 1990 el cual es 32874. Por defecto highlighter es simplemente el formato negrita sobre fondo blanco. Se pueden establecer estos parámetros para un área haciendo click en el pulsador de Highlight.
192	159
193		-	~~<figure>~~
194		-	~~<img src="lazreptutconditionalhighlight.png" title=" center" />~~
195		-	~~<figcaption> center</figcaption>~~
196		-	~~</figure>~~
	160	+	![](/wiki-images/d/df/Lazreptutconditionalhighlight.png)
197	161
198	162		#### Una imagen es mejor que ...
199	163
200	164		Si no lo has hecho todavía, necesitaremos añadir un campo PHOTO a nuestro test de bases de datos; utilizando una sentencia SQL como esta (nota: desafortunadamente las distintas bases de datos utilizan sintaxis diferentes; BLOB puede ser CLOB,IMAGE,OLE...):
201	165
202	166		``` sql
203	167		ALTER TABLE EMPLOYEE ADD PHOTO BLOB;
204	168		```
205	169
206	170		Ahora añadamos algún test de datos - este ejemplo utiliza ficheros jpg - dentro del campo PHOTO por media de tu herramienta de bases de datos favorita. Nota: este es el modo en que trabaja DBImage de Delphi: justamente blobs binarios con datos de imagen. Por defecto Lazarus DBImage es más flexible y almacena la extensión del fichero antes de los datos de la imagen, permitiendo utilizar diferentes formatos de fichero. En aras de la simplicidad utilizaremos la modalidad de Delphi.
207	171
208	172		Ahora debemos indicar al reporte que debe tratar todos los datos de imagen como ficheros binarios en formato jpg. Haz Click en frReport1, ve al inspector de objetos, eventos, y comienza un procedimienton OnDBImageReader:
209	173
210	174		```delphi
211	175		procedure TForm1.frReport1DBImageRead(Sender: TObject; S: TStream;
212	176		var GraphExt: string);
213	177		begin
214	178		// Fuerza TDBImage a ser compatible con las características de Delphi: únicamente admite un tipo de fichero, e.g. jpg
215	179		// esto significa que los BLOBs de la base de datos deben ser ficheros binarios de formato jpg sin ningún otro dato.
216	180		GraphExt:='jpg';
217	181		end;
218	182		```
219	183
220	184		In File\>Variables List, añade el campo SQLQuery1.PHOTO como variable de campo Photo, de manera similar a como se hizo antes. En caso de que no se visualice el campo, puede que sea necesario establecer la SQLQuery del formulario a inactivo y de nuevo a activo para refrescar el listado de columnas. .
221	185
222	186		Click on the Insert image... icon on the left of the window; now click on the right side of the band to drop the image control. A Picture editor shows up:
223	187
224		-	~~<figure>~~
225		-	~~<img src="lazreptutpictureeditor.png" title=" center" />~~
226		-	~~<figcaption> center</figcaption>~~
227		-	~~</figure>~~
	188	+	![](/wiki-images/4/48/Lazreptutpictureeditor.png)
228	189
229	190		Si necesitas que se muestre siempre la misma imagen, simplemente necesitas hacer click Load ... (o hacer doble click en el control de imagen) y escoger tu imagen.
230	191
231	192		However, presionemos el botón Memo e insertemos una variable Photo:
232	193
233		-	~~<figure>~~
234		-	~~<img src="lazreptutphotofield.png" title=" center" />~~
235		-	~~<figcaption> center</figcaption>~~
236		-	~~</figure>~~
	194	+	![](/wiki-images/5/56/Lazreptutphotofield.png)
237	195
238	196		Esto pone la imagen dentro del objeto asociado al campo de datos. Presiona OK cuando necesites retornar al diseñador de reportes.
239	197
240	198		Ajusta la altura y el ancho a tus necesidades.
241	199
242	200		Además puedes presionar F11 para mostrar el Inspector de Objetos, el cual permite editar más si se necesita:
243	201
244		-	~~<figure>~~
245		-	~~<img src="lazreptutobjectinspector.png" title=" center" />~~
246		-	~~<figcaption> center</figcaption>~~
247		-	~~</figure>~~
	202	+	![](/wiki-images/b/b1/Lazreptutobjectinspector.png)
248	203
249	204		Cierra el editor de reportes y salva la definición del reporte (con el mismo nombre, lazreporttutorial.lrf).
250	205
251	206		Si vas a File\>Preview, verás que tu reporte incluye las imágenes.
252	207
253	208		Cierra el editor de reportes y salva las defniciones del reporte como lazreporttutorial.lrf.
254	209
255	210		### Detail data
256	211
257	212		To do: show how to use the detail part of master/detail. see e.g. sample in components/lazreport/samples/editor directory; see the button title "Master-Detail" Please write me.
258	213
259	214		### Loading the report from the form
260	215
261	216		Now let's write the code required to load and view or edit our report. To this add the following code to the project:
262	217
263	218		```delphi
264	219		TForm1.Button2Click(Sender procedure: TObject);
265	220		begin
266	221		frReport1.LoadFromFile('lazreporttutorial.lrf');
267	222		frReport1.ShowReport;
268	223		end;
269	224		TForm1.ButtonClick(Sender procedure: TObject);
270	225		begin
271	226		frReport1.LoadFromFile('lazreporttutorial.lrf');
272	227		frReport1.DesignReport;
273	228		end;
274	229		```
275	230
276	231		You have a preview option that gives end users a way to modify the report without changing the basic application.
277	232
278	233		### Imprimiendo
279	234
280	235		Ahora vamos a ir añadiendo características a nuestro ejemplo básico:
281	236
282	237		Añadimos un componente TButton con Caption := Print...' y un diálogo TPrintDialog. Detrás de la escena se debe añadir por parte del IDE una dependencia del paquete Printer4Lazarus por lo que hay que asegurarse de tener este paquete instalado. Add a TButton component with Caption := 'Print...', and a TPrintDialog. Behind the scenes, a project dependency on the
283	238
284	239		Finalmente tendremos esto:
285	240
286		-	~~<figure>~~
287		-	~~<img src="lazreptutformwithprintbutton.png" title=" center" />~~
288		-	~~<figcaption> center</figcaption>~~
289		-	~~</figure>~~
	241	+	![](/wiki-images/e/e3/Lazreptutformwithprintbutton.png)
290	242
291	243		Ahora añadimos la unidad printers a la claúsula uses del formulario.
292	244
293	245		Pon el siguiente código en el evento OnClick del pulsador Print:
294	246
295	247		```delphi
296	248		procedure TForm1.Button3Click(Sender: TObject);
297	249		var
298	250		FromPage, ToPage, NumberCopies: Integer;
299	251		ind: Integer;
300	252		Collap: Boolean;
301	253		begin
302	254		// Carga la definición del reporte desde el directorio de la aplicación
303	255		AppDirectory:=ExtractFilePath(ParamStr(0));
304	256		frReport1.LoadFromFile('lazreporttutorial.lrf');
305	257		// Necesitamos mantener la pista de que impresora está seleccionada originalmente para chequear cambios por parte del usuario
306	258		ind:= Printer.PrinterIndex;
307	259		// Prepara el reporte y para si obtenemos un error ya que continuar no tendría sentido en esta situación.
308	260		if not frReport1.PrepareReport then Exit;
309	261		// Establecemos un diálogo con información de valores por defecto que el usuario posteriormente puede cambiar.
310	262		with PrintDialog1 do
311	263		begin
312	264		Options:=[poPageNums ]; // permite seleccionar número/s de página/s
313	265		Copies:=1;
314	266		Collate:=true; // copias ordenadas
315	267		FromPage:=1; // página de comienzo
316	268		ToPage:=frReport1.EMFPages.Count; // página final
317	269		MaxPage:=frReport1.EMFPages.Count; // máximo número de páginas permitidas.
318	270		if Execute then // mostrar diálogo; si satisfactorio, procesa la feedback del usuario
319	271		begin
320	272		if (Printer.PrinterIndex <> ind ) // verify if selected printer has changed
321	273		or frReport1.CanRebuild // ... solamente tiene sentido si se puede reformatear el reporte
322	274		or frReport1.ChangePrinter(ind, Printer.PrinterIndex) //... entonces cambia de impresora
323	275		then
324	276		frReport1.PrepareReport //... y reformatear para una nueva impresora
325	277		else
326	278		exit; // we couldn't honour the printer change
327	279
328	280		if PrintDialog1.PrintRange = prPageNums then // user made page range selection
329	281		begin
330	282		FromPage:=PrintDialog1.FromPage; // primera página
331	283		ToPage:=PrintDialog1.ToPage; // última página
332	284		end;
333	285		NumberCopies:=PrintDialog1.Copies; // Número de copias
334	286		// Imprime el reporte utilizando las páginas solicitadas & número de copias.
335	287		frReport1.PrintPreparedReport(inttostr(FromPage)+'-'+inttostr(ToPage), NumberCopies);
336	288		end;
337	289		end;
338	290		end;
339	291		```
340	292
341	293		Es un poco largo, pero necesario, puedes crear un descendiente de TfrReport con un método o clase de impresión fácil, crear un procedimiento PrintReport (Report: string) para cargar el reporte e imprimir.
342	294
343	295		cuando hacemos doble click en frReport1, obtenemos ein the report designer File\>Page Options menu you get this:
344	296
345	297		Select paper size:
346	298
347		-	~~<figure>~~
348		-	~~<img src="lazreptutpapersize.png" title=" center" />~~
349		-	~~<figcaption> center</figcaption>~~
350		-	~~</figure>~~
	299	+	![](/wiki-images/9/90/Lazreptutpapersize.png)
351	300
352	301		Escoge los márgenes sque mejor se adapten a tu necesidad, número de columnas y espacio entre ellas, layout order, etc.
353	302
354		-	~~<figure>~~
355		-	~~<img src="lazreptutprintoptions.png" title=" center" />~~
356		-	~~<figcaption> center</figcaption>~~
357		-	~~</figure>~~
	303	+	![](/wiki-images/4/4a/Lazreptutprintoptions.png)
358	304
359	305		### Opciones de reporte
360	306
361	307		Via File\>Report Options you can set a default printer that will be used for the report (using the "Select when report loaded" checkbox).
362	308
363	309		Si necesitas incluir el número total de páginas con el número número de págica en cada página entonces necesitas seleccionar Two-pass report (lo cual indica a Lazreport que genere el reporte una segunda vez, insertando el número total de páginas en la segunda pasada).
364	310
365		-	~~<figure>~~
366		-	~~<img src="lazreptutreportoptions.png" title="lazreptutreportoptions.png" />~~
367		-	~~<figcaption>lazreptutreportoptions.png</figcaption>~~
368		-	~~</figure>~~
	311	+	![](/wiki-images/2/2e/Lazreptutreportoptions.png)
369	312
370	313		En la solapa Other, se pueden rellenar metadatos, tal como se muestra en el siguiente pantallazo:
371	314
372		-	~~<figure>~~
373		-	~~<img src="lazreptutreportoptionsother.png" title="lazreptutreportoptionsother.png" />~~
374		-	~~<figcaption>lazreptutreportoptionsother.png</figcaption>~~
375		-	~~</figure>~~
	315	+	![](/wiki-images/f/f6/Lazreptutreportoptionsother.png)
376	316
377	317		### Variables de propósito general
378	318
379	319		Ahora añadimos al ejemplo algunas variables del reporte no relacionadas con la base de datos. Permitirán por ejemplo mostrar diferentes nombres de acuerdo al contexto.
380	320
381	321		Para hacer esto, abre el editor de reportes y selecciona el menú de fichero y la variable List. Añade una categoría Test y una variable test1 del mismo modo que hicimos previamente (con un espacio antes del nombre de la variable):
382	322
383		-	~~<figure>~~
384		-	~~<img src="lazreptutvariableseditortestvar.png" title=" center" />~~
385		-	~~<figcaption> center</figcaption>~~
386		-	~~</figure>~~
	323	+	![](/wiki-images/8/8d/Lazreptutvariableseditortestvar.png)
387	324
388	325		La única diferencia es que no tendrás que seleccionar un valor de campo, pero deja None (el valor por defecto):
389	326
390		-	~~<figure>~~
391		-	~~<img src="lazreptutvariabletest.png" title=" center" />~~
392		-	~~<figcaption> center</figcaption>~~
393		-	~~</figure>~~
	327	+	![](/wiki-images/2/20/Lazreptutvariabletest.png)
394	328
395	329		Retorna a Lazarus (no olvides salvar el reporte, en caso necesario) y establece el evento OnGetValue'' del componentefrReport1''' añadiendo el siguiente código:
396	330
397	331		```delphi
398	332		procedure TForm1.frReport1GetValue(const ParName: String; var ParValue: Variant
399	333		);
400	334		begin
401	335		if ParName='test1' then
402	336		ParValue:='hola, soy el valor pasado a la variable test1';
403	337		end;
404	338		```
405	339
406	340		Se pueden pasar cadenas, fechas, números, de forma directa o mediante variables o constantes, por ejemplo es válido pasar edit1.Text o llamar a una función inclusive.
407	341
408	342		Alternativamente se puede además pasar el valor directamente a la variable utilizando el siguiente código:
409	343
410	344		```delphi
411	345		procedure TForm1.Button1Click(Sender:TObject);
412	346		begin
413	347		frReport1.Values.FindVariable('test').Field := QuotedStr('test1');
414	348		frReport1.ShowReport;
415	349		end;
416	350		```
417	351
418	352		## See also
419	353
420	354		- [[LazReport Tutorial/pt\|Tutorial de LazReport]] Version used as a basis for this translation.
421	355		- [[LazReport Documentation]]
422	356
423	357		---
424	358		From the Free Pascal wiki, page "LazReport Tutorial/es", as it stood on 2020-01-29 after a change by Skalogryz, out of the wiki's dump of 2024-05-26. Copyright stays with the author who wrote it, according to the old wiki's [[Licensing]] page. If you have concerns about this material, [message the admin](/wiki-contact).
425	359		Category: LazReport/es
426	360		Category: Lazarus/es
427	361		Category: Tutorials/es

Back to history