Registriert seit: 27. Nov 2017
2.490 Beiträge
Delphi 7 Professional
|
AW: TLB Datei importieren Delphi 7
25. Jul 2024, 11:48
Danke, ist gefühlt 100 Jahre her als ich Delphi noch programmiert hatte. Habe zwar immer Kleinigkeiten gemacht, aber wirklich nicht viel. Hauptsache die Anwendung läuft.
Vlt, eins noch dazu:
Wie muss ich einen Parm angeben, der als var in der Prozedur definiert ist?
alo.SaveXML('c:\temp\test1.xml', LicenseKey, 0);
in der pas Datei ist es so definiert:
function SaveXML(const XMLPath: WideString; const LicenseKey: WideString;
var ZUGFeRDInvoiceStandard: ZUGFeRDVersion): WordBool; safecall;
ZUGFeRDVersion ist als TOleEnum definiert, warum auch immer.
Delphi-Quellcode:
var
ZUGFeRDInvoiceStandard : TOleEnum;
begin
if SaveXML(XMLPath, LicenseKey, ZUGFeRDInvoiceStandard) then begin
// Hier mit dem weitermachen, was nach dem Speichern der XML geschehen soll.
// Muss mit ZUGFeRDInvoiceStandard irgendwas passieren oder kann der Rückgabewert
// in ZUGFeRDInvoiceStandard ignoriert werden ...?
ShowMessage(' SaveXML erfolgreich ausgeführt.');
end else begin
// Hier näturlich eine sinnvolle Fehlerbehandlung einbauen.
ShowMessage(' SaveXML war nicht erfolgreich.');
end;
end;
|
|
Zitat
|