.Lines in einer geerbten TRichEdit ändern

[mkinzler]

Welche Delphiversion?

[Green]

d 2005 arch

[mkinzler]

Sehr komisch, zwischen D2005 und D2006 dütfte sich ja nicht so viel getan haben. Besonders weil der Code eigentlich auch auf viel älteren Versionen funktionieren sollte.

[Green]

ich schick dir nochnal die unit:

Delphi-Quellcode:

unit PRichEdit;

interface

uses
  SysUtils, Classes, Controls, StdCtrls, ComCtrls, Dialogs;

type
  TColoredStrings = class(TStrings)
  private
    { Private-Deklarationen }
  protected
    { Protected-Deklarationen }
  public
    function Add(const S:string): integer;  override;
    { Public-Deklarationen }
  published
    { Published-Deklarationen }
  end;


  TPRichEdit = class(TRichEdit)
  private
    { Private-Deklarationen }
    FMyLines: TColoredStrings;
  protected
    { Protected-Deklarationen }
  public
    constructor Create( AOWner: TComponent); override;
    destructor Destroy;
    { Public-Deklarationen }
  published
    { Published-Deklarationen }
    property Lines: TColoredStrings read FMyLines write FMyLines;
  end;

procedure Register;

implementation

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

function TColoredStrings.Add(const S:string): integer;
begin
  showmessage(S);
end;

constructor TPRichEdit.Create(AOWner: TComponent);
begin
  inherited Create( AOwner);
  FMyLines := TColoredStrings.Create;
end;

destructor TPRichEdit.Destroy;
begin
  FMyLines.Destroy;
  inherited Destroy;
end;

end.

[mkinzler]

Der Code ist min meinerer identisch. Lösche mal die dcus und Installiere das Package neu.
Hast du mal im Debugger geschaut, ob der überladene Konstruktor zur Anwendung kommt?

[Green]

Zitat:

Zitat von mkinzler

{...}Lösche mal die dcus{...}

was meinste damit???

Zitat:

Zitat von mkinzler

Hast du mal im Debugger geschaut, ob der überladene Konstruktor zur Anwendung kommt?

wo kann ich des sehn?

[mkinzler]

Setzte ein Breakpoint im Konstruktor und starte mal. Dann siehst du ob der Konstruktor aufgerufen wird.

[Green]

das problem is das er sobald ich die kompo aufs form zoeh er den code gar nit erst ausführt...

[Green]

ich bekomm beim ausführen immer folgenden fehler:

Zitat:

[Fehler] E2161 RLINK32: Error opening file "C:\Dokumente und Einstellungen\Jan\Eigene Dateien\Borland Studio-Projekte\Unit1.dfm"

hoffe du kanns mir helfen...
mfG Green

[mkinzler]

Es scheint so, asl wäre deine Formular-Datei zerschossen. Versuche mal diese durch eine Backup zu ersetzten.