Was vermisst ihr in der RTL/VCL? Wünsche + Vorschläge!

[Neutral General]

Hallo,

Im Thread "Befindet sich Delphi noch auf der Höhe der Zeit?" kamen auch ab und an die Beschwerden dass die RTL einige heutzutage weit verbreiteten und (in anderen Sprachen) oft genutzten Funktionen/Klassen die einem das Leben z.T. sehr erleichtern könnten nicht enthält und dass es auch oft keinen (guten) nicht-kommerziellen Ersatz gibt.

Ich dachte man könnte ja mal ein paar Wünsche bzgl. RTL oder auch VCL hier sammeln und vllt. hat ja sogar jmd. Lust sich an die ein oder andere Sache heran zu wagen
Bei Interesse und Zeit werde ich mir eventuell selbst etwas vornehmen - aber keine Garantie

Am liebsten wäre es mir, wenn hier in erster Linie Vorschläge gesammelt werden und es möglichst wenige Diskussionen gibt.
Ein kurzer Kommentar + Antwort auf einen Vorschlag sind durchaus okay, aber längere Diskussionen sollten außerhalb des Threads stattfinden.

[geskill]

Thread safe generic TDictionary. Gibt es m.W.n. auch noch nicht im aktuellen Seattle.

[Dejan Vu]

Na ja, Das ist doch ne Sache von ein paar Minuten, sich das hinzudengeln...

[Daniel]

Zitat von Dejan Vu:

Na ja, Das ist doch ne Sache von ein paar Minuten, sich das hinzudengeln...

Leg los. Ansonsten ist so ein Spruch hier wenig zielführend.

[himitsu]

Ich wünsche mir, dass sowas endlich mal direkt eingebaut ist.

Delphi-Quellcode:

type
  TPageControl = class(ComCtrls.TPageControl)
  private
    FStartupPage: TTabSheet;  // Diese Seite wird beim Start der Form geladen, unabhängig von der letzten aktiven Seite in der IDE.
    procedure SetStartupPage(Value: TTabSheet);
    function  SaveActivePage: Boolean;
    function  SaveStartupPage: Boolean;
  published
    property ActivePage {: TTabSheet read FActivePage write SetActivePage} stored SaveActivePage;
    property ActivePageOnStartup: TTabSheet read FStartupPage write SetStartupPage stored SaveStartupPage;
  end;

function TPageControl.SaveActivePage: Boolean;
begin
  Result := Assigned(ActivePage) and not Assigned(FStartupPage);
end;

function TPageControl.SaveStartupPage: Boolean;
begin
  Result := Assigned(FStartupPage);
end;

procedure TPageControl.SetStartupPage(Value: TTabSheet);
begin
  FStartupPage := Value;
  if Assigned(FStartupPage) then
    inherited ActivePage := FStartupPage;
end;

[Stevie]

Zitat von Daniel:

Zitat von Dejan Vu:

Na ja, Das ist doch ne Sache von ein paar Minuten, sich das hinzudengeln...

Leg los. Ansonsten ist so ein Spruch hier wenig zielführend.

Jo, mit ner dummen CS, die einfach immer und alles lockt ist das vielleicht einfach, aber wer will sowas schon... ansonsten ist das schon ein bisschen komplizierter.

[stahli]

Zitat von himitsu:

Ich wünsche mir, dass sowas endlich mal direkt eingebaut ist.

Ich hatte mir mal eine Funktion geschrieben, die einfach alle PageControls sucht und auf PageIndex 0 setzt. Beim Projektstart dann aufrufen.

Dein Ansatz ist noch sinnvoller.

[himitsu]

Zitat von Stevie:

ansonsten ist das schon ein bisschen komplizierter.

TMultiReadExclusiveWriteSynchronizer, TSimpleRWSync uvm.

Konzepte überall möglichst einheitlich durchziehen, vorallem bei Dingen die neu eingeführt wurden.
z.B. TLayout auch in der VCL, sowie auch die anderen Layoutkomponenten in VCL und FMX.



RTL: Eigentlich zählt der Class-Helper nicht so richtig dazu, aber ich hätte endlich gern mehrere Helper an einer Klasse.

Und ein WITH mit Namespace, ähnlich dem EXCEPT-ON.

[BUG]

Zitat von Stevie:

ansonsten ist das schon ein bisschen komplizierter.

Schon sich auf die "richtigen" Anforderungen zu einigen sollte einigermaßen kompliziert werden.

Zitat von himitsu:

TMultiReadExclusiveWriteSynchronizer, TSimpleRWSync uvm.

Das macht sich gut für Dictionaries die read-mostly sind. Das ist aber nicht immer der Fall.
Noch schöner wird es, wenn man es sich in den meisten Fällen sparen möchte, einen Lock zu holen.

[himitsu]

Dass in TPath vielleicht noch paar Verzeichnisse mit aufgenommen werden.
http://www.delphipraxis.net/1319229-post2.html

Vorallem globale und lokale Programmdatenverzeichnisse.
* Windows: aktuelle Benutzer und alle Benutzer
* Android: nur meine App und alle Apps
* ...