Mailing lists / lazarus-es / 2015-07
10 messages · 4 people · –
Reply by email Subscribe to this list Your subscription
Read-only archive. Use j and k to move between messages.
que es lo mejor y simple que viene? lazreport era una opcion pero no logro instalarla, me da error al construir
Que sistema operativo usas?
Que error te da?
Yo lo instale sin problema alguno en winxp
Pero te recomiendo que actualices a 1.4.2
Saludos Cordiales
========
| ISMAEL |
========
Only for the small landowners and Cubans companies Website: www.sisconge.byethost15.com
www.sisconge.hol.es
2015-07-17 9:57 GMT-03:00 Ismael L. Donis Garcia <slibre en citricos.co.cu>:
Al final pude instalarlo, el error es en el paquete lazexportpdf. que se necesita para exportar a pdf?
Si pero para eso necesitas en paquete powerpdf que no viene con lazarus no se porque, yo lo tengo si no lo has buscado te lo puedo mandar o tu buscarlo.
Saludos Reiterados
========
| ISMAEL |
========
Only for the small landowners and Cubans companies Website: www.sisconge.byethost15.com
www.sisconge.hol.es
gracias , ya lo busco
El d�a 17 de julio de 2015, 12:06, Ismael L. Donis Garcia <slibre en citricos.co.cu> escribi�:
como se hacen los saltos de pagina por grupo? es diferente a la version delphi
El d�a 17 de julio de 2015, 14:32, Maxi <maximiliano.duarte en gmail.com> escribi�:
Mi correo es el que aparece arriba bajo From (tu ya sabes �no?), �salo y quedamos bajo una sesi�n de TeamViewer y te ayudo en lo que buenamente pueda.
Un abrazo.
PD: Te mando algunos links por si alguno de ellos te es v�lido
http://www.getlazarus.org/forums/viewtopic.php?t=6
http://professorcarlos.blogspot.ro/2010/06/lazarus-dicas-de-lazreport.html http://delphiaccess.com/foros/index.php/topic/5457-%C2%BFcomo-instalar-lazreport/
https://groups.google.com/forum/#!topic/freepascalhispano/zOZNT8Ky7yo http://wiki.freepascal.org/LazReport_Documentation/es http://wiki.lazarus.freepascal.org/LazReport_Tutorial/es ------------ pr�xima parte ------------
Se ha borrado un adjunto en formato HTML...
URL: <http://lists.lazarus.freepascal.org/pipermail/lazarus-es/attachments/20150718/476401d9/attachment.html>
como se hacen los saltos de pagina por grupo? es diferente a la version delphi El d�a…
En el encabezamiento del grupo das click secundario y marcas las opci�n de Forzar Nueva P�gina.
Respecto a Delphi ni me preguntes. Jamas en la vida lo he usado, nunca me ha gustado. En windows siempre hab�a trabajado con Visual Estudio.
He mirado a Lazarus porque es libre y multiplataforma y como yo me he tirado ultimamente para Linux, soy el encargado en mi empresa en difundir el soft libre. De hecho el sistema operativo que uso por defecto es Jessie, aunque tengo PC virtuales con 1 mill�n de sistemas porque viy haciendo estudios de los que puedo hacerme, ahora mismo estoy mirando a Manjaro OpenRC el cual ha tenido una bueba aceptaci�n.
En estos momentos estoy parado en Lazarus, hoy voy a instalar la versi�n 1.4.2 a ver si me resuelve un problema que tengo precisamente con lazreport el cual me da una ecepci�n si cierro todos los formulario abiertos desde un modulo de datos y los vuelvo a abrir. Al volver abrir los formulario y tratar de visualizar algo en lazreport este tira una ecepci�n y me cierra el programa la rutina que tengo para cerrar los formularios es la siguiente:
procedure Tdm.IniSis();
var
f: Tforigen;
i: integer;
begin
DecimalSeparator:='.';
ThousandSeparator:=',';
ShortDateFormat := 'dd/mm/yyyy';
blnend := false;
intciclo := 0;
intfilas := 0;
intnivel := 0;
lngentidad := 0;
struser := '';
strerror := '';
for i := Screen.FormCount - 1 downto 0 do begin
if Screen.Forms[i].Name Self.Name then begin
if Screen.Forms[i].Name 'fconta' then Screen.Forms[i].Free;
end;
end;
for i := Screen.FormCount - 1 downto 0 do begin
if Screen.Forms[i].Name Self.Name then Screen.Forms[i].Free;
end;
Application.CreateForm(Tfconta, fconta);
Application.CreateForm(Tfsplash, fsplash);
fsplash.Show;
Application.ProcessMessages;
if datos() then
entrar()
else
begin
f:=Tforigen.Create(Self);
f.IniSystem:=true;
f.ShowModal;
f.Free;
if blnend then
cerrarme()
else if datos() then
begin
intciclo := intciclo + 1;
entrar()
end
else
cerrarme();
end;
end;El error que me da es el siguiente:
El proyecto XXXX ha lanzado una excepci�n de la clase �xternal: SIGSEGV' En Archivo '.\include\control.inc'en linea 3260
Pero no veo cual puede ser el error porque si no cierro los formularios con la rutina anterior nunca me da ese error, lo peor del caso es que a veces si tengo que utilizar ese procedimiento.
Por ese motivo voy a instalar la versi�n 1.4.2 a ver si persiste el problema.
Saludos Cordiales
========
| ISMAEL |
========
Only for the small landowners and Cubans companies Website: www.sisconge.byethost15.com
www.sisconge.hol.es
El error creo eta en como plannteaste esa rutina. La veo mejor desde mi pc y te ayudo
Es procedimiento es p�blico y lo llamo en el evento create del modulo de datos pero tambien lo llamo en otros formularios:
Desde el modulo de datos
procedure Tdm.DataModuleCreate(Sender: TObject);
begin
IniSis();
end;Desde otro formulario lo mando a ejecutar de 2 formas seg�n sea el caso:
procedure Tfconta.mnuarcsecClick(Sender: TObject);
begin
dm.IniSis();
end;
procedure Tfconta.mnuherccClick(Sender: TObject);
begin
with Tfcpass.Create(nil) do
try
Showmodal;
finally
Free;
end;
if dm.CerrarSystem then dm.IniSis();
end;y de otros formularios lo llamo de la siguiente forma:
procedure Tfcini.FormShow(Sender: TObject);
var
strsql: string;
LParam, LValor: TStrings;
begin
LParam := TStringList.Create;
LValor := TStringList.Create;
LParam.Add('iID');
LValor.Add(inttostr(dm.Entidad));
strsql := 'select * from tabla';
dm.p_rssc1(strsql, true, LParam, LValor);
if dm.rssc1.EOF then begin
LParam.Free;
LValor.Free;
dm.p_rssc1();
dm.IniSis();
else
.....Saludos Reiterados
========
| ISMAEL |
========
Only for the small landowners and Cubans companies Website: www.sisconge.byethost15.com
www.sisconge.hol.es