Autor Beitrag
PLuS
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic star
Beiträge: 98

Win XP, Suse Linux 9.0
D5 Standard, D2005 Personal; Perl; PureBasic
BeitragVerfasst: Sa 14.10.06 19:05 
Halli Hallo!

Ich bin im Moment dabei, eine meiner Applikationen für mehrere Sprachen fit zu machen, mithilfe von Language-Files.

Jetzt habe ich meiner Form eigene Properties (strings) hinzugefügt, die ich ebenfalls ändern möchte.
Das Setzen der Properties mache ich bei anderen Controls mit SetPropValue (die Abfrage vorher mit GetPropInfo).

Doch bei meinen eigenen Properties scheint dies nicht zu funktionieren. Gibt es eine Möglichkeit, diese Properties in der ClassInfo der Form zu "registrieren", sodass ich dann darauf zugreifen kann?

Oder vielleicht fällt ja jemandem auch eine ganz andere Möglichkeit ein, wie ich meine Variablen setzen kann! :D


Vielen Dank für die Aufmerksamkeit :P

Thomas

_________________
Der letzte macht die Tür zu!
PLuS Threadstarter
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic star
Beiträge: 98

Win XP, Suse Linux 9.0
D5 Standard, D2005 Personal; Perl; PureBasic
BeitragVerfasst: So 15.10.06 22:04 
Nochmal zur Erläuterung hier ein Beispiel:

ausblenden Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
uses TypInfo;

//...

Type
  TForm1 = class(TForm)
  private
    FProp: string;
  public
    property MyProperty: string read FProp;
  end;

var
  Form1: TForm1;
//...

function FindProperty: Boolean;
var
  PropertyInfo: PPropInfo;
begin
  PropertyInfo := GetPropInfo(Form1.ClassInfo, 'MyProperty');
  if assigned(PropertyInfo) then
    Result := True
  else Result := False;
end;


So ungefähr (natürlich etwas vereinfacht) sieht das bei mir aus. Doch er findet diese Property einfach nicht!


Die einzige Lösung, die mir einfällt, ist, dass ich in die entsprechende Klasse ein assoziatives Array packe, in der ich dann auf die Strings zugreifen kann, jedoch ist meine "Language-Klasse" wieder davon abhängig.


P.S.: Achja: *push*

_________________
Der letzte macht die Tür zu!
PLuS Threadstarter
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic star
Beiträge: 98

Win XP, Suse Linux 9.0
D5 Standard, D2005 Personal; Perl; PureBasic
BeitragVerfasst: Mo 16.10.06 07:59 
Ich habe meinen Fehler gefunden: Ich habe nicht bedacht, dass die Properties published sein müssen.

_________________
Der letzte macht die Tür zu!