Fehler überprüfen, Turbo Delphi 32 u. Delphi 2007 o. RAD St.

[Daniel B]

Hallo,

ich habe im Moment einen Fehler mit Turbo Delphi Win32 und es geht mir gerade so richtig auf den Sa**. Vielleicht könnte das bitte jemand überprüfen. Gegenprobe mit Delphi 2007 oder RAD studio 2007 wäre sinnvoll, sonst muss ich was neues kaufen, aber ich will erst wissen ob es dann wenigstens weg ist. :/

Es reicht wenn man einfach ein neues VCL-Projekt macht und ein LabeledEdit drauf, dann die Caption löschen, anschliessendes kompilieren ist egal. IDE schliessen und wieder öffnen, nun ist Caption = Name des Objekts. Das ist absicht das manche keine haben, erst einmal, die kommt dann später, aber der User soll natürlich erst einmal nichts sehen und das kanns doch nicht sein. Wäre super wenn das jemand mal probieren könnte. Das Ganze unter Vista Business bei mir.

[TBx]

Hallo Daniel,

ich kann gerade nicht auf der gewünschten Version testen, kann Dir aber erklären, woher der Effekt kommt:

Beim setzen des Namens des TLabeledEdit wird überprüft, ob das zugehörige Label eine Caption hat. Ist dies nicht der Fall, so wird diese mit dem Namen des LabeledEdit gefüllt.
Kannst Du in der Unit ExCtrls angucken:

Delphi-Quellcode:

procedure TCustomLabeledEdit.SetName(const Value: TComponentName);
begin
  if (csDesigning in ComponentState) and ((FEditlabel.GetTextLen = 0) or
     (CompareText(FEditLabel.Caption, Name) = 0)) then
    FEditLabel.Caption := Value;
  inherited SetName(Value);
  if csDesigning in ComponentState then
    Text := '';
end;

Als einfachste Möglichkeit, dies zu umgehen, fällt mir adhoc nur ein, die Caption einfach mit einem Leerzeichen zu fülen.

Hoffe, das hilft Dir weiter.

Gruß

onlinekater

[mkinzler]

Oder eine abgeleitete Komponentenklasse erzeugen, welche dieses Verhalten nicht hat.