[Lazarus-es] Problemas con Fpspreadsheet

Juan Perles perlesj en gmail.com
Sab Ene 2 10:40:54 CET 2016


Carlos, yo tampoco necesito los controles visuales, los necesitaba para seguir los tutoriales, ya que con las cosas simples(que es lo que yo necesito) no me funcionaba. Tu ejemplo me vale, pero si no es abusar de tí me podrías indicar como leerlo, ya que cuando quiero abrir la hoja para leerla me da el error:
External: SIGSEGV
En archivo 'xlscommon.pas' en línea 732.
Digo que quiero leerlo porque la hoja ya me viene dada.

Juan Perles
628.482.007
Enviado desde mi iPad

> El 2 ene 2016, a las 3:27, Carlos Enrique Rodriguez <cer en racssprg.com.ar> escribió:
> 
> Hola Juan,
>                  te pego un ejemplo básico del uso de la librería. Como dije antes, no uso los componentes visuales, así que puedo estar perdiéndome algunas novedades de las últimas versiones. En la semana, con una conexión a internet más decente, los bajo, pruebo y quizás te pueda ser de más ayuda. 
>                 Es importante que para usarlos de esta manera estén cargados en la ruta de las librerías del proyecto los fuentes a FPspreadSheet.
> 
> uses
>    fpspreadsheet, fpsallformats, laz_fpspreadsheet;
> 
> procedure EscribirXLS;
> const
>   OUTPUT_FORMAT = sfExcel5;
> var
>   elWorkbook: TsWorkbook;
>   laWorksheet: TsWorksheet;
>   valorNumerico: integer;
>   valorString: string;
> begin
>   valorNumerico := 1; //Valor integer que se va escribir en la celda
>   valorString:= 'Este dato va a la celda'; // Valor string que se vuelca a la celda
> 
>   elWorkbook := TsWorkbook.Create; // Se crea el libro
>   try
>     laWorksheet := elWorkbook.AddWorksheet('NombreHoja'); // Se le agrega una hoja al libro
>  
>     //Asiento los valores en la hoja con la forma(fila, columna, valor);
> 
>     laWorksheet.WriteNumber(1, 1, valorNumerico);
>     laWorksheet.WriteNumber(2, 1, valorNumerico);
>     laWorksheet.WriteNumber(3, 1, valorNumerico);
>     
>     laWorksheet.WriteUTF8Text(1, 2, valorString);
>     laWorksheet.WriteUTF8Text(2, 2, valorString);
>     laWorksheet.WriteUTF8Text(3, 2, valorString);
> 
>     // Grabo los datos en el archivo
> 
>     elWorkbook.WriteToFile('c:\prueba.xls', OUTPUT_FORMAT);
> 
>   finally
>     elWorkbook.Free;
>   end;
> end;
> 
>                 El ejemplo está simplificado (y no lo pasé por el compilador, pude haber metido la pata en alguna línea), pero es básicamente la funcionalidad que tienen mis programas. Espero que te sirva para avanzar con tu proyecto y cualquier cosa me preguntás.
> 
> 
> Saludos
> Carlos
> 
> 
>> El 01/01/2016 a las 17:56, Juan Perles escribió:
>> Sí, justamente cuando quiero incorporar a mi formulario el control sWorkbooksource es cuando me surge el problema porque no sé dónde encontrarlo.
>> 
>> Juan Perles
>> 628.482.007
>> Enviado desde mi iPad
> 
> _______________________________________________
> Lazarus-es mailing list
> Lazarus-es en lists.lazarus.freepascal.org
> http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus-es




More information about the Lazarus-es mailing list