Einzelnen Beitrag anzeigen

TurboMartin

Registriert seit: 13. Feb 2006
Ort: Bad Honnef
765 Beiträge
 
Turbo Delphi für Win32
 
#7

Re: [MYSql] Kann nicht Connecten: Fehler: 湕&#

  Alt 12. Mär 2009, 17:17
Zitat von Bernhard Geyer:
Zitat von sarte:
Delphi zeigt mir keine Warnmeldungen an, das würde ich sonst beim Strukturfenster sehen.
Ok, hab nachgeschaut. Die DLL-Funktionsdefinitonen müssen alle angepaßt werden. Von PChar -> PAnsiChar.

Statt:
mysql_connect: function(_mysql: PMYSQL; const host, user, passwd: pChar): PMYSQL; stdcall; muss es heißen:
mysql_connect: function(_mysql: PMYSQL; const host, user, passwd: pAnsiChar): PMYSQL; stdcall; Dann statt:

Delphi-Quellcode:
  TMYSQL_FIELD = record
    name: pChar; // Name of column
    table: pChar; // Table of column if column was a field
    def: pChar; // Default value (set by mysql_list_fields)
    _type: enum_field_types; // Type of field. Se mysql_com.h for types
    length: longword; // Width of column
    max_length: longword; // Max width of selected set
    flags: longword; // Div flags
    decimals: longword; // Number of decimals in field
  end;
muß es
Delphi-Quellcode:
  TMYSQL_FIELD = record
    name: pAnsiChar; // Name of column
    table: pAnsiChar; // Table of column if column was a field
    def: pChar; // Default value (set by mysql_list_fields)
    _type: enum_field_types; // Type of field. Se mysql_com.h for types
    length: longword; // Width of column
    max_length: longword; // Max width of selected set
    flags: longword; // Div flags
    decimals: longword; // Number of decimals in field
  end;
etc, etc, ...
Kann es nicht sein dass er noch mit D7 programmiert?

Zitat von sarte:
Du weißt nicht zufällig wie man das herausfindet?
Frag am besten beim Support nach, ob die es erlauben.
Tomorrow will be cancelled due to lack of interest.

  Mit Zitat antworten Zitat