привет, очень хочется странного:
Код:
tsomeclass = class( TPersistent )
private
Fabc: Integer;
procedure Setabc(const Value: Integer);
published
property abc : Integer read Fabc write Setabc;
end ;
....
procedure tsomeclass.Setabc(const Value: Integer);
begin
Fabc := Value;
// здесь хочу получить строку содержащую имя property ('abc')
// а в идеале вообще TPropInfo для этого property
// но согласен даже на имя самого сеттера ('Setabc')
end;
в частности хочется автоматом апдейтить базу данных при изменении значения property
помогайте, если не перевелись дельфисты ;-
готов увидеть любые извращения. важен результат
ps. версия дельфи номер семь