Ach so meinst du das. Dann bleibt dir nur die Typisierung oder ein Vergleich des Speichers:
Delphi-Quellcode:
program Project196;
{$APPTYPE CONSOLE}
uses
SysUtils;
const
const1 = 'HALLO'#0#0#0;
const2: array[0..7] of AnsiChar = 'HALLO'#0#0#0;
var
foo: array[0..7] of AnsiChar;
begin
foo := const1;
if Length(const1) = Length(foo) then
WriteLn(CompareMem(@foo, PChar(const1), Length(foo)))
else
WriteLn('Fehlerhafte Länge der Signatur!');
WriteLn(CompareMem(@foo, @const2, Length(foo)));
end.
So klappt der Vergleich, aber durch die fehlende Typisierung sollte wie hier im Beispiel eine falsche Länge der Konstante ggf. abgefangen werden.