Als RecentItem wird ein TOptionItem Objekt verwendet.
Du kannst als Caption entweder den Dateiname angeben bzw. einen alternativen Namen und den Dateinamen im Hint.
Laden zum Beispiel:
Delphi-Quellcode:
var
i: Integer;
begin
i := Ribbon.AddRecentItem( iFileName );
if i >= 0 then with Ribbon.ApplicationMenu.Menu.RecentItems[i] do begin
Hint := iFileName;
// verwende ich gerne, weil dann der Dateiname angepasst dargestellt wird
Caption := MinimizeName( iFileName, Self.Canvas, 250 ); // oder ExtractFileName(xxx)
end;
Speichern über eine StringList:
Delphi-Quellcode:
var
sl : TStringList;
begin
sl := TStringList.Create;
try
for i := 0 to Ribbon.ApplicationMenu.Menu.RecentItems.Count - 1 do
sl.Add( Ribbon.ApplicationMenu.Menu.RecentItems.Items[i].Hint );
sl.SaveTofile(...);
finally
sl.Free;
end;