Einzelnen Beitrag anzeigen

hedie

Registriert seit: 12. Dez 2005
Ort: Schweiz
1.024 Beiträge
 
Delphi XE6 Starter
 
#8

AW: PAnsiChar um weiteres PAnsiChar ergänzen

  Alt 4. Feb 2016, 19:44
Danke für eure Antworten.

Ein umstellen auf String ist nicht ganz so trivial.
Ich verwende die MySQL.pas unit welche mit der limysql.dll spricht.

Einer von vielen Abschnitten sieht wie folgt aus:

Delphi-Quellcode:
var
  _mysql_real_query: function (_mysql: PMYSQL; q: PAnsiChar; length: longword): longint; stdcall;

function mysql_real_query(_mysql: PMYSQL; q: PAnsiChar; length: longword): longint;
begin
  if @_mysql_real_query=nil
  then
    LoadProcAddress(@_mysql_real_query, 'mysql_real_query');
  Result := _mysql_real_query(_mysql, q, length);
end;

Offensichtlich, erwartet die DLL hier ein PAnsiChar.
So wie es aussieht, bleibt mir der Weg über StrCpy nicht erspart.
Claudio
Tu was du nicht lassen kannst
- http://endasmedia.ch
  Mit Zitat antworten Zitat