Registriert seit: 21. Jul 2004
Ort: Ostfildern
1.096 Beiträge
FreePascal / Lazarus
|
Typisierte vs. Untypisierte Konstante
15. Jun 2009, 21:39
Hi,
Delphi-Quellcode:
program Project1;
{$mode objfpc}{$H+}
uses
{$IFDEF UNIX}{$IFDEF UseCThreads}
cthreads,
{$ENDIF}{$ENDIF}
Classes;
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;
WriteLn(foo = const1);
WriteLn(foo = const2);
end.
Code:
falter@PC0303:/tmp$ ./project1
FALSE
TRUE
falter@PC0303:/tmp$
Warum liefert das erste false?
Gruß
Felix
Felix Alter
|