Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var a, b : PChar;
begin
caption := edit1.Text[1]+ ' '+edit1.Text[2];
a := @edit1.Text[1];
b := @edit1.Text[2];
Memo1.Lines.Add('a = '+a^+' '+inttostr(Cardinal(Addr(a^)))+' '+inttostr(Cardinal(a)));
Memo1.Lines.Add('b = '+b^+' '+inttostr(Cardinal(b)));
if a<b then
Memo1.Lines.Add('a<b is true')
else if a>b then
Memo1.Lines.Add('a>b is true')
else
Memo1.Lines.Add('a=b is true');
end;
Wenn ich also a und b vergleiche, heisst das, es werden eigentlich die Speicheraddressen zum Auswertung gebracht...Habe ich das richtig verstanden ?