关于改变对象属性的问题?
haozi 2002-03-22 09:33:48 procedure TForm1.MarkColumnClick(Sender: TObject);
var
Column: TColumn;
begin
MarkColumn.Checked := not(MarkColumn.Checked);
Column := DBGrid1.Columns.Items[DBGrid1.SelectedIndex];
请问这里 Column 对象获得的是原值的拷贝还是原值的地址。
为什么在下面的语句中可以直接的改变原对象的属性。
请高手解答。
我从C++转过来的,不能理解。
if (MarkColumn.Checked) then begin
Column.Font.Color := NEWCOLOR;
Column.Font.Style := [fsBold];
FTaggedColumns.Add(Column);
end else begin
Column.Font.Color := FDefaultColor;
Column.Font.Style := [];
FTaggedColumns.Remove(Column);
end;
HandleCaption;
end;