Und wenn man der Form ein paar
published
Properties spendiert, dann geht das alles mit noch viel weniger.
Delphi-Quellcode:
TMyForm = class( TForm )
private
function GetFullName : string;
published
property FullName : string read GetFullName;
end;
funtion TMyForm.GetFullName : string;
begin
Result := EditVorname.Text + ' ' + EditNachname.Text;
end;
Der Zugriff erfolgt dann ganz simpel mit
GetPropValue
Wird also
FullName benötigt, dann
Value := GetPropValue( MyForm, 'FullName' );
, und da PropName ein string ist, kann man diesen Wert aus der Ini lesen und ganz easy den benötigten Wert auslesen.
Und mit Delphi 7 geht das auch
Kaum macht man's richtig - schon funktioniert's
Zertifikat: Sir Rufo (Fingerprint: ea 0a 4c 14 0d b6 3a a4 c1 c5 b9
dc 90 9d f0 e9 de 13 da 60)