Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi tatsächliche und formale Var-Parameter (https://www.delphipraxis.net/44601-tatsaechliche-und-formale-var-parameter.html)

BenjaminHelbig 21. Apr 2005 13:49


tatsächliche und formale Var-Parameter
 
Hi liebe DP'ler,

ich habe folgendes Problem. Ich habe mein Programm an ein Com+ Objekt angebunden.
Das Objekt bietet mir die Prozedur "StartJob" an. Diese stoße ich folgendermaßen an:

Delphi-Quellcode:
Versand.StartJob(JobID, MyBool1, MyBool2, MyString3, MyString3, MyString2, MyBool3);
Leider bringt er mir bei MyBool1, MyString3 und MyBool3 den Fehler, dass die tatsächlichen und formalen Var-Parameter übereinstimmen müssen.
Ich habe das ganze aus VB adaptiert. Da funktioniert es auch einwandfrei. Die Deklaration der Prozedur die mir das Com Objekt zur verfügung stellt ist:

StartJob(JobID as Long, [CheckSchedules as Boolean = Wahr], [CheckCount as Boolean = Wahr], [PrinterDriver as String], [ExportPath as String], [ExportObjectName as String], [Overwrite as Boolean = falsch]) AS Boolean

In VB rufe ich das ganze mit:

Call Versand.StartJob(RS.Fields("JobID"), False, True, , , "AutoFax", True)

auf und es funktioniert einwandfrei. Aber Delphi meckert. :(

Liebe Grüße Ben

sniper_w 21. Apr 2005 13:51

Re: tatsächliche und formale Var-Parameter
 
Versuch es mit PChar statt mit string

Bernhard Geyer 21. Apr 2005 14:49

Re: tatsächliche und formale Var-Parameter
 
Wie schaut die Definition von StartJob in der importierten TLB.pas-Datei aus?

Robert Marquardt 21. Apr 2005 15:12

Re: tatsächliche und formale Var-Parameter
 
Das duerfte auch ein LongBool sein.

Bernhard Geyer 21. Apr 2005 19:44

Re: tatsächliche und formale Var-Parameter
 
Zitat:

Zitat von Robert Marquardt
Das duerfte auch ein LongBool sein.

Solange es keine var-Parameter sind dürften Delphi-Bools automatisch auf LongBool gewandelt werden können.


Alle Zeitangaben in WEZ +1. Es ist jetzt 00:17 Uhr.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz