chr Funktion in Delphi 2009

[roadrunner-S51]

Also müsste ich das AnsiChar-Feld UsedComm in einen PWideChar wandeln und alles wäre super?

[Neutral General]

Hallo,

Also du müsstest (wahrscheinlich) den Pointer auf das 5 Element (Index 4) auf einen PWideChar casten:

Delphi-Quellcode:

Result:=GetDefaultCommConfig(PWideChar(@UsedComm[4]),CommConfig,i) or GetDefaultCommConfig(UsedComm,CommConfig,i);

[roadrunner-S51]

Wenn ich das richtig verstehe will der Code aber das ganze Feld übergeben, oder? Das heißt ich müsste alle Elemente casten?

[Neutral General]

Ich weiß ja nicht genau was die Funktion haben will und was in dem Array drin steht.

Aber PWideChar(UsedComm[4]) ist quasi der String ab dem 5. Zeichen.

D.h.

Delphi-Quellcode:

var: S: Array[0..10] of AnsiChar;
begin
  S := 'Hallo Welt'; // Mal vereinfacht geschrieben. Nur zur Verdeutlichung
  PWideChar(@S[4]) ==> 'o Welt'
end;

[roadrunner-S51]

Danke für den Hinweis mit dem @!
Habe den Code nun so geändert:

Delphi-Quellcode:

Result:=GetDefaultCommConfig(PWideChar(@UsedComm[4]),CommConfig,i) or
          GetDefaultCommConfig(PWideChar(@UsedComm[0]),CommConfig,i);

Also müsste im ersten Teil, wie auch im Beipiel von NeutralGeneral das Feld ab dem 5. Element und im zweiten Teil das komplette Feld (ab dem 0. Element) konvertiert werden.

Ich jage das ganze dann nochmal durch den Debugger, mal schauen ob das so passt.

Erstmal danke an alle!
:thumb:

[roadrunner-S51]

Nach ausführlicher Prüfung und einem halben Nervenzusammenbruch habe ich nun den Fehler im Code gefunden. Mein Versuch, das AnsiString-Feld in eine PWideChar zu wandeln, lief einfach nicht so.

Leider besteht das Problem der Konvertierung immernoch und ich weiß leider nur, dass es so

Delphi-Quellcode:

H:=CreateFile(PWideChar(@UsedComm[0]),
    GENERIC_READ or GENERIC_WRITE,
    0,
    nil,
    OPEN_EXISTING,
    FILE_ATTRIBUTE_NORMAL or FILE_FLAG_OVERLAPPED,
    0);

nicht geht.

Hat jemand eine bessere und vor allem funktionierende Idee?

[mkinzler]

Einfach PAnsiChar verwenden

[Neutral General]

Hattest du es mal mit:

Delphi-Quellcode:

PChar(String(AnsiString(@UsedComm[0])))

versucht?

[roadrunner-S51]

Alles was mein Delphi dazu zu sagen hat ist leider:
[DCC Fataler Fehler] Autofrett.dpr(1): F2084 Interner Fehler: AV0529AB9B-R00000001-0

[Neutral General]

:mrgreen:

Also bei mir compiliert das ohne Probleme. Habe D2009.

Versuch vllt. mal nur:

Delphi-Quellcode:

PChar(String(@UsedComm[0]))