Tstrings als VCL

[Stevie]

Zitat von alcaeus:

TListBox arbeitet AFAIR mit TStrings

Zitat von khalilazzz:

ich suche mir eine nicht visuale komponente

Bau dir doch selber eine:

Delphi-Quellcode:

unit StringsContainer;

interface

uses
  Windows, Messages, SysUtils, Classes;

type
  TStringsContainer = class(TComponent)
  private
    FStrings: TStrings;
  public
    constructor Create(AOwner: TComponent); override;
    destructor Destroy; override;
  published
    property Strings: TStrings read FStrings write FStrings;
  end;

procedure Register;

implementation

procedure Register;
begin
  RegisterComponents('Beispiele', [TStringsContainer]);
end;

{ TStringsContainer }

constructor TStringsContainer.Create(AOwner: TComponent);
begin
  inherited;
  FStrings := TStringList.Create
end;

destructor TStringsContainer.Destroy;
begin
  FreeAndNil(FStrings);
  inherited;
end;

end.