Ich habe in meinem Code ein etwas größeres Record. Manche Variablen umrande ich im Code mit einer TMultiReadExclusiveWriteSynchronizer Begin/End Read/Write. Das leider mehrmals.
Ich dachte nun daran das Record in eine Class umzuschreiben mit Gettern und Settern.
Bei den Gettern würde ich Begin/EndRead und bei den Settern Begin/EndWrite nutzen.
Aber wie schreibe ich ein Record in eine Klasse um, OHNE 1000 Stellen im Code ändern zu müssen?
Beispiel:
Delphi-Quellcode:
type
TMyData = record
a,b,c,d,e,f: string;
aa,bb,c,dd,ee,ff: Integer;
end;
// global verfügbar
var
aMyData: TMyData;