PChar in Delphi 7

[kwhk]

Hallo, ich bin gerade dabei, einige SourceCodes, die noch für Delphi 3 entwickelt wurden, für Delphi 7 anzupassen. Dabei habe ich z.B. so etwas

Delphi-Quellcode:

Procedure xxx(sTx : AnsiString, sTit : AnsiString);
Begin
  if Application.MessageBox
   ( PChar(sTx),
     PChar(sTit),
     MB_OK ) = 0 then Begin End;
End;

Wenn ich die Warnungen Unsicherer Typ nicht ausschalte, bekomme ich immer folgende Warnung angezeigt.
[Warnung] xxx.pas(148): Unsicherer Typ 'PChar'
Ich habe beim Googeln gefunden, daß das etwas mit .NET usw. zu tun hat. Ich kann auch die Warnung unterdrücken. Ich möchte aber gern wissen, wie ich Application.MessageBox korrekt ohne PChar aufrufen soll. In C++ benutze ich ja ausschliesslich PChar, d.h. einen NULL-terminierten String 'xxxxx',0x00.
Das Programm selbst funktioniert einwandfrei.
Die Delphi-7-Hilfe zeigt es ja so, wie ich es geschrieben habe, an.

[DeddyH]

Schau mal hier: http://entwickler-forum.de/showthrea...-Typumwandlung

[sx2008]

Delphi 7 hat einige Projektoptionen, die den Compiler ganz erheblich ausbremsen.
Dazu gehört diese Prüfung der "unsicheren Typumwandlung".
Leider kann ich nicht genau sagen um welche Optionen es sich handelt;
soweit ich mich erinnern kann stehen sie ganz am Anfang und am Ende der Optionenliste und es müssten einmal 3 und dann noch 6 Optionen sein.

[kwhk]

Die Optionen sind ja schnell so eingestellt. Offernbar gibt es keine warnungsfreie Codiermöglichkeit. Wie ruft man denn in den neueren Delphi-Versionen Aplication.MessageBox auf ?

[DeddyH]

Am Aufruf hat sich nichts geändert: TApplication.MessageBox, außer dass PChar nun nicht mehr PAnsiChar, sondern PWideChar ist.

[kwhk]

In Deiner Hilfe steht ja ebenfalls PChar, genau wie bei Delphi 7, die API-Funktion erwartet das auch so, egal ob Delphi, C++ oder irgend ein anderer Compiler.
Ich habe PChar mal durch PWideChar ersetzt, da bekomme ich folgenden Fehler.

[Fehler] CompHKwPgm.pas(2448): Inkompatible Typen: 'WideChar' und 'Char'

WideChar bedeutet eigentlich, daß pro Zeichen 2 Bytes benutzt werden, bei Char jeweils nur 1 Byte pro Zeichen. Application.MessageBox will doch Char und nicht WideChar.

[Der schöne Günther]

Du hast ja auch nach neueren Delphi-Versionene gefragt

[DeddyH]

Eben, mit PAnsiChar wird es funktionieren (in Delphi <= 2007).

[kwhk]

Zitat:

Du hast ja auch nach neueren Delphi-Versionene gefragt

Ja, aber in der XE3-Hilfe wurde doch wieder PChar angezeigt, genau wie bei Delphi 7. Nun mag das dabei ein WideChar sein, das angebliche .NET Sicherheitsproblem ist dabei doch dasselbe, ein Pointer auf den Anfang eines Stringes, dessen Ende man erst suchen muss.

Zitat:

Eben, mit PAnsiChar wird es funktionieren (in Delphi <= 2007).

Bei Delphi 7 kommt mit PAnsiChar dergleiche Warnhinweis, wie bei PChar, ich habe beides ausprobiert.

[Der schöne Günther]

PChar ist ja bei neueren Versionen ein Alias für PWideChar . Früher war ein PChar das, was heute ein PAnsiChar ist.

Der Warnhinweis hat damit nichts zu tun, der möchte dir nur sagen "Vorsicht bei Zeigern".