Einzelnen Beitrag anzeigen

Hawkeye219

Registriert seit: 18. Feb 2006
Ort: Stolberg
2.227 Beiträge
 
Delphi 2010 Professional
 
#2

Re: Ausrichten der RadioButons innerhalb der cxRadioGroup

  Alt 24. Nov 2006, 21:38
Hi Darkchild,

du hast nichts übersehen, es gibt keine Eigenschaft zum Einstellen der Ausrichtung. Mit einer etwas unsauberen Methode kannst du das gewünschte Aussehen aber dennoch erzwingen:

Delphi-Quellcode:
procedure SetButtonAlignment (aRadioGroup: TCustomRadioGroup; aAlignment: TLeftRight);
var
  i : Integer;
begin
  aRadioGroup.Perform(CM_FONTCHANGED, 0, 0);
  for i := 0 to aRadioGroup.ControlCount - 1 do
    if (aRadioGroup.Controls[i] is TRadioButton) then
      with TRadioButton(aRadioGroup.Controls[i]) do
        begin
          Alignment := aAlignment;
          if (aAlignment = taLeftJustify) then
            Width := Width - 8;
        end;
end;
Nach dem Hinzufügen von Buttons zur Laufzeit mußt du die Routine erneut aufrufen, damit die Ausrichtung der neuen Buttons angepaßt wird. Aber du weißt hoffentlich: zu Risiken und Nebenwirkungen...

Gruß Hawkeye
  Mit Zitat antworten Zitat