20 Jahre Deutsches Lazarusforum

Lade doch mal Deine PNG hoch. Dann könnte man konkretere Hilfe anbieten...

Jetzt funktionierts wunderbar:


uses
intf.XRechnungPdfExtract;

procedure TForm1.ExtractInvoiceWithLandrix(aPDFFile : String);
var
out_xml : TBytes;
out_info : TXRechnungPdfExtractInfo;
attachment_name : UnicodeString;

procedure SaveBytesToFile(const FileName: string; const Data: TBytes ...

Ganz so klein ist der Schritt nicht, schau gern mal in die von mir verlinkte Unit, da gibt es mehrere Varianten, wie eine pdf aufgebaut/verschlüsselt ist.
Ich hab die Unit gegen etwa 300 verschiedene E-Rechnungen laufen lassen, alle Anhänge wurden extrahiert. Also wenn was fehlt, gern Bescheid ...

im Package fcl-pdf gibt es ein "examples"-Verzeichnis. Darin findet man den Quellcode für das Konsolenprogramm pdfdump

procedure TPDFDumpApplication.Usage(Msg: String);
begin
Writeln('Usage ',ExtractFileName(ParamStr(0)),' [options] FILE1 FILE2 ...');
Writeln('Where options is one or more of ...

Wenn Sie den FPC-Trunk/Main (3.3.1) verwenden, verfügt dieser über den fppdfparser , der das Einlesen von PDF-Dateien ermöglichen sollte – soweit ich weiß, generiert er zwar keine Vorschau, kann aber Text und in der PDF-Datei eingebettete Objekte extrahieren: https://gitlab.com/freepascal.org/fpc ...

Hallo,

hat jemand ein Beispiel Programm, wie man mit Lazarus/FreePascal-Bordmittel (Package: fcl_pdf) eine XML-Datei aus einer ZUGFeRD-PDF extrahieren kann.

Bitte keine Antworten der Form:
"Ich weiß ja nicht wie das mit fcl_pdf geht, aber ich nehme dazu den JAVA-Aufruf aus dem Mustang-Projekt ...

Mir persönlich fehlt eine Möglichkeit mit Freepascal/Lazarus ZUGFeRD-xmls zu validieren.
Ich verwende momentan die CLI-Variante des MUSTANG-Validators aus www.mustangproject.org
Das ist im Prinzip der Aufruf einer JAV jar-Datei. Leider ist diese Art der Validierung furchtbar langsam, weil bei jeder ...

Mir persönlich fehlt eine Freepascal Implementierung für XSLT-Transformationen. Ich arbeite sehr viel mit XML-Dateien und brauche immer wieder XSLT-Transformationen. Leider habe ich noch kein Pendant in Freepascal/Lazarus gefunden, so dass ich gezwungen werde, externe XSLTPROC.exe WindowsProgramme ...

Also ich würde gerne mit Lazarus/Freepascal eine App erstellen können, die auf einem Android-Handy läuft.

Fritz


Dies ist theoretisch über zig Hausecken möglich.


Mit LAMW mittlerweile sogar recht einfach

@fliegermichl : Kannst Du mir ein recht einfaches Beispiel dafür zeigen, oder ein ...

Also ich würde gerne mit Lazarus/Freepascal eine App erstellen können, die auf einem Android-Handy läuft.

Fritz

Ich verstehe die Frage des Fragestellers so:

Er möchte eine allgemeingütige Procedure FensterAktivieren haben, die ungefähr so aussehen soll:


procedure FensterAktivieren(Form: TForm);
begin

// Falls minimiert, wieder normal machen
if Form.WindowState = wsMinimized then
Form.WindowState ...

Danke! Hat geholfen!

Hallo,

ich möchte in Lazarus-Code-Editor das EURO-Symbol ('€') eingeben. Das mache ich eigentlich intuitiv durch Drücken der "AltGr"-Taste + "E" = "€".
Mit Lazarus-Version 4.2 hat sich das geändert. Mit "AltGr"+"E" öffnet sich jetzt das "Example Projects"-Dialog-Fenster.
Lässt sich das ändern?

Das ...

Hallo,
hat jemand Erfahrung mit der Verwendung einer MongoDB unter Windows in einem Lazarus_GUI_Frontend_Programm
Ein Beispiel für die elementaren CRUD (Create, Read, Update, Delete) - Funktionen wäre erstmal ausreichend.

Viele Grüße aus Nürnberg
Fritz

var
DatFile: File of TMesswerte;

....
rs:=SizeOf(TMesswerte);
AssignFile(DatFile,EdDatFN.Text); { Vorhandenes File }
ReWrite(DatFile,rs); // Size of a Record
AnzRec:=FileSize(DatFile);
Seek(DatFile,AnzRec);
Write(DatFile,AktmessWerte); { einige Records anhängen }
Write(DatFile,AktmessWerte ...