Pointer auf Richedit und Fontänderung

[jim_raynor]

Delphi-Quellcode:

procedure TForm1.FormCreate(Sender: TObject);
begin
  Form1.Tag := Integer(@RichEdit1);
end;

Das ist ja auch schon mal Falsch. Durch das @ bekommst du die Adresse der Variable RichEdit1 raus. Nicht die Adresse des Richedit.


Schreibst du:

Delphi-Quellcode:

procedure TForm1.FormCreate(Sender: TObject);
begin
  Form1.Tag := Integer(RichEdit1);
end;

(ohne das @) funktioniert es auch in Delphi 7 ohne Probleme!

[edit]Alle Objekte werden als Pointer behandelt!!![/edit]