AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Programmieren allgemein Aufruf Delphi-Dll von DotNet, Probleme mit struct-Parameter
Thema durchsuchen
Ansicht
Themen-Optionen

Aufruf Delphi-Dll von DotNet, Probleme mit struct-Parameter

Ein Thema von JFB · begonnen am 17. Jul 2018 · letzter Beitrag vom 18. Jul 2018
Antwort Antwort
Benutzerbild von himitsu
himitsu

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
44.343 Beiträge
 
Delphi 12 Athens
 
#1

AW: Aufruf Delphi-Dll von DotNet, Probleme mit struct-Parameter

  Alt 18. Jul 2018, 09:41
Statt AnsiString vielleicht WideString ... .NET sollte doch auch mit einem BSTR zurecht kommen?

Zumindestens ist es keine gute praktische Idee Delphi-Typen zu tauschen.
PAnsiChar, PWideChar oder eben BSTR, wobei Letzerer seine eigene Speicherverwaltung hat, welche von beiden Systemen angesprochen werden kann.

[edit]
Ups, TiGü übersehn.
Ein Therapeut entspricht 1024 Gigapeut.

Geändert von himitsu (18. Jul 2018 um 09:45 Uhr)
  Mit Zitat antworten Zitat
TiGü

Registriert seit: 6. Apr 2011
Ort: Berlin
3.073 Beiträge
 
Delphi 10.4 Sydney
 
#2

AW: Aufruf Delphi-Dll von DotNet, Probleme mit struct-Parameter

  Alt 18. Jul 2018, 09:47

[edit]
Ups, TiGü übersehn.
Die nächsten Beiträge schreibe ich in animierter Flammenschrift (Größe 36)...
  Mit Zitat antworten Zitat
EWeiss
(Gast)

n/a Beiträge
 
#3

AW: Aufruf Delphi-Dll von DotNet, Probleme mit struct-Parameter

  Alt 18. Jul 2018, 09:50
bsp. von meiner LIB

*.dll

Delphi-Quellcode:
function BASSVIS_GetVersion: PAnsiChar; stdcall;

const
  cverfor = '%d.%d.%d.%d';

var
  ver : TBASSVIS_VERSION;
  str : string;
begin
  ver := GetVersionNumber;
  str := format(cverfor,[ver.Major,ver.Minor,ver.Special,ver.Build]);
  result := PAnsiChar(Ansistring(str));

end;
managed dll C#
Code:
    //BASSVIS_GetVersion
    public static string BASSVIS_GetVersion()
    {
      IntPtr ptr = BASSVIS_GetVersionPtr();
      if (ptr != IntPtr.Zero)
      {
        return Marshal.PtrToStringAnsi(ptr);
      }
      return null;
    }
    [DllImport("bass_vis.dll", EntryPoint = "BASSVIS_GetVersion", CharSet = CharSet.Auto)]
    private static extern IntPtr BASSVIS_GetVersionPtr();
Aber er scheint ja seine Lösung gefunden zu haben.

gruss
  Mit Zitat antworten Zitat
Antwort Antwort


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 18:23 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