chr Funktion in Delphi 2009

[roadrunner-S51]

Hab meinen PC mal neu gestartet und nun klappts auch mit der Kompilierung. Hatte sicher noch irgendwelchen Datenmüll im Speicher...

So, nun passt alles!

Delphi-Quellcode:

H:=CreateFile(PChar(String(UsedComm)),
    GENERIC_READ or GENERIC_WRITE,
    0,
    nil,
    OPEN_EXISTING,
    FILE_ATTRIBUTE_NORMAL or FILE_FLAG_OVERLAPPED,
    0);

Das @ und die Angabe des Feldelementes waren irgendwie störend.

@Neutral General: Dankeschön!!!

[himitsu]

ich weiß nicht wie oft ich das schon runterprädige:
Keine Ansi/Wide/dynamischen Varianten mischen!

CreateFile + PChar (Char / String) - diese sind seit Delphi 2009 Unicode und davor Ansi
CreateFileA + PAnsiChar (AnsiChar / AnsiString)
CreateFileW + PWideChar (WideChar / WideString / UnicodeString)

[roadrunner-S51]

Das ist schon richtig, aber manchmal nicht so einfach, wenn man 10 Jahre alten Code hat (schlecht kommentiert), der plötzlich in Delphi 2009 und mit anderer Pheriperie funktionieren soll. Da ist man dann irgedwie doch mal bereit, auch "Umwege" in Kauf zu nehmen.

[himitsu]

Wenn UsedComm als AnsiString/AnsiArray vorliegt, dann

CreateFileW(PWideChar(WideString(UsedComm)), ... (AnsiString >> WideString > PWideChar > CreateFileW)

oder einfach nur
CreateFileA(@UsedComm[0], ... (AnsiChar-Array > PAnsiChar > CreateFileA)

Durch die Umwandlung nach Unicode gewinnt man eh keine zusätzlichen Informationen.

[roadrunner-S51]

Danke! Das werde ich mir für das nächste Mal merken. Wie ich den Code der Programme hier kenne, wird das eher früher als später sein...