C# Byte Array: Wie nach Delphi übersetzen?

[BlueStarHH]

Moin,

ich nutze eine DLL. Die Doku für die DLL hat leider nur C#-Beispiele. Wie kann ich diesen Code nach Delphi portieren?

Code:

byte[] btSignature = (byte[])axSTPadCapt1.SignatureSaveAsStreamEx(...); 

if (btSignature == null) { /*error*/ return; } 

MemoryStream memoryStream = new MemoryStream(btSignature); 
Image image = Image.FromStream(memoryStream);

Mir ist insbesondere nicht klar, wie Delphi die Größe von dem Byte-Array wissen soll? Oder braucht man die nicht? Danke!

[Der schöne Günther]

Ist das überhaupt eine DLL die du mit z.B. C++ oder Delphi benutzen kannst oder ist die für .NET?

[TiGü]

Dieser Schnipsel stammt ja von Seite 100 der Dokumentation https://www.signotec.com/downloads/d...ntation_de.pdf

Eine Seite weiter oben steht das unter der Überschrift 8.39.1 STPadCapt.ocx
Hast du das OCX-Control importiert?
Wenn du jetzt nur Fragezeichen in den Augen hast, bitte hier entlang:
https://www.delphipraxis.net/64403-o...einbinden.html

Wenn du kein OCX-Control importieren möchtest, steht auf Seite 102 etwas zur Anwendung der nativen Lösung (C/C++) mit der Funktion STSignatureSaveAsStreamEx aus der STPadLib.dll.
Wenn du dir die Funktionsdefiniton nach Delphi übersetzt hast, kannst du das C++-Beispiel ja fast 1:1 in Delphi umsetzen.
Hier wird der klassische Weg gegangen (allseits bekannt und beliebt von der WinApi):

Erst

Code:

STSignatureSaveAsStreamEx(NULL, &nSize, ...)

aufrufen um in nSize die Größe zu ermitteln, dann mit

Code:

pbtImage = new BYTE[nSize];

ein Array passender Größe erzeugen und mit

Code:

 STSignatureSaveAsStreamEx(pbtImage, &nSize, ...)

füllen.

[BlueStarHH]

Zitat von Der schöne Günther:

Ist das überhaupt eine DLL die du mit z.B. C++ oder Delphi benutzen kannst oder ist die für .NET?

Kann ich mit Delphi nutzen. Ich nutze auch andere Funktionen...

[BlueStarHH]

Zitat von TiGü:

Eine Seite weiter oben steht das unter der Überschrift 8.39.1 STPadCapt.ocx
Hast du das OCX-Control importiert?

Ich nutze die vom Hersteller bereitgestellte STPadCaptLib_TLB.pas Diese müsste die OCX importieren, wenn mich nicht alles täuscht.

In der STPadCaptLib_TLB.pas gibt es nur diese Funktion:

Code:

function SignatureSaveAsStreamEx(nResolution: Smallint; nWidth: Integer; nHeight: Integer; 
                                     nFileType: Smallint; nPenWidth: Smallint; penColor: OLE_COLOR; 
                                     nOptions: Integer): OleVariant;

Da muss NULL als erster Parameter rein? Und aus nWidth kommt dann die Größe des Arrays zurück? Ich bin gerade etwas verwirrt.

[BlueStarHH]

Habe es nun hinbekommen:

Code:

var
  Stream: TMemoryStream;
  Buffer: TBytes;
begin
  Buffer := STPadCapt1.SignatureSaveAsStreamEx(300, 0, 0, SIGNO_FILE_PNG, SIGNO_PEN_VAR_WIDTH, 0, 0);

  Stream := TMemoryStream.Create;
  Stream.WriteData(Buffer, Length(Buffer));
  Stream.SaveToFile('D:\test.png');
  Stream.Free;

[TiGü]

Zitat von BlueStarHH:

Da muss NULL als erster Parameter rein? Und aus nWidth kommt dann die Größe des Arrays zurück? Ich bin gerade etwas verwirrt.

Ne, meine Ausführung dazu basiert auf der nativen C/C++ mit direkter Nutzung der DLL.
Wenn du das mit der TLB und OCX machst, dann wird das schon intern abgefrühstückt.