moin,
da Delphi bei Klassen/Objekten eh immer mit Zeigern arbeitet (und auch nur diese kopiert) kannst du die eigentlich die ganzen @s sparen.
Probiers einfach mal mit:
Delphi-Quellcode:
procedure TForm1.SelectField(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
begin
if PClickedField <> NIL then
PClickedField.Pen.Style := psClear;
PClickedField := Sender;
PClickedField.Pen.Style := psSolid;
end;