Einzelnen Beitrag anzeigen

torud

Registriert seit: 26. Jul 2002
Ort: Sachsen
1.198 Beiträge
 
Delphi XE5 Professional
 
#5

Re: Setzen von Font.Style funzt nicht wirklich

  Alt 3. Jan 2006, 13:23
FormDesigner ist eine externe Komponente. Deshalb wirst Du nix finden in der Hilfe.

Und ja das Ereignis wir OnClick der Checkbox ausgelöst:

Delphi-Quellcode:
procedure Tobj_properties.chk_lineClick(Sender: TObject);
begin
    if chk_bold.Checked then
      ((form2.FormDesigner1.Control as TLabel).Font.Style:=
       (form2.FormDesigner1.Control as TLabel).Font.Style + [fsUnderline])
    else
      ((form2.FormDesigner1.Control as TLabel).Font.Style:=
       (form2.FormDesigner1.Control as TLabel).Font.Style - [fsUnderline]);
end;
Die Checkbox ist nur dann sichtbar, wenn es sich bei dem Control wirklich um Label handelt. Wie gesagt ich will dem Label je nach Checkboxzustand was zuweisen und das klappt schon teilweise, aber leider nicht immer und ich habe keine Ahnung warum. Ich werde mal ein Testprojekt stricken...
Danke
Tom
  Mit Zitat antworten Zitat