[Lazarus-es] lazreport matriz

Claudio Romero clauslack en gmail.com
Lun Ago 2 16:39:13 CEST 2010


Yo le agregue los caracteres

procedure ImprimirCadenaRaw(S:String);
const Kenter=CHR(13)+CHR(10);
var  Written: Integer;
begin
    Written:=0;
    S:=S+Kenter;
    Printer.Write(S[1], Length(S), Written);
end;




More information about the Lazarus-es mailing list