Einzelnen Beitrag anzeigen

Benutzerbild von himitsu
himitsu
Online

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
43.166 Beiträge
 
Delphi 12 Athens
 
#4

AW: eigene Komponente Buttonleiste umstellen

  Alt 16. Jul 2010, 12:20
Du willst also die Button-Reihenfolge ändern/angeben können?


Sowas könnte man z.B. über ein OpenArray erreichen, aber ob damit der OI zurecht kommen?
Und mit einem Property ist es auch nicht wirlich gut nutzbar.

Ein Set hat nunmal immer nur eine bestimmte Reihenfolge.
Delphi-Quellcode:
procedure TfraButtonleiste.SetButtons(Value: array of TButtonType);
var
  i : Integer;
begin
  ClearButtons;
  for i := 0 to High(Value) do
    case Value[i] of
      fbtSchliessen : AddButton(Value[i], FOnClickSchliessen);
      fbtUebernehmen : AddButton(Value[i], FOnClickUebernehmen);
      fbtHilfe : AddButton(Value[i], FOnClickHilfe);
      fbtAktualisieren : AddButton(Value[i], FOnClickAktualisieren);
      fbtVerwerfen : AddButton(Value[i], FOnClickVerwerfen);
      ...
    end;
end;

Liste.SetButtons([fbtSchliessen, fbtUebernehmen, fbtHilfe, fbtSchliessen]);

Im Prinzip kannst du dieses Set-Property einfach nicht verwenden und müßtest für deine Collection einen eigenen Property-Editor erstellen, wo du dann deine AddButton-, InsertButton- und DeleteButton[?]-Funktion zur Verfügung stellst.
(so wie z.B. der Item-Editor einer TListView)
Garbage Collector ... Delphianer erzeugen keinen Müll, also brauchen sie auch keinen Müllsucher.
my Delphi wish list : BugReports/FeatureRequests

Geändert von himitsu (16. Jul 2010 um 12:24 Uhr)
  Mit Zitat antworten Zitat