FindComponent auch für property ???

[jim_raynor]

Bei GetPropInfo bekommst du einen Pointer auf einen Record TPropInfo zurück, der ein Feld Default hat. Da der allerdings nur ein LongInt ist, weiß ich net, was bei einer String-Property drin steht. Vielleicht garnichts, vielleicht aber auch der richtige String, bei einem entsprechende Cast:

Delphi-Quellcode:

var
  PropInfo: PPropInfo;
begin
  PropInfo:=GetPropInfo(Form1,'Caption');
  showmessaege(String(Pointer(PropInfo.Default));
end;

Keine Ahnung ob es klappt.

[Martin K]

Danke!
Bei Integer- und Boolean-Typen klappt's wunderbar (ordinale Typen).
Wenn man eben String() durch IntToStr() ersetzt.

Delphi-Quellcode:

IntToStr(GetPropInfo(Self,'Caption').Default

Bei einem String:
Mit IntToStr() wird -2147483648 zurückgeliefert,
String() löst eine AV aus.

Weiß jemand, wie man sonst noch -2147483648 in einen ordentlichen String umwandeln kann?

[jim_raynor]

Ha, wenn du mal in der Hilfe zu default schaust steht da:

Zitat:

default und nodefault werden nur für Ordinal- und Mengentypen unterstützt

Ergo. Gibts für Strings keinen Default wert.

[Martin K]

Okay, der normale Default-Wert eines Strings ist ja eigentlich auch immer '' (leerer String).

Wenn man mal in der dfm-Datei eines Projekts ein wenig rumspielt und hier ein paar Zeilen, wo irgendwelche Strings stehen einfach löscht (z.B.: Caption = 'Form1') - wenn man dann das Projekt in Delphi lädt wird man feststellen, dass an dieser Stelle überall leere Strings stehen.
Ergo: Der Default-String ist immer ''

Aber was ist dann mit -2147483648 ???
Ist das irgendwie der Integer-Wert eines leeren Strings?

[jfheins]

guck mal in die hilfe zu [oh]nodefault[/oh] ;)

Zitat:

Mithilfe des Bezeichners nodefault kann ein geerbter default-Wert ohne Angabe eines neues Wertes außer Kraft gesetzt werden. Die Direktiven default und nodefault werden nur für Ordinal- und Mengentypen unterstützt, bei denen die Ober- und Untergrenze des Basistyps einen Ordinalwert zwischen 0 und 31 hat. Enthält eine Eigenschaftsdeklaration weder default noch nodefault, gilt sie als mit nodefault definiert. Für Real-, Zeiger- und String-Typen gilt der implizite default-Wert 0 bzw. nil und '' (leerer String).

Hinweis: Sie können den ordinalen Wert 2147483648 nicht als Standardwert verwenden. Dieser Wert wird intern für die Darstellung von nodefault verwendet.

[Martin K]

Aha.

Ich sollte wohl doch mal ab und zu wieder in die Hilfe schauen :wink:

Danke nochmal!